calvuch respondió:
Mmm veamos yo lo haría así: en donde el argumento celda debe ser un string Function Traer(ByRef Celda As String) Dim Hoja As Variant Dim Expresion As Variant Hoja = Range("H5").Value Expresion = Sheets(Hoja).Range(Celda) Traer = Expresion End...