Como navegar entre hojas de un mismo libro

Mediante macros necesito navegar entre varias hojas de un libro.

Desde la hoja base ir a HOJA A

Desde la hoja base ir a HOJA B

Desde la hoja base ir a HOJA C

Desde la hoja base ir a HOJA D

Y a la vez desde cada una de estas hojas ir a HOJA BASE.

1

1 Respuesta

4.659.800 pts. Sancho, si los perros ladran ...

H o l a:

Esta es una opción, para que en una pestaña de excel, se carguen todas tus hojas y puedas seleccionar la hoja a la que quieres ir:

Para crear la pestaña y se carguen las hojas, ejecuta la siguiente macro.

Pon la macro en un módulo:

Sub Crearmenu()
'Por.Dante Amor
    Dim Hoja As Worksheet
    On Error Resume Next
    CommandBars("Menu de hojas").Delete
    With CommandBars.Add(Name:="Menu de hojas")
        With .Controls.Add(Type:=msoControlDropdown)
            For Each Hoja In Worksheets
                .AddItem Hoja.Name
                .OnAction = "Irahoja"
                .TooltipText = "Seleccione hoja"
            Next
        End With
        .Visible = True
    End With
End Sub

También pon la siguiente macro en el mismo módulo:

Sub Irahoja()
'Por.Dante Amor
    Application.ScreenUpdating = False
    With CommandBars.ActionControl
        h = .List(.ListIndex)
    End With
    Sheets(h).Select
End Sub

Después, selecciona la pestaña "Complementos y ahí selecciona del combo la hoja que quieres.


Sigue las Instrucciones para ejecutar la macro

  1. Abre tu archivo de excel
  2. Para abrir Vba-macros y poder pegar la macro, Presiona Alt + F11
  3. En el menú elige Insertar / Módulo
  4. En el panel del lado derecho copia la macro
  5. Para ejecutarla presiona F5

Para quitar el menú, ejecuta la siguiente macro:

Sub QuitarMenu()
'Por.Dante Amor
    On Error Resume Next
    CommandBars("Menu de hojas").Delete
End Sub

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas