For Each Next & Continue For en Excel
Estimados tengo un codigo en Excel en el que necesito que se reinicie la clausula For Each si el nombre del libro que esta procesando es LibrodeMacro.xlsm. Pienso que debo utilizar la instrucción CONTINUE FOR para que retorne al primer FOR EACH que se aprecia en el codigo que les envio. Pero dice "Error de sintaxis". ¿Qué estoy haciendo mal?
For Each Libro In Workbooks
If Libro.Name = "LibrodeMacros.xlsm" Then
Continue for
End If
For Each Hoja In Libro.Worksheets
Debug.Print Hoja.Name
Next
Next
End Sub
1 Respuesta
Respuesta de Dante Amor
1
Hay que poner dentro de la condición cuando los nombres de los libros sean diferentes al nombre del libro que contiene la macro, ejemplo:
Sub Macro() For Each Libro In Workbooks If Libro.Name <> ThisWorkbook.Name Then For Each Hoja In Libro.Worksheets Debug.Print Hoja.Name Next End If Next End Sub
sal u dos
