Obtener nombres de hoja
Cómo obtener nombres de hojas usando VBA en Microsoft Excel
En caso de que desee encontrar una forma de obtener todos los nombres de la hoja que están visibles, es decir, no ocultos.
En este artículo, aprenderemos cómo obtener nombres de las hojas visibles únicamente, usando código VBA.
Pregunta): Tengo varias hojas en un archivo y he ocultado las hojas que no quiero que otros vean; Quiero un código que me dé el nombre de todas las hojas visibles.
Consideremos que tenemos 5 hojas y ocultamos intencionalmente una hoja en particular.
Para obtener el nombre de las hojas visibles, debemos seguir los pasos a continuación:
Haga clic en la pestaña Desarrollador Desde el grupo Código, seleccione Visual Basic
Copie el siguiente código en el módulo estándar
Sub VisibleSheets ()
Dim i como entero, j como entero: j = 1
Celdas (1, 1) .CurrentRegion.Cells.Clear
Para i = 1 a Sheets.Count
Si Sheets (i) .Visible = -1 Entonces
Celdas (j, 1) = Hojas (i) .Name
j = j + 1
Finalizar si
Siguiente
End Sub
===
-
La primera vez que ejecute el código, obtendrá los nombres de todas las hojas en la hoja actual en la columna A
-
Si ocultamos la hoja de enero, tendremos la siguiente lista de nombres de hojas
De esta forma, podemos obtener el nombre de todas las hojas visibles, usando código vba.
