Steve tiene un libro de trabajo en el que crea una nueva pestaña de hoja de trabajo para cada proyecto en el que trabaja. Para mantener las cosas manejables, oculta las pestañas / proyectos completados. Steve ahora tiene más de 100 hojas de trabajo ocultas. De forma regular, tiene la necesidad de revisar un proyecto terminado. Para hacerlo, Steve elige mostrar las hojas de trabajo. Esto muestra el cuadro de diálogo Mostrar que contiene los nombres de las hojas de trabajo ocultas, sin ningún orden aparente. Para encontrar una pestaña / proyecto, debe desplazarse por este pequeño cuadro de diálogo y buscar la pestaña correcta. Steve considera que esto es muy laborioso y consume mucho tiempo, por lo que se pregunta si existe una mejor manera de encontrar y mostrar la hoja de trabajo para un proyecto terminado.

Una solución a este problema tan común es que podría crear un índice o tabla de contenido para las hojas de trabajo en su libro. Para ello, agregue una nueva hoja de trabajo y luego coloque hipervínculos en la hoja de trabajo a todas las hojas de trabajo en su libro de trabajo. Podría incluir casi cualquier información que desee sobre las hojas de trabajo (además del hipervínculo). Haga clic en el hipervínculo y se mostrará la hoja de trabajo deseada, sin necesidad de desplazarse por los cuadros de diálogo.

También puede crear un segundo libro de trabajo que contenga solo sus proyectos completados. Es bastante fácil mover hojas de trabajo de un libro de trabajo a otro, por lo que usar dos libros de trabajo («activo» y «completado»)

Sería muy fácil. Además, no necesitaría ocultar ninguna de las hojas de trabajo en el libro de trabajo que contiene los proyectos completados, y podría ponerlos en el orden que desee.

Si prefiere mantener su libro de trabajo como está, puede considerar la posibilidad de crear una macro que facilite la visualización de sus hojas de trabajo ocultas. Considere el siguiente ejemplo:

Sub UnHideWorksheets()

Dim sSheetName As String     Dim w As Worksheet     Dim sTemp As String

sTemp = "Name (or partial) of sheet to show?"

sSheetName = InputBox(sTemp, "Show Hidden Sheet")

If sSheetName > "" Then         sSheetName = LCase(sSheetName)

For Each w In Sheets             w.Tab.ColorIndex = xlColorIndexNone             sTemp = LCase(w.Name)

If Instr(sTemp, sSheetName) Then                 w.Visible = True                 w.Tab.ColorIndex = 6             End If         Next w     End If End Sub

La macro le pide al usuario un nombre de hoja de trabajo y luego recorre todas las hojas de trabajo. Si encuentra una coincidencia, se muestra la hoja de trabajo y el color de la pestaña de la hoja de trabajo se establece en amarillo. La macro en realidad funciona con coincidencias parciales, lo que significa que puede ingresar solo una parte del nombre de una hoja de trabajo, y cualquier hoja de trabajo que contenga la coincidencia parcial se mostrará. Puede asignar fácilmente la macro a una tecla de método abreviado oa su barra de herramientas de acceso rápido para poder ponerla en acción en un instante.

ExcelTips es su fuente de formación rentable en Microsoft Excel.

Este consejo (13589) se aplica a Microsoft Excel 2007, 2010, 2013, 2016, 2019 y Excel en Office 365.