Recorra libros y hojas de cálculo en Excel VBA

Buenos días, por aquí Miguel y esta vez os traigo un nuevo post.

A continuación veremos un programa en Excel VBA ese bucles en todos los libros y hojas de trabajo abiertosy muestra todos los nombres.

Localización:

Recorre libros y hojas de ejemplo

Agregue las siguientes líneas de código al botón de comando:

1. Primero, declaramos dos objetos y una variable. Un objeto de libro de trabajo que llamamos libro, un objeto de hoja de trabajo que llamamos hoja y una variable de cadena que llamamos texto.

Oscuro libro Cómo Libro de trabajo, hoja Cómo Hoja de trabajo, texto Cómo Cuerda

2. Queremos revisar todos los libros abiertos. Para hacer esto, agregue la siguiente línea de código:

Para Cada libro En Libros de trabajo

3. Escribimos el texto "Workbook:", el nombre del workbook y el texto "Worksheets:" "en el texto variable.

text = texto & "Libro de trabajo:" & libro.Nombre & vbNewLine & "Hojas de trabajo:" & vbNewLine

Nota: Puede utilizar el operador & para concatenar (unir) elementos. Para comenzar una nueva línea, puede usar vbNewLine.

4. Para revisar todas las hojas de trabajo de un libro, agregue la siguiente línea de código:

Para Cada sale de En libro.hojas

5. Escribimos los nombres de las hojas de trabajo de un libro en el texto variable.

text = texto y hoja.Nombre & vbNewLine

6. Cierre el segundo bucle.

Entonces sale de

7. Agregue una línea blanca.

texto = texto & vbNewLine

8. No olvide cerrar el primer ciclo.

Entonces libro

9. Finalmente, mostramos el texto de la variable usando un MsgBox.

Texto de MsgBox

10. Pruebe el programa. Antes de hacer clic en el botón de comando, asigne a sus hojas de trabajo algunos nombres descriptivos y abra un libro en blanco con tres hojas de trabajo.

Resultado:

Recorra libros y hojas de cálculo en Excel VBA

Deja una respuesta

Tu dirección de correo electrónico no será publicada. Los campos obligatorios están marcados con *

Subir

Esta página utiliza Cookies. Más info