¿Cómo verificar si existe una hoja en un libro de trabajo?
Cuando tienes decenas de hojas de cálculo o incluso cientos de hojas de cálculo en un libro de trabajo, y quieres encontrar o verificar si existe una hoja en este libro, en general, puede ser una tarea enorme. Ahora te presento un código VBA y una herramienta práctica para que verifiques rápidamente si existe una hoja en un libro de trabajo.
Verifica si existe una hoja en un libro de trabajo con VBA
Verifica si existe una hoja y cambia a ella con Kutools para Excel
Verifica si existe una hoja en un libro de trabajo
Por favor, sigue los siguientes pasos para copiar el código VBA y ejecutarlo para verificar si existe una hoja en el libro de trabajo actual.
1. Presiona Alt + F11 para mostrar la ventana de Microsoft Visual Basic para Aplicaciones.
2. En la ventana, haz clic en Insertar > Módulo para mostrar una nueva ventana de módulo, luego copia el siguiente código VBA en la ventana del módulo.
VBA: Verifica si existe una hoja en un libro de trabajo.
Function CheckSheet(pName As String) As Boolean
'Updateby20140617
Dim IsExist As Boolean
IsExist = False
For i = 1 To Application.ActiveWorkbook.Sheets.Count
If Application.ActiveWorkbook.Sheets(i).Name = pName Then
IsExist = True
Exit For
End If
Next
CheckSheet = IsExist
End Function
3. Guarda este código, y regresa a la hoja y selecciona una celda en blanco para escribir esta fórmula =CheckSheet(“Hoja1”) (Hoja1 indica el nombre de la hoja que deseas verificar si existe) en ella, presiona el botón Enter, FALSO indica que esta hoja no existe, y VERDADERO indica que existe en el libro de trabajo actual.
Verifica si existe una hoja y cámbiate a ella con Kutools para Excel con VBA
Con la Función Definida anteriormente, solo puedes verificar si existe una hoja y esto también es un poco difícil. Sin embargo, con Kutools para Excel, el panel de Navegación lista todos los nombres de las hojas para ti, lo que permite desplazarse para encontrar la hoja, o filtrar el nombre de la hoja para encontrarla, y si lo necesitas, puedes hacer clic en el nombre de la hoja para cambiar rápidamente a la hoja después de encontrarla.
Después de instalar gratuitamente Kutools para Excel, por favor haz lo siguiente:
1. Habilita el libro en el que deseas verificar si existe el nombre de una hoja, y luego haz clic en Kutools > Navegación. Ver captura de pantalla
:
2. Luego, en el panel emergente, haz clic en Libro de Trabajo y Hoja para expandir el panel, puedes ver todos los nombres de las hojas listados en el panel, puedes desplazarte para encontrar los nombres de las hojas.
3. O puedes marcar Filtro , luego escribe las palabras clave del nombre de la hoja que deseas verificar, entonces el nombre de la hoja especificada se listará, haz clic en el nombre de la hoja, y se cambiará a esa hoja.
Las mejores herramientas de productividad para Office
Impulsa al máximo tu dominio de Excel con Kutools para Excel y experimenta una eficiencia sin precedentes. Kutools para Excel ofrece más de300 funciones avanzadas para potenciar la productividad y ahorrar tiempo.Haz clic aquí para obtener la función que más necesitas...
Office Tab aporta una interfaz de pestañas a Office y hace tu trabajo mucho más sencillo
- Habilita la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
- Abre y crea varios documentos en nuevas pestañas de la misma ventana, en vez de en nuevas ventanas.
- ¡Aumenta tu productividad hasta un50% y reduce cientos de clics de ratón cada día!