Vai al contenuto principale

Come creare fogli di lavoro in sequenza da un intervallo di celle in Excel?

Se si dispone di un intervallo di dati nel foglio di lavoro e ora si desidera creare una sequenza di fogli di lavoro basata sui dati della cella, vedere la seguente schermata. Ovviamente, puoi modificare manualmente il nome del foglio di lavoro uno per uno, ma se è necessario modificare più nomi di fogli di lavoro, in questo modo sarà fastidioso e dispendioso in termini di tempo. Qui parlerò di alcuni trucchi veloci per aiutarti.

doc-create-sheet-from-list1

Crea fogli di lavoro in sequenza dall'elenco di celle con codice VBA

Crea fogli di lavoro in sequenza dall'elenco di celle con Kutools per Excel


freccia blu freccia destra Crea fogli di lavoro in sequenza dall'elenco di celle con codice VBA

Il seguente codice VBA può aiutarti ad aggiungere alcuni fogli di lavoro denominati in base al contenuto della cella dopo i fogli di lavoro esistenti. Per favore, fai come segue:

1. Tieni premuto il ALT + F11 chiavi, quindi apre il file Microsoft Visual Basic, Applications Edition finestra.

2. Clic inserire > Modulie incolla il codice seguente nel file Finestra del modulo.

Codice VBA: aggiungi fogli di lavoro in sequenza in base a un elenco di celle

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. Quindi premere F5 chiave per eseguire questo codice, quindi verrà visualizzata una finestra di messaggio per selezionare l'intervallo che si desidera utilizzare. Vedi screenshot:

doc-create-sheet-from-list2

4. E poi clicca OK, i fogli di lavoro denominati dai valori delle celle sono stati aggiunti dopo il foglio di lavoro esistente. Vedi screenshot:

doc-create-sheet-from-list3

Note:

1. I nuovi fogli di lavoro verranno inseriti dopo il foglio di lavoro corrente.

2. Se l'intervallo selezionato includeva celle vuote, i fogli di lavoro vengono denominati in base all'impostazione predefinita. Vedi screenshot:

doc-create-sheet-from-list4
-1
doc-create-sheet-from-list5

freccia blu freccia destra Crea fogli di lavoro in sequenza dall'elenco di celle con Kutools per Excel

Qui, presento uno strumento utile:Kutools for Excel, Con la sua Crea fogli di lavoro per sequenze, puoi creare rapidamente fogli di lavoro con nome del mese, nome del giorno, elenco personalizzato e così via.

Kutools for Excel include più di 300 utili strumenti Excel. Prova gratuita senza limitazioni per 30 giorni. Get it Now.

Dopo aver installato Kutools per Excel, eseguire i seguenti passaggi:

1. Seleziona l'intervallo su cui desideri creare fogli di lavoro.

2. Clicchi Impresa > Strumenti del foglio di lavoro > Crea fogli di lavoro per sequenze, vedi screenshot:

doc-create-sheet-from-list6

3. Nel Crea fogli di lavoro per sequenze finestra di dialogo, scegli il tipo di foglio di lavoro in cui desideri creare i nuovi fogli di lavoro della sequenza, quindi seleziona Dati in un intervallo opzione, vedi screenshot:

doc-create-sheet-from-list7

4. Quindi fare clic OK per chiudere la finestra di dialogo, è stata creata una nuova cartella di lavoro che contiene i fogli di lavoro denominati dai dati dell'intervallo selezionato. Vedi screenshot:

doc-create-sheet-from-list8

Note:

1. Se scegli Foglio 1 o Foglio 2, i nuovi fogli di lavoro creati avranno la stessa formattazione del Foglio 1 o del Foglio 2.

2. I nuovi fogli di lavoro vengono creati in una nuova cartella di lavoro.

3. Se l'intervallo selezionato includeva celle vuote, i fogli di lavoro vengono denominati in base all'impostazione predefinita. Vedi screenshot:

doc-create-sheet-from-list9
-1
doc-create-sheet-from-list10

Fare clic per saperne di più su questa funzione Crea fogli di lavoro in sequenza.


Articolo correlato:

Come aggiungere nuovi fogli di lavoro con nomi personalizzati in Excel?

I migliori strumenti per la produttività in ufficio

🤖 Assistente AI di Kutools: Rivoluziona l'analisi dei dati basandosi su: Esecuzione intelligente   |  Genera codice  |  Crea formule personalizzate  |  Analizzare i dati e generare grafici  |  Richiama le funzioni di Kutools...
Funzioni popolari: Trova, evidenzia o identifica i duplicati   |  Elimina righe vuote   |  Combina colonne o celle senza perdere dati   |   Round senza formula ...
Super ricerca: VLookup a criteri multipli    VLookup a valori multipli  |   VLookup su più fogli   |   Ricerca fuzzy ....
Elenco a discesa avanzato: Crea rapidamente un elenco a discesa   |  Elenco a discesa dipendente   |  Elenco a discesa a selezione multipla ....
Gestore di colonna: Aggiungi un numero specifico di colonne  |  Sposta colonne  |  Attiva/disattiva lo stato di visibilità delle colonne nascoste  |  Confronta intervalli e colonne ...
Funzionalità in primo piano: Messa a fuoco della griglia   |  Vista di progettazione   |   Grande barra delle formule    Gestore di cartelle di lavoro e fogli   |  Resource Library (Testo automatico)   |  Date picker   |  Combina fogli di lavoro   |  Crittografa/decrittografa le celle    Invia e-mail per elenco   |  Super filtro   |   Filtro speciale (filtro grassetto/corsivo/barrato...) ...
I 15 migliori set di strumenti12 Testo Strumenti (aggiungi testo, Rimuovi personaggi, ...)   |   50+ Grafico Tipi (Diagramma di Gantt, ...)   |   40+ Pratico Formule (Calcola l'età in base al compleanno, ...)   |   19 Inserimento Strumenti (Inserisci il codice QR, Inserisci immagine dal percorso, ...)   |   12 Conversione Strumenti (Numeri in parole, Conversione di valuta, ...)   |   7 Unisci e dividi Strumenti (Combina righe avanzate, Celle divise, ...)   |   ... e altro ancora

Potenzia le tue competenze di Excel con Kutools per Excel e sperimenta l'efficienza come mai prima d'ora. Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e risparmiare tempo.  Fai clic qui per ottenere la funzionalità di cui hai più bisogno...

Descrizione


Office Tab porta l'interfaccia a schede in Office e semplifica notevolmente il tuo lavoro

  • Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
  • Apri e crea più documenti in nuove schede della stessa finestra, piuttosto che in nuove finestre.
  • Aumenta la produttività del 50% e riduce ogni giorno centinaia di clic del mouse!
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