¿Ejecutar macro excepto primera hoja?
Hola, espero me puedan ayudar:
Tengo este código que copia el nombre de la hoja en una celda,
Sub INSERTARNOMBREHOJA()
For Each hoja In ThisWorkbook.Sheets
hoja.Range("B15").Value = hoja.Name
Next hoja
End Sub
Quisiera saber si hay forma de que se ejecute en todo el libro, excepto en la primera hoja
Gracias!
Tengo este código que copia el nombre de la hoja en una celda,
Sub INSERTARNOMBREHOJA()
For Each hoja In ThisWorkbook.Sheets
hoja.Range("B15").Value = hoja.Name
Next hoja
End Sub
Quisiera saber si hay forma de que se ejecute en todo el libro, excepto en la primera hoja
Gracias!
1 respuesta
Respuesta de calvuch
1
Prueba esto
Sub INSERTARNOMBREHOJA()
For Each hoja In ThisWorkbook.Sheets
If hoja.Index > 1 Then hoja.Range("B15").Value = hoja.Name
Next hoja
End Sub
Bye
Sub INSERTARNOMBREHOJA()
For Each hoja In ThisWorkbook.Sheets
If hoja.Index > 1 Then hoja.Range("B15").Value = hoja.Name
Next hoja
End Sub
Bye
