Cómo crear una lista de todas las hojas de trabajo en el libro activo usando una macro de VBA
¿Le gustaría crear una tabla de todas las hojas del libro activo? Utilice la siguiente macro:
Sub ShowTablesheets ()
Dim Row tan largo
Atenuar hoja como hoja de trabajo
Atenuar nueva hoja como hoja de trabajo
Establecer Neublatt = ActiveWorkbook.Worksheets.Add
Fila = 1
Para cada hoja de ActiveWorkbook.
Si Sheet.Name New Sheet.Name Entonces
New sheet.Cells (fila, 1) = sheet.name
Línea = línea + 1
Terminara si
Siguiente hoja
End Sub
La macro crea una nueva hoja de trabajo en el libro activo en la que se guardan los nombres de todas las hojas de trabajo. Solo la nueva hoja de resumen se excluye de la lista. La siguiente figura muestra cómo puede verse el resultado:
Para ingresar a la macro, abra el editor de VBA en Excel usando la combinación de teclas ALT F11. En este editor, seleccione el comando INSERTAR - MODULE e ingrese la macro. Inicie la macro desde Excel usando la combinación de teclas ALT F8.
