Como abrir un archivo utilizando el valor de una celda como parte del nombre del archivo

Te mando un ejemplo tomando como referencia lo anotado en la celda A1

Con esta macro abriremos el archivo que está guardado en la misma carpeta del libro activo y con solo anotar el número, es decir, 01, 10, 03...

Sub ejemplo()
'por luismondelo
ruta = ActiveWorkbook.Path
nombre = Range("a1").Value
largo = Len(nombre)
If largo < 2 Then
Workbooks.Open ruta & "\ejemplo0" & nombre
Else
Workbooks.Open ruta & "\ejemplo" & nombre
End If
End Sub

no olvides finalizar la consulta

Hola Luis:

ya lo probé pero me manda un mensaje de error '13' en tiempo de ejecución: No coinciden los tipos.

esto por lo que entiendo sucede al hacer referencia al nombre ya que me aparece el error en la línea:

largo = Len(nombre)

será por un problema al definir el nombre?

Acabo de probar la macro y funciona perfectamente, asegúrate de escribir en la celda A1 un número como:

1

12

...

Hola Luis:

estoy usando la versión 2007 de Excel y estuve haciendo pruebas, ya me dejó avanzar más haciendo la siente corrección:

largo = Len("nombre")

Al agregar las comillas ya no apareció el error NO COINCIDEN LOS TIPOS

Ahora me aparece el mismo error en la línea workbooks.open, tratmismo agregar comillas como en la línea anterior pero lo toma como si fuera un texto, coloque sólo una comillas pero me manda error de objeto... Creo que es porque no interpreta nombre como una variable en ese alinea o no se.

podría mandarte mi archivo por Mail para ver si le puedes echar un vistazo por favor, creo que es algo insignificante lo que falt pero me manda el error.

Gracias nuevamente por tu ayuda.

Lo que has hecho con LEN no es el problema, estaba bien antes.

Mándame el archivo con SOLO este ejemplo

Hola Luis:

Ya te envié el Mail con el archivo original sólo borré las otras macros y dejé la que me genera el problema para que me ayudes a revisarla. mi correo es [email protected]

Gracias por tu apoyo!

Te he pedido una aclaración por mail.

Me tienes que decir en qué hoja están los datos, en qué celdas...

Hola Luis:

ya te respondí por Mail, si requieres más información favor de informarme.

Gracias por tu tiempo!