Macro para leer datos de de otro libro

Tengo dos archivos en Excel

1 Base :que es la que contiene el listado de clientes

2 Tarifas: que es otro archivo que contiene una tabla para liquidar los pagos, dependiendo del numero del contrato y la edad así se asigna la cuota de pago.

La idea es crear una macro que haga lo siguiente.

Crear una función que yo le pase el numero de contrato, y la edad y busque esa información en la tabla tarifa y me devuelva el valor a pagar.

Public Function Verificador(Contrato, Parentesco, Edad)

Workbooks.Open "C:\clase\tarifas.xlsx"

f = 2

Do While Worksheets ("Tabla").Range("A" & f).Value <> ""

   If LCase(Parentesco) = "tsb" Then

      V = 0

   Else

      If Contrato = Worksheets ("Tabla").Range("A" & f).Value Then

         If Edad < 65 Then

            Verificador = Worksheets ("Tabla").Range("C" & f).Value

         Else

            Verificador = Worksheets ("Tabla").Range("D" & f).Value

         End If

         Exit Do

      End If

   End If

   f = f + 1

Loop

End Function

Sub abrirarchivo()

Workbooks.Open "C:\clase\tarifas.xlsx"

End sub

No me abre el archivo desde una función.

Pero si creo un procedimiento si abre el archivo pero al llamar este procedimiento desde la función no no hace nada

Esta tarifas

Otro libro el de base

Añade tu respuesta

Haz clic para o