Este artículo responde a sus preguntas sobre cómo añadir una hoja con nombre en Excel VBA Si está buscando este tipo de trucos únicos, ha venido al lugar adecuado. 6 easy & formas probadas de añadir una hoja con un nombre en Excel VBA .

Descargar el cuaderno de prácticas

Puede descargar el siguiente libro de Excel para comprenderlo mejor y practicar usted mismo.

Código VBA para Añadir Hoja con Nombre

Utilizaremos el Hojas objeto para añadir una hoja en Excel. Lo fundamental VBA código para añadir una hoja con el nombre se parece a la de abajo.

Antes: Es opcional. Añade una nueva hoja antes de una hoja específica.

Después: También es opcional. Añade una nueva hoja después de una hoja específica.

Cuenta: También es un parámetro opcional. Indica el número de hojas a añadir.

Tipo: También es opcional. Especifica el tipo de hoja. Aquí, el valor por defecto es xlHoja de trabajo .

6 Maneras Diferentes de Añadir Hoja con Nombre en Excel VBA

En Excel, podemos añadir una nueva hoja con la función add ⊕ justo al lado del nombre de la hoja. ¿Has pensado alguna vez en automatizar la misma tarea en Excel? No lo pienses más, porque VBA te tiene cubierto.

Aquí tenemos una hoja de cálculo llamada Informe de ventas Contiene el Informe diario de ventas de cierta cafetería. En columnas B , C y D hay nombres de Representantes de ventas , Artículos y Cantidad respectivamente.

Aquí, vamos a añadir otras hojas en este libro de trabajo con la ayuda de Macro VBA .

Aquí hemos utilizado Microsoft Excel 365 puede utilizar cualquier otra versión según su conveniencia.

1. Añadir hoja con nombre en Excel VBA

En nuestro primer método, añadiremos una hoja con el nombre del archivo entradas del usuario Si tienes curiosidad por aprender, sigue estos sencillos pasos.

📌 Pasos:

• Al principio, vaya a Desarrollador ficha.
• En segundo lugar, seleccione Visual Basic en el Código grupo.
• Alternativamente, pulse ALT + F11 para realizar la misma tarea.

Nota: Asegúrese de pulsar la tecla ALT a la izquierda de la tecla BARRA ESPACIADORA La operación no se ejecutará si se utilizan otros parámetros. ALT llaves.

• Al instante, el Microsoft Visual Basic para Aplicaciones se abre la ventana.
• Más tarde, pasar a la Inserte ficha.
• A continuación, seleccione Módulo de las opciones.

• Actualmente, abre el código Módulo .
• A continuación, escriba el siguiente código en el archivo Módulo .

 Sub Add_Sheet_with_Name() Dim sheet_name As String Dim sheet As Object On Error Resume Next sheet_name = InputBox("Please enter sheet name ", _ "Exceldemy") If sheet_name = "" Then Exit Sub Sheets.Add.Name = sheet_name End Sub 

Desglose de códigos

• En primer lugar, llamamos al procedimiento Sub como Añadir_hoja_con_nombre .
• A continuación, definimos los tipos de variables.
• Más tarde, añadimos el En caso de error Reanudar siguiente Esto ignorará cualquier error.
• Después, utilizamos InputBox para obtener el nombre de la hoja por parte del usuario. Además, almacenamos la cadena de texto del archivo InputBox en el nombre_hoja variable.
• A continuación, si el nombre_hoja está vacío, entonces el código no procederá.
• Por último, utilizamos el Añadir.Nombre para asignar un nombre a la hoja recién creada. En este caso, el nombre será el mismo que el de la hoja nombre_hoja variable.

• En este momento, pulse la tecla Corre (⏵) En su lugar, puede pulsar F5 en el teclado.

• De repente, se abre un cuadro de entrada.
• Aquí, introduzca el nombre de la nueva hoja. En este caso, escribimos Beneficios en la caja.
• Después, haga clic en OK .

• Así, nuestro código se ejecutará, y añadirá una hoja llamada Beneficios .

Nota: No hemos mencionado ningún lugar para nuestra hoja. Por defecto, se coloca antes de la hoja activa.

Más información: Excel VBA para Agregar Hoja a Otro Libro (3 Ejemplos Prácticos)

2. Aplicación de Excel VBA para Agregar Hoja con Nombre Antes de Hoja Específica

Exploremos el proceso paso a paso.

📌 Pasos:

• En primer lugar, abre el código Módulo como se muestra en Método 1 .
• En segundo lugar, escriba el siguiente código en él.

 Sub Add_Sheet_Before_Specific_Sheet() Hojas de cálculo("Informe de ventas").Activate Hojas.Add(Before:=Hojas de cálculo("Beneficios")).Name = "Balance" End Sub 

Desglose de códigos

• En primer lugar, llamamos al procedimiento Sub como Añadir_hoja_antes_de_hoja_específica .
• A continuación, activamos el Informe de ventas Esto asegurará que el código se ejecute si estamos en otra hoja.
• A continuación, utilizamos la función Añadir.Nombre para nombrar la hoja recién creada. Esta hoja se creará antes que la hoja llamada Beneficios del libro de trabajo. Además, hemos nombrado la hoja como Balance .

• A continuación, ejecute el código como se muestra en Método 1 .
• Así, añadirá una nueva hoja Balance antes de la hoja denominada Beneficios .

Más información: Excel VBA para agregar hoja con nombre de variable (5 ejemplos ideales)

3. Uso de Excel VBA para Agregar Hoja con Nombre Después de Hoja Específica

En este método, añadiremos una hoja después de la hoja denominada Beneficios Veamos el proceso en detalle.

📌 Pasos:

• Al principio, abre el código Módulo como se muestra en Método 1 .
• Después de eso, escriba el siguiente código en eso.

 Sub Añadir_hoja_después_hoja_específica() Hojas de cálculo("Beneficio").Activar Hojas.Añadir(Después:=Hoja_activa).Nombre = "Almacén" End Sub 

Este código es casi similar al código de Método 2 Sólo que aquí hemos utilizado el parámetro En en lugar de Antes de Porque queremos añadir la nueva hoja sucediendo a una hoja específica.

• A continuación, ejecute el código como se muestra en Método 1 .
• Así, añadirá una nueva hoja Almacén después de la hoja denominada Beneficios .

Más información: Excel VBA para agregar hoja si no existe (con pasos rápidos)

4. Insertar hoja con nombre al principio del libro de trabajo

En esta sección, insertaremos una nueva hoja al principio del libro en Excel utilizando VBA Así que, sin más dilación, veamos cómo lo hacemos.

📌 Pasos:

• Inicialmente, abre el código Módulo como se muestra en Método 1 .
• Después, escribe el siguiente código en él.

 Sub Add_Sheet_Start_Workbook() Sheets.Add(Before:=Sheets(1)).Name = "Company Profile" End Sub 

Aquí, estamos añadiendo la nueva hoja de trabajo antes de la primera hoja del libro de trabajo, es decir, al principio del libro de trabajo. Como resultado, ahora es la primera hoja. Además, nombramos la hoja como Perfil de la empresa .

• A continuación, ejecute el código como se muestra en Método 1 .
• Por lo tanto, añadirá una nueva hoja Perfil de la empresa al principio del libro de trabajo.

Más información: Macro Excel: Crear Nueva Hoja y Cambiar Nombre (3 Ejemplos Ideales)

5. Utilizando Excel VBA para Añadir una Hoja al Final del Libro de Trabajo

En esta sección añadir una hoja después de la última hoja del libro de trabajo Permítame demostrarle el proceso a continuación.

📌 Pasos:

• En primer lugar, abra el código Módulo como se muestra en Método 1 .
• En segundo lugar, pegue el siguiente código en él.

 Sub Hoja_Fin_Libro() Hojas.Add(After:=Hojas(Hojas.Count)).Name = "Estado de Resultados" End Sub 

Desglose de códigos

• En primer lugar, estamos llamando al procedimiento Sub como Sheet_End_Workbook.
• A continuación, utilizamos la función Añadir.Nombre para nombrar la hoja recién creada. Crearemos esta hoja después de la última hoja del libro de trabajo. Podemos obtener el número de la última hoja a partir del método Hojas.Cuenta Además, hemos llamado a la hoja Cuenta de resultados .

• A continuación, ejecute el código como se muestra en Método 1 .
• Por lo tanto, añadirá una nueva hoja Cuenta de resultados al final del cuaderno.

Más información: Crear Nuevo Libro y Guardar Usando VBA en Excel

6. Introducción de Múltiples Hojas Usando Valor de Celda por Excel VBA

Para el último método, añadiremos múltiples hojas en el libro con el nombre de un rango de celdas usando Excel VBA Además, pediremos al usuario que introduzca el rango para tomar el nombre. Veamos los pasos a continuación.

📌 Pasos:

• En primer lugar, abra el código Módulo como se muestra en Método 1 .
• Después, copia el siguiente código y pégalo ahí.

 Sub Add_Multiple_Sheets_Using_Cell_Value() Dim rng As Range Dim cc As Range Set rng = Application.InputBox("Select Cell Range" _ & " to Insert Sheets", "ExcelWIKI", Type:=8) Application.ScreenUpdating = False Worksheets("Sales Report").Activate For Each cc In rng Sheets.Add(After:=ActiveSheet).Name = cc.Value Next cc Application.ScreenUpdating = True End Sub 

Desglose de códigos

• En primer lugar, estamos llamando al procedimiento Sub como Add_Multiple_Sheets_Using_Cell_Value.
• A continuación, definimos los tipos de variables.
• A continuación, utilizamos InputBox para obtener el rango de datos del usuario.
• En cuarto lugar, activamos la hoja Informe de ventas .
• Más adelante, utilizaremos un Para cada siguiente para recorrer el rango de celdas seleccionado una a una.
• A continuación, utilizamos la función Añadir.Nombre para dar nombre a la hoja recién creada. Crearemos estas hojas después de la hoja activa Informe de ventas del libro de trabajo.

• Ahora, ejecute el código como se muestra en Método 1 .
• Al instante, el Exceldemy se abre el cuadro de entrada.
• A continuación, dé a las celdas del B5:B9 gama en la caja.
• Por último, haga clic en OK .

• Por último, insertará cinco con el nombre de los valores de las celdas de la B5:B9 todos están después de la hoja Informe de ventas .

Conclusión

Este artículo proporciona soluciones fáciles y breves para añadir hojas con nombres por Excel VBA No olvide descargar el Práctica Gracias por leer este artículo, esperamos que le haya sido útil. Si tiene alguna duda o sugerencia, no dude en hacérnosla saber en la sección de comentarios. Visite nuestro sitio web Exceldemy para explorar más.