Ejecutar una macro en todo el libro
Tengo una macro muy pequeña,
Sub nombrarHoja()
ActiveSheet.Name = Range("N2").Value
End Sub
Como puedo hacer para que se ejecute en todas las hojas del libro?
Sub nombrarHoja()
ActiveSheet.Name = Range("N2").Value
End Sub
Como puedo hacer para que se ejecute en todas las hojas del libro?
1 respuesta
Respuesta de Carlos soloffice
1
Serí así:
Sub nombrarHoja()
Dim oWorksheet As Worksheet
For Each oWorksheet In ThisWorkbook.Worksheets
oWorksheet.Name = oWorksheet.Range("N2").Value
Next
End Sub
Saludos,
Carlos
[email protected]
Sub nombrarHoja()
Dim oWorksheet As Worksheet
For Each oWorksheet In ThisWorkbook.Worksheets
oWorksheet.Name = oWorksheet.Range("N2").Value
Next
End Sub
Saludos,
Carlos
[email protected]
