VBA

18/03/2010 - 15:08 por Fernando | Informe spam
Muy buenas:
Tengo el siguiente procedimiento:
Sub CopiarDatosTM1()
On Error Resume Next
FilePath = ThisWorkbook.Path & "\"
ITV = Range("CentroTM1").Value
FileDtno = FilePath & "iberica_DR.xls"
Workbooks.Open FileDtno
LibroDtno = ActiveWorkbook.Name
Macro = LibroDtno & "!" & "CopyData"
Application.Run Macro
End Sub
Como podéis ver este procedimiento llama a un procedimiento de otro libro.
El problema es que cuando termina de ejecutar el procedimiento del otro
libro, no vuelve al procedimiento original y me gustaría saber como puedo
hacer para que una vez ejecutado el procedimiento del otro libro regrese de
nuevo al procedimiento original.
Muchas gracias por adelantado y saludos,
 

Leer las respuestas

#1 Héctor Miguel
18/03/2010 - 18:49 | Informe spam
hola, Fernando !

cuando una macro "llama" a otro procedimiento, se ejecuta el procedimiento llamado
al terminar la ejecucion de este "branch", la macro (regresa y) continua en la siguiente linea
en el caso del codigo que expones, "la siguiente" linea es: => End Sub

saludos,
hector.

__ OP __
Tengo el siguiente procedimiento:
Sub CopiarDatosTM1()
On Error Resume Next
FilePath = ThisWorkbook.Path & "\"
ITV = Range("CentroTM1").Value
FileDtno = FilePath & "iberica_DR.xls"
Workbooks.Open FileDtno
LibroDtno = ActiveWorkbook.Name
Macro = LibroDtno & "!" & "CopyData"
Application.Run Macro
End Sub
Como podeis ver este procedimiento llama a un procedimiento de otro libro.
El problema es que cuando termina de ejecutar el procedimiento del otro libro
no vuelve al procedimiento original y me gustaria saber como puedo hacer
para que una vez ejecutado el procedimiento del otro libro regrese de nuevo al procedimiento original.

Preguntas similares