Abrir Libro Segun Nombre en una Celda

[Dieguisxp]

Solicito ayuda a todos ustedes

¿que le falta al codigo de la macro para que abra el libro segun el nombre que tenga una celda ???

Adjunto los 2 archivos para explicarme mejor.

Para el ejemplo...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[ioyama]

Hola Dieguisxp

Prueba con la siguiente modificación a tu macro

Sub Abrir_Libro_y_Activar_Hoja()
ruta = ActiveWorkbook.Path
On Error Resume Next
a = Range("B2")
Workbooks.Open...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Dieguisxp]

Muchas gracias por el interes al respecto.

Le cambie el codigo y no me funciona, deberia de funcionar desde cualquier hoja y no lo hace.

Tiene que ver con ponerle la ruta completa en cada linea...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[ioyama]

Hola Dieguisxp

Te he vuelto a modificar tu código, tal que

Sub Abrir_Libro_y_Activar_Hoja()
ruta = ActiveWorkbook.Path
a = Sheets("1x").Range("B2") 'convierte la celda b2 en texto
Workbooks.Open...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Dieguisxp]

Hola Ioyama,

Pegue el codigo y me salen varios errores.

Es posible que me lo envies en el mismo archivo de excel ?

1000 Gracias

Diego

 

[ioyama]

Hola Dieguisxp

Revisa el adjunto. El problema estaba al asignar los valores de las variables (no tení­as activada la hoja adecuada, ni definí­as la ruta de las mismas en la macro).

Un saludo...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Dieguisxp]

Hola Ioyama,

Estoy amoldando la macro que me enviaste a mis necesidades reales.

Me encuentro con el inconveniente de que el nombre de la hoja es un numero osea la hoja "1x" se llama "1" y la...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Dieguisxp]

ya tengo la respuesta, hay que anteponerle
Dim a As String

1000 Gracias
Dieguisxp