Saltar al contenido principal

¿Cómo crear hojas de trabajo de secuencia a partir de un rango de celdas en Excel?

Si tiene un rango de datos en su hoja de trabajo, y ahora, desea crear una secuencia de hojas de trabajo basada en los datos de la celda, vea la siguiente captura de pantalla. Por supuesto, puede editar el nombre de la hoja de trabajo uno por uno manualmente, pero si es necesario editar varios nombres de hojas de trabajo, de esta manera será problemático y llevará mucho tiempo. Aquí, hablaré sobre algunos trucos rápidos para ayudarte.

doc-crear-hojas-de-lista1

Cree hojas de trabajo de secuencia a partir de la lista de celdas con código VBA

Cree hojas de trabajo de secuencia a partir de la lista de celdas con Kutools para Excel


flecha azul burbuja derecha Cree hojas de trabajo de secuencia a partir de la lista de celdas con código VBA

El siguiente código de VBA puede ayudarlo a agregar algunas hojas de trabajo que se nombran según el contenido de la celda después de las hojas de trabajo existentes. Por favor haz lo siguiente:

1. Mantenga pulsado el ALT + F11 llaves, luego abre el Microsoft Visual Basic para aplicaciones ventana.

2. Hacer clic recuadro > Móduloy pegue el siguiente código en el Ventana de módulo.

Código VBA: agregue hojas de trabajo de secuencia según la lista de celdas

Sub CreateWorkSheetByRange()
'Update 20130829
Dim WorkRng As Range
Dim Ws As Worksheet
Dim arr As Variant
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
arr = WorkRng.Value
Application.ScreenUpdating = False
For i = 1 To UBound(arr, 1)
    For j = 1 To UBound(arr, 2)
        Set Ws = Worksheets.Add(after:=Application.ActiveSheet)
        Ws.Name = arr(i, j)
    Next
Next
Application.ScreenUpdating = True
End Sub

3. Entonces presione F5 para ejecutar este código, y luego aparecerá un cuadro emergente para que seleccione el rango que desea usar. Ver captura de pantalla:

doc-crear-hojas-de-lista2

4. Y luego haz clic OK, las hojas de trabajo que son nombradas por los valores de celda se han agregado después de la hoja de trabajo existente. Ver captura de pantalla:

doc-crear-hojas-de-lista3

Notas:

1. Las nuevas hojas de trabajo se insertarán después de la hoja de trabajo actual.

2. Si el rango seleccionado incluía celdas en blanco, las hojas de trabajo se nombran de manera predeterminada. Ver capturas de pantalla:

doc-crear-hojas-de-lista4
-1
doc-crear-hojas-de-lista5

flecha azul burbuja derecha Cree hojas de trabajo de secuencia a partir de la lista de celdas con Kutools para Excel

Aquí, presento una herramienta útil:Kutools for Excel, Con su Crear hojas de trabajo de secuencia, puede crear rápidamente hojas de trabajo con el nombre del mes, el nombre del día, la lista personalizada, etc.

Kutools for Excel incluye más de 300 útiles herramientas de Excel. Prueba gratis sin límite en 30 días. Comprar ahora .

Después de instalar Kutools para Excel, siga los siguientes pasos:

1. Seleccione el rango en el que desea crear hojas de trabajo.

2. Haga clic Empresa > Herramientas de hoja de trabajo > Crear hojas de trabajo de secuencia, ver captura de pantalla:

doc-crear-hojas-de-lista6

3. En la Crear hojas de trabajo de secuencia cuadro de diálogo, elija el tipo de hoja de trabajo que desea crear las nuevas hojas de trabajo de secuencia y luego marque Datos en un rango opción, ver captura de pantalla:

doc-crear-hojas-de-lista7

4. Luego haga clic OK para cerrar el cuadro de diálogo, y se ha creado un nuevo libro de trabajo que contiene las hojas de trabajo nombradas por el rango de datos seleccionado. Ver captura de pantalla:

doc-crear-hojas-de-lista8

Notas:

1. Si elige Hoja 1 u Hoja 2, las nuevas hojas de trabajo que se creen tendrán el mismo formato que la Hoja 1 o la Hoja 2.

2. Las nuevas hojas de trabajo se crean en un nuevo libro de trabajo.

3. Si el rango seleccionado incluía celdas en blanco, las hojas de trabajo se nombran de manera predeterminada. Ver capturas de pantalla:

doc-crear-hojas-de-lista9
-1
doc-crear-hojas-de-lista10

Haga clic para obtener más información sobre esta función Crear hojas de trabajo de secuencia.


Artículo relacionado:

¿Cómo agregar nuevas hojas de trabajo con nombres personalizados en Excel?

Las mejores herramientas de productividad de oficina

🤖 Asistente de IA de Kutools: Revolucionar el análisis de datos basado en: Ejecución inteligente   |  Generar codigo  |  Crear fórmulas personalizadas  |  Analizar datos y generar gráficos  |  Invocar funciones de Kutools...
Características populares: Buscar, resaltar o identificar duplicados   |  Eliminar filas en blanco   |  Combine columnas o celdas sin perder datos   |   Ronda sin fórmula ...
Super búsqueda: Búsqueda virtual de criterios múltiples    Búsqueda V de valores múltiples  |   VLookup en varias hojas   |   Búsqueda difusa ....
Lista desplegable avanzada: Crear rápidamente una lista desplegable   |  Lista desplegable dependiente   |  Lista desplegable de selección múltiple ....
Administrador de columnas: Agregar un número específico de columnas  |  Mover columnas  |  Toggle Estado de visibilidad de columnas ocultas  |  Comparar rangos y columnas ...
Características destacadas: Enfoque de cuadrícula   |  Vista de diseño   |   Gran barra de fórmulas    Administrador de hojas y libros de trabajo   |  Biblioteca de Recursos (Texto automático)   |  Selector de fechas   |  Combinar hojas de trabajo   |  Cifrar/descifrar celdas    Enviar correos electrónicos por lista   |  Súper filtro   |   Filtro especial (filtro negrita/cursiva/tachado...) ...
Los 15 mejores conjuntos de herramientas12 Texto Herramientas (Añadir texto, Quitar caracteres, ...)   |   50+ Tabla Tipos (Diagrama de Gantt, ...)   |   40+ Práctico Fórmulas (Calcular la edad según el cumpleaños, ...)   |   19 Inserción Herramientas (Insertar código QR, Insertar imagen desde la ruta, ...)   |   12 Conversión Herramientas (Números a palabras, Conversión de Moneda, ...)   |   7 Fusionar y dividir Herramientas (Filas combinadas avanzadas, Células partidas, ...)   |   ... y más

Mejore sus habilidades de Excel con Kutools for Excel y experimente la eficiencia como nunca antes. Kutools for Excel ofrece más de 300 funciones avanzadas para aumentar la productividad y ahorrar tiempo.  Haga clic aquí para obtener la función que más necesita...

Descripción


Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil

  • Habilite la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
  • Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
  • ¡Aumenta su productividad en un 50% y reduce cientos de clics del mouse todos los días!
Comments (9)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
How to add bydefault table with row name and column name on sheets after creating sheets using command button. Please help.
This comment was minimized by the moderator on the site
How can the code be modified to copy a worksheet labeled "Template" and rename it to the values in the list selected in the range? I tried modifying the "worksheets.Add" code to "Worksheets("Template").Copy but it just makes copies with the worksheets labeled "Template(1)", "Template(2)", etc. Also, is there a way to put the tabs in numerical order as they are added?
This comment was minimized by the moderator on the site
Hi, Would it be possible to set-up a template for the new sheets created, instead of blank worksheets. Thanks Dave
This comment was minimized by the moderator on the site
Hi, I want to create invoices using excel and need to know whether is there a way to auto generate the second continuation page when the items on the first page exceed the A4 page layout that I have predefined? Any help is appreciated.
This comment was minimized by the moderator on the site
Could you modify the VBA code so that if the worksheet exists, it is skipped over? As it exists now, running the code a second time on the same range will create numbered worksheets. Thanks! Chris
This comment was minimized by the moderator on the site
Hello, Can I exclude blanks and automatically copy data with is behind the name? This data is generated from a pivot and I want to have all the names in different tabs with the data behind it in the layout. name1 data data data blank data data data blank Name 2 Thanks!
This comment was minimized by the moderator on the site
I need to duplicate one sheet when making all these new sheets from a list. Can you add the code for that? Thanks!
This comment was minimized by the moderator on the site
You can right click the tab and choose "move or copy" to duplicate it.
This comment was minimized by the moderator on the site
Very useful. thank you
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations