Nombre de hoja de acuerdo al contenido de una celda

Todo Expertos, buenas tardes.

Me podrían indicar como hacer para que en forma automática el nombre de las hojas de un libro de Excel sea de acuerdo al contenido de la celda A1.

1 Respuesta

Respuesta
1

Prueba la siguiente macro

Sub Nombrar_Hojas()
  Dim sh As Worksheet
  For Each sh In Sheets
    If sh.Range("A1").Value <> "" Then
      sh.Name = sh.Range("A1")
    End If
  Next
End Sub

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas