Llamada subfunción en macro
Buenos días,
estoy desarrollando una macro, y dentro de la misma quisiera hacer una llamada a una subfunción creada. Estoy al corriente de que este procedimiento se realiza mediante el comando Call, pero quisiera saber cómo es posible obtener el valor de salida de la Macro2 en mi Macro1. Es decir, de Macro2 quiero leer un valor y traérmelo a la Macro1 para operar con él.
Muchas gracias de antemano.
Saludos, Yolanda.
estoy desarrollando una macro, y dentro de la misma quisiera hacer una llamada a una subfunción creada. Estoy al corriente de que este procedimiento se realiza mediante el comando Call, pero quisiera saber cómo es posible obtener el valor de salida de la Macro2 en mi Macro1. Es decir, de Macro2 quiero leer un valor y traérmelo a la Macro1 para operar con él.
Muchas gracias de antemano.
Saludos, Yolanda.
Respuesta de leone
1
Para traer una valor de la macro2 a la macro1 puedes realizarlo de la siguiente manera:
Sub Macro1()
Dim Valor_Macro2 As String 'o segun requieras el valor double,boolean
'Aqui Llamas a la Function Macro2
Valor_Macro2 = Macro2
End Sub
Function Macro2() As String
'Ejecucion de tu codigo
'Igualas Macro2 el valor que enviaras a la Macro1
Macro2 = "mi valor"
End Function
Sub Macro1()
Dim Valor_Macro2 As String 'o segun requieras el valor double,boolean
'Aqui Llamas a la Function Macro2
Valor_Macro2 = Macro2
End Sub
Function Macro2() As String
'Ejecucion de tu codigo
'Igualas Macro2 el valor que enviaras a la Macro1
Macro2 = "mi valor"
End Function
