El cambio de nombre de las hojas en Excel se realiza desde la barra de tareas debajo de las hojas de trabajo que están presentes haciendo doble clic en ellas, pero en VBA usamos el método de propiedades Hojas o Hoja de trabajo para cambiar el nombre de la hoja, la sintaxis para cambiar el nombre de una hoja en VBA es la siguiente Hojas (" Nombre de hoja antigua "). Nombre =" Nombre de hoja nueva ".
Cambiar el nombre de la hoja en Excel VBA
Todos hemos hecho la tarea de cambiar el nombre de la hoja de trabajo según nuestra identidad o según nuestra conveniencia, ¿no es así? El cambio de nombre no es una ciencia de cohetes para dominar, pero si usted es el codificador de VBA, entonces debe conocer esta tarea de cambiar el nombre de la hoja de trabajo. Dado que trabajamos con hojas de trabajo usando sus nombres, es importante conocer la importancia de los nombres de las hojas de trabajo en la codificación VBA. En este artículo, le mostraremos cómo cambiar el nombre de la hoja usando la codificación Excel VBA.
¿Cómo cambiar el nombre de la hoja en VBA?
Cambiar el nombre de la hoja de trabajo no requiere ninguna habilidad especial. Solo necesitamos hacer referencia al nombre de la hoja que estamos cambiando ingresando el nombre de la hoja existente.
Por ejemplo, si queremos cambiar el nombre de la hoja llamada “Hoja 1”, entonces necesitamos llamar a la hoja por su nombre usando el objeto Hoja de trabajo.
Hojas de trabajo ("Hoja1")
Después de mencionar el nombre de la hoja, debemos seleccionar la propiedad "Nombre" para cambiar el nombre de la hoja de trabajo.
Hojas de trabajo ("Hoja1"). Nombre
Ahora necesitamos establecer la propiedad Name al nombre según nuestro deseo.
Hojas de trabajo ("Hoja1"). Nombre = "Nombre nuevo"
De esta manera, podemos cambiar el nombre de la hoja de trabajo en VBA usando la propiedad Name.
En las siguientes secciones del artículo, le mostraremos más y más ejemplos de cómo cambiar o cambiar el nombre de la hoja de trabajo.
Ejemplos de hojas de trabajo de cambio de nombre en Excel VBA
A continuación se muestran los ejemplos de la hoja de cambio de nombre de VBA.
Ejemplo n. ° 1: cambiar o cambiar el nombre de la hoja usando variables VBA.
Por ejemplo, mire el siguiente código de muestra.
Código:
Sub Rename_Example1 () Dim Ws As Worksheet Set Ws = Worksheets ("Sheet1") Ws.Name = "New Sheet" End Sub
En el código anterior primero, he declarado la variable como Hoja de trabajo.
Dim Ws como hoja de trabajo
A continuación, establecí la referencia a la variable como "Hoja1" usando el objeto de hojas de trabajo.
Establecer Ws = Hojas de trabajo ("Hoja1")
Ahora, la variable "Ws" contiene la referencia de la hoja de trabajo "Hoja1".
Ahora, usando la variable "Ws", he cambiado el nombre de la hoja de trabajo a "Nueva hoja".
Este código cambiará el nombre de "Hoja1" a "Nueva hoja".
Si ejecuto el código manualmente o mediante la tecla de método abreviado F5, nuevamente obtendremos un error de subíndice fuera de rango.
La razón por la que obtenemos este error es que, en el paso anterior, ya hemos cambiado la hoja de trabajo llamada "Hoja1" a "Nueva hoja". Dado que ya no hay un nombre de hoja de trabajo, "Sheet1" no está disponible, VBA arroja este error.
Ejemplo n. ° 2: obtenga todos los nombres de las hojas de trabajo en una sola hoja.
Podemos obtener todos los nombres de las hojas de trabajo del libro en una sola hoja. El siguiente código extraerá todos los nombres de las hojas de trabajo.
Código:
Sub Renmae_Example2() Dim Ws As Worksheet Dim LR As Long For Each Ws In ActiveWorkbook.Worksheets LR = Worksheets("Main Sheet").Cells(Rows.Count, 1).End(xlUp).Row + 1 Cells(LR, 1).Select ActiveCell.Value = Ws.Name Next Ws End Sub
This code will extract all the available worksheet names to the sheet named “Main Sheet.”
Example #3 - Set Permanent Name to the Excel Worksheet Using VBA
Since we work with sheet names in coding, it is important to set permanent names to them. How do we set permanent names for them?
For example, look at the below code.
Code:
Sub Rename_Example3() Worksheets("Sheet1").Select End Sub
The above code will select the Sheet1.
If your workbook is used by many people, if someone changed the name of the worksheet, then we will get the Subscript Out of Range error.
To avoid this, we can set the permanent name to it. To set the permanent name to follow the below steps.
Step 1: Select the sheet we need to set the permanent name to in Visual Basic Editor.
Step 2: Press the F4 key to see the Properties window.
Step 3: Under Name, Property Change the name to “New Name.”
As you can see, one name is showing as “Sheet1” and in a bracket, we can see the new name as “New Sheet.”
Now in coding, we will use the new name instead of an actual visible name.
Code:
Sub Rename_Example3() NewSheet.Select End Sub
Now come back to the worksheet window. We can still see the sheet name as “Sheet1” only.
Now I will change the sheet name to “Sales.”
Si ejecuto el código usando la tecla F5 o manualmente, todavía seleccionará la hoja llamada "Ventas" solamente. Como le habíamos dado un nombre permanente, seguirá seleccionando la misma hoja solamente.
