¿Cómo cambiar el nombre de las hojas de cálculo basándose en los valores de las celdas en Excel?

Cambiar el nombre de las hojas de cálculo suele ser una tarea común en nuestro trabajo con Excel, pero ¿has intentado alguna vez cambiar el nombre de las hojas de cálculo basándote en los valores de las celdas? Claro, puedes cambiar manualmente el nombre de las hojas de cálculo, pero este tutorial introduce algunos trucos que pueden cambiar rápidamente el nombre de varias hojas de cálculo basadas en los valores de las celdas, lo que puede ahorrarte tiempo de trabajo.

Cambiar el nombre de las hojas de cálculo basándose en una celda específica con VBA

Cambiar el nombre de las hojas de cálculo basándose en una celda específica con Renombrar múltiples hojas de cálculo

Cambiar el nombre de las hojas de cálculo basándose en un rango de contenido de celdas con Renombrar múltiples hojas de cálculo

Cambiar el nombre de las hojas de cálculo basándose en una celda específica con VBA

Con el siguiente código VBA, puedes cambiar el nombre de la hoja de cálculo relativa basándote en una celda específica.

1. Selecciona la celda en la que deseas cambiar el nombre de la hoja de cálculo; en este caso, selecciona la Celda A1. Ver captura de pantalla:

2. Presiona las teclas Alt + F11 para abrir la ventana de Microsoft Visual Basic para Aplicaciones.

3. Haz clic en Insertar > Módulo, luego pega el siguiente código VBA en la nueva ventana de Módulo.

VBA: Cambiar el nombre de las hojas de cálculo basándose en los valores de una celda específica.

Sub RenameSheet()
'UpdatebyKutools20191129
Dim xWs As Worksheet
Dim xRngAddress As String
Dim xName As String
Dim xSSh As Worksheet
Dim xInt As Integer
xRngAddress = Application.ActiveCell.Address
On Error Resume Next
Application.ScreenUpdating = False
For Each xWs In Application.ActiveWorkbook.Sheets
    xName = xWs.Range(xRngAddress).Value
    If xName <> "" Then
        xInt = 0
        Set xSSh = Nothing
        Set xSSh = Worksheets(xName)
        While Not (xSSh Is Nothing)
            Set xSSh = Nothing
            Set xSSh = Worksheets(xName & "(" & xInt & ")")
            xInt = xInt + 1
        Wend
        If xInt = 0 Then
            xWs.Name = xName
        Else
            If xWs.Name <> xName Then
                xWs.Name = xName & "(" & xInt & ")"
            End If
        End If
    End If
Next
Application.ScreenUpdating = True
End Sub

4. Presiona la tecla F5 para ejecutar el código VBA. Luego, todas las hojas de cálculo se habrán renombrado según los valores relativos de la celda A1.

Cambiar el nombre de las hojas de cálculo basándose en una celda específica con Renombrar múltiples hojas de cálculo

Si tienes Kutools para Excel, no necesitas guardar el código VBA; puedes usar la función Renombrar múltiples hojas de cálculo para cambiar rápidamente el nombre de todas las hojas de cálculo basándote en sus celdas relativas.

Después de instalar gratis Kutools para Excel, por favor sigue estos pasos:

1. Activa el libro en el que deseas cambiar el nombre de las hojas de cálculo.

2. Haz clic en Kutools Plus > Hoja de cálculo > Renombrar hojas de cálculo. Ver captura de pantalla:

3. Luego, en el cuadro de diálogo emergente, selecciona las hojas que deseas renombrar en el panel Hojas de cálculo y elige una de las Opciones de renombrado que necesites. Aquí reemplazaré el nombre de la hoja, así que selecciono Renombrar hojas de cálculo con una celda específica y selecciono la celda que necesito para renombrar. Ver captura de pantalla:

4. Haz clic en Aceptar. Ahora las hojas se han renombrado con el contenido de las celdas específicas.

Pero a veces, lo que necesitas es cambiar el nombre de varias hojas de cálculo basándote en un rango de valores de celdas como se muestra en la captura de pantalla a continuación. En este caso, puedes elegir el siguiente método.

Cambiar el nombre de las hojas de cálculo basándose en un rango de contenido de celdas con Renombrar múltiples hojas de cálculo

Con Renombrar múltiples hojas de cálculo de Kutools para Excel, también puedes cambiar el nombre de las hojas basándote en un rango seleccionado.

Después de instalar gratis Kutools para Excel, por favor sigue estos pasos:

1. Haz clic en Kutools Plus > Hoja de cálculo > Renombrar hojas de cálculo. Ver captura de pantalla:

2. En el cuadro de diálogo Renombrar múltiples hojas de cálculo, necesitas especificar la configuración de la siguiente manera:

(1) Selecciona las hojas de cálculo que necesitas renombrar desde la lista de Hojas de cálculo;

(2) Marca la opción Desde un rango específico y selecciona los valores de las celdas en los que deseas basar el cambio de nombre;

(3) Especifica las Opciones de renombrado, puedes marcar Insertar antes del nombre original de la hoja, Insertar después del nombre original de la hoja o Reemplazar el nombre original de la hoja, y puedes ver una vista previa del resultado correspondiente en el cuadro de diálogo.

3. Haz clic en Aceptar, y luego podrás ver que todas las hojas de cálculo que seleccionaste se han renombrado basándose en los valores de las celdas especificados.

Reemplazar el nombre original de la hoja

Insertar antes del nombre original de la hoja

Insertar después del nombre original de la hoja

Con la utilidad Renombrar hojas de cálculo, también puedes cambiar el nombre de las hojas de cálculo con un prefijo o sufijo específico. Haz clic aquí para saber más sobre Renombrar múltiples hojas de cálculo.

Renombrar múltiples hojas basándose en los valores de las celdas