Saltar al contenido

Seleccionar hoja según el valor de la celda

publicado

Buenos días:

Trabajo con dos libros uno Caja Jesús 2016 y otro Cuentas por cobrar, bueno en mi libro caja en la hoja BOLETOS en la celda F1 ingreso el nombre de una de las hojas de mi otro libro Cuentas por cobrar, para este ejemplo solo puse algunas hojas, pero la verdad tengo como 200 hojas que las utilizo.

Mi consulta es de como ir a la hoja del libro Cuentas por cobrar según el valor de la celda F1 de mi libro Caja Jesús 2016.

Muchas gracias por su atención, saludos cordiales

Jesús

Caja Jesus 2016.xlsx

Cuentas por cobrar.xlsx

Featured Replies

publicado

Pon la macro en la hoja BOLETOS.

Doble-click en la celda F1 para ir a la hoja de Cuentas por cobrar

 

Private Sub Worksheet_BeforeDoubleClick _
           (ByVal Target As Range, Cancel As Boolean)
Cancel = True
If Not Target.Address = "$F$1" Then Exit Sub
Workbooks("Cuentas por cobrar.xlsx").Activate
ActiveWorkbook.Sheets(Target.Value).Activate
End Sub

 

Se da por entendido que ambos libros están abiertos simultaneamente.

publicado
  • Autor

Estimado Macro Antonio, y si quisiera hacerlo mediante boton

Sub irakardex ()
Cancel = True
If Not Target.Address = "$F$1" Then Exit Sub
Workbooks("Cuentas por cobrar.xlsx").Activate
ActiveWorkbook.Sheets(Target.Value).Activate
End Sub

Que tendría que modificar ???

Saludos

Jesús

publicado
Sub irakardex ()
Workbooks("Cuentas por cobrar.xlsx").Activate
ActiveWorkbook.Sheets(Range("F1").Value).Activate
End Sub
publicado
  • Autor

Me sale el siguiente mensaje" Se ha producido el error '9' en tiempo de ejecución : Sub indice fuera del intervalo "

Saludos

Jesús

  • Silvia bloqueó este tema

Archivado

Este tema está ahora archivado y está cerrado a más respuestas.