Normalmente, para cambiar el nombre de las hojas de trabajo en Excel, podemos hacer doble clic rápidamente en la pestaña de la hoja o hacer clic con el botón derecho en la pestaña de la hoja para elegir el comando Cambiar nombre para cambiar el nombre de las hojas de trabajo. Eso es bastante útil para cambiar el nombre de una o dos hojas de trabajo en Excel, pero si queremos cambiar el nombre de varias hojas de trabajo dentro de una operación, ¿cómo podemos hacerlo?

Uso del comando Cambiar nombre para cambiar el nombre de las hojas de trabajo

Usando una práctica herramienta para cambiar el nombre de varias hojas de trabajo cómodamente

Usando código VBA para cambiar el nombre de varias hojas de trabajo

Uso del comando Cambiar nombre para cambiar el nombre de las hojas de trabajo

¡Asombroso! ¡Usando pestañas eficientes en Excel como Chrome, Edge, Firefox y Safari!
¡Ahorre el 50% de su tiempo y reduzca miles de clics del mouse todos los días!

Podemos cambiar rápidamente el nombre de las hojas de trabajo en Excel con el rebautizar comando de acuerdo con los siguientes procedimientos:

Haga clic con el botón derecho en la pestaña de la hoja cuyo nombre desea cambiar y elija rebautizar comando del menú contextual. O haga doble clic en la pestaña de la hoja para cambiar el nombre de la hoja de trabajo. Luego escriba un nuevo nombre y presione Participar para cambiarle el nombre, vea la captura de pantalla:

Con este rebautizar comando, puede cambiar el nombre de una sola hoja de trabajo a la vez, con el fin de cambiar el nombre de varias hojas de trabajo, repita las operaciones anteriores.

Usando una práctica herramienta para cambiar el nombre de varias hojas de trabajo cómodamente

Usando código VBA para cambiar el nombre de varias hojas de trabajo

Aquí le presentaré dos códigos VBA para cambiar el nombre de varias hojas de trabajo.

Código 1. Código VBA para cambiar el nombre de varias hojas de trabajo por el nombre que desee a la vez

Con el siguiente código VBA, puede cambiar rápidamente el nombre de todas las hojas de trabajo del libro de trabajo actual con el mismo prefijo en sus nombres de hoja de trabajo, como: KTE-order1, KTE-order 2 y KTE-order 3…

1. Haga clic en Developer > Visual BasicY haga clic en recuadro > Módulo existentes Windows de la aplicación Microsoft Visual Basic.

2. Copie y pegue el siguiente código en el Módulo.

VBA: cambie el nombre de todas las hojas ingresando un nombre específico

Sub ChangeWorkSheetName()
'Updateby20140624
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
newName = Application.InputBox("Name", xTitleId, "", Type:=2)
For i = 1 To Application.Sheets.Count
    Application.Sheets(i).Name = newName & i
Next
End Sub

3.  Haga Clic en  para ejecutar el código e ingrese el nombre que desee en el cuadro de diálogo emergente.

4. Haga Clic en OK. Entonces puede ver que todas las hojas han cambiado de nombre.

2. Código VBA para cambiar el nombre de varias hojas de trabajo por valor de celda específico en cada hoja de trabajo del libro activo

Usando el siguiente código VBA, cambiará el nombre de todas las hojas de trabajo del libro actual usando el contenido de la celda específica. Por ejemplo, puede escribir el nombre de la hoja de trabajo en la celda A1 de todo el libro, y luego la hoja de trabajo cambiará de nombre como el valor de celda A1.

1.  Especifique una celda para contener el nombre de la hoja de trabajo en cada hoja de trabajo y escriba el nombre de la hoja de trabajo en ella. En este ejemplo, escribiré el nombre de la hoja de trabajo en la celda A1 de cada hoja de trabajo.

2.  Haga Clic en Developer > Visual BasicY haga clic en recuadro > Módulo existentes Aplicación Microsoft Visual Basic De Windows.

3.  Copie y pegue el siguiente código en el módulo.

VBA: cambie el nombre de las hojas de trabajo por un contenido de celda específico

Sub RenameTabs()
'Updateby20140624
 For x = 1 To Sheets.Count
 If Worksheets(x).Range("A1").Value <> "" Then
 Sheets(x).Name = Worksheets(x).Range("A1").Value
 End If
 Next
 End Sub

4.  Haga Clic en  botón para ejecutar el código. Se cambia el nombre de todas las hojas de pelaje según el contenido de la celda de A1.

Demostración: cambie el nombre de varias hojas de trabajo con Kutools para Excel

Artículos relacionados