Questo articolo fornisce le risposte alle vostre domande su come aggiungere un foglio con nome in Excel VBA Se siete alla ricerca di questo tipo di trucchi unici, siete nel posto giusto. Qui parleremo di 6 modi semplici e collaudati per aggiungere un foglio con un nome in Excel VBA .

Scarica il quaderno di esercizi

È possibile scaricare la seguente cartella di lavoro Excel per una migliore comprensione e per esercitarsi.

Codice VBA per aggiungere un foglio con un nome

Utilizzeremo il Oggetto foglio per aggiungere un foglio in Excel. VBA per aggiungere un foglio con un nome simile a quello riportato di seguito.

Prima: È facoltativo: aggiunge un nuovo foglio prima di un foglio specifico.

Dopo: È facoltativo e aggiunge un nuovo foglio dopo un foglio specifico.

Conteggio: È un parametro opzionale che indica il numero di fogli da aggiungere.

Tipo: Anch'esso facoltativo, specifica il tipo di foglio. Qui il valore predefinito è xlFoglio di lavoro .

6 modi diversi per aggiungere un foglio con un nome in Excel VBA

In Excel, possiamo aggiungere un nuovo foglio con il comando aggiungi ⊕ accanto al nome del foglio. Avete mai pensato di automatizzare la stessa operazione in Excel? Non pensateci più perché VBA vi copre.

Qui abbiamo un foglio di lavoro chiamato Rapporto sulle vendite Contiene il Rapporto giornaliero sulle vendite di una certa caffetteria. Nelle colonne B , C e D , ci sono nomi di Rappresentanti di vendita , Articoli , e Quantità rispettivamente.

Qui, aggiungeremo altri fogli in questa cartella di lavoro con l'aiuto di Macro VBA .

Qui abbiamo utilizzato Microsoft Excel 365 è possibile utilizzare qualsiasi altra versione in base alle proprie esigenze.

1. Aggiunta di un foglio con nome in Excel VBA

Nel nostro primo metodo, aggiungeremo un foglio con il nome del file input dell'utente Se siete curiosi di imparare, seguite questi semplici passi.

📌 Passi:

• All'inizio, andare alla voce Sviluppatore scheda.
• In secondo luogo, selezionare Visual Basic sul Codice gruppo.
• In alternativa, premere ALT + F11 per svolgere lo stesso compito.

Nota: Assicurarsi di premere il tasto ALT a sinistra del tasto BARRA SPAZIATRICE L'operazione non viene eseguita se si utilizzano altri metodi di lavoro. ALT chiavi.

• Immediatamente, il Microsoft Visual Basic per le applicazioni si apre la finestra.
• In seguito, passare alla Inserire scheda.
• Quindi, selezionare Modulo dalle opzioni.

• Attualmente, apre il codice Modulo .
• Successivamente, scrivere il seguente codice nella cartella Modulo .

 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 

Ripartizione del codice

• Per prima cosa, chiamiamo la procedura Sub come Aggiungi_foglio_con_nome .
• Quindi, definiamo i tipi di variabili.
• In seguito, è stato aggiunto il parametro In caso di errore, riprende il prossimo Questa operazione ignora qualsiasi errore.
• Successivamente, abbiamo utilizzato Casella di input per ottenere il nome del foglio dall'utente. Inoltre, abbiamo memorizzato la stringa di testo dal file Casella di input nella nome_foglio variabile.
• Successivamente, se il nome_foglio è vuoto, allora il codice non procederà.
• Infine, si utilizza il metodo Aggiungi.Nome per dare un nome al foglio appena creato. In questo caso, il nome sarà lo stesso del foglio nome_foglio variabile.

• A questo punto, premere il tasto Eseguire (⏵) Piuttosto, è possibile premere F5 sulla tastiera.

• Improvvisamente, si apre una casella di input.
• Qui, inserite il nome del nuovo foglio. In questo caso, abbiamo scritto Profitto nella scatola.
• Successivamente, fare clic su OK .

• Quindi, il nostro codice verrà eseguito e aggiungerà un foglio chiamato Profitto .

Nota: Non è stato indicato alcun posto per il nostro foglio. Per impostazione predefinita, viene posizionato prima del foglio attivo.

Per saperne di più: Excel VBA per aggiungere un foglio a un'altra cartella di lavoro (3 esempi pratici)

2. Applicazione di Excel VBA per aggiungere un foglio con il nome prima di un foglio specifico

Nel nostro secondo metodo, aggiungeremo un foglio con il nome prima di un foglio specifico. Esploriamo il processo passo dopo passo.

📌 Passi:

• Per prima cosa, richiamare il codice Modulo come mostrato in Metodo 1 .
• In secondo luogo, scrivete il seguente codice.

 Sub Add_Sheet_Before_Specific_Sheet() Worksheets("Sales Report").Activate Sheets.Add(Before:=Sheets("Profit")).Name = "Balance Sheet" End Sub 

Ripartizione del codice

• Per prima cosa, chiamiamo la procedura Sub come Add_Sheet_Before_Specific_Sheet .
• Quindi, si attiva il Rapporto sulle vendite In questo modo il codice verrà eseguito anche se ci troviamo in un altro foglio.
• Successivamente, si utilizza il metodo Aggiungi.Nome per dare un nome al foglio appena creato. Questo foglio verrà creato prima del foglio chiamato Profitto dalla cartella di lavoro. Inoltre, abbiamo nominato il foglio come Bilancio .

• Successivamente, eseguire il codice come mostrato in Metodo 1 .
• In questo modo, si aggiungerà un nuovo foglio Bilancio prima del foglio denominato Profitto .

Per saperne di più: Excel VBA per aggiungere un foglio con un nome di variabile (5 esempi ideali)

3. Utilizzo di Excel VBA per aggiungere un foglio con nome dopo un foglio specifico

In questo metodo, aggiungeremo un foglio dopo il foglio denominato Profitto Vediamo il processo in dettaglio.

📌 Passi:

• All'inizio, richiamare il codice Modulo come mostrato in Metodo 1 .
• Dopodiché, scrivete il seguente codice.

 Sub Add_Sheet_After_Specific_Sheet() Worksheets("Profit").Activate Sheets.Add(After:=ActiveSheet).Name = "Warehouse" End Sub 

Questo codice è quasi simile a quello di Metodo 2 Solo che qui abbiamo usato il parametro Dopo piuttosto che Prima Perché vogliamo aggiungere il nuovo foglio dopo un foglio specifico.

• Successivamente, eseguire il codice come mostrato in Metodo 1 .
• In questo modo, si aggiungerà un nuovo foglio Magazzino dopo il foglio denominato Profitto .

Per saperne di più: Excel VBA per aggiungere un foglio se non esiste (con passaggi rapidi)

4. Inserimento di un foglio con nome all'inizio della cartella di lavoro

In questa sezione, inseriremo un nuovo foglio all'inizio della cartella di lavoro in Excel utilizzando VBA Quindi, senza ulteriori indugi, vediamo come fare.

📌 Passi:

• Inizialmente, si può richiamare il codice Modulo come mostrato in Metodo 1 .
• Successivamente, scrivete il seguente codice.

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

In questo caso, stiamo aggiungendo il nuovo foglio di lavoro prima del primo foglio della cartella di lavoro, cioè all'inizio della cartella di lavoro. Di conseguenza, ora è il primo foglio. Inoltre, abbiamo dato al foglio il nome di Profilo aziendale .

• Quindi, eseguire il codice come mostrato in Metodo 1 .
• Quindi, aggiungerà un nuovo foglio Profilo aziendale all'inizio della cartella di lavoro.

Per saperne di più: Macro di Excel: creare un nuovo foglio e rinominarlo (3 esempi ideali)

5. Utilizzo di Excel VBA per aggiungere un foglio alla fine della cartella di lavoro

In questa sezione aggiungere un foglio dopo l'ultimo foglio della cartella di lavoro Permettetemi di illustrarvi il procedimento qui di seguito.

📌 Passi:

• In primo luogo, aprire il codice Modulo come mostrato in Metodo 1 .
• In secondo luogo, incollate il seguente codice.

 Sub Sheet_End_Workbook() Sheets.Add(After:=Sheets(Sheets.Count)).Name = "Income Statement" End Sub 

Ripartizione del codice

• Innanzitutto, chiamiamo la procedura Sub come Sheet_End_Workbook.
• Successivamente, si utilizza il metodo Aggiungi.Nome per dare un nome al nuovo foglio creato. Creeremo questo foglio dopo l'ultimo foglio della cartella di lavoro. Possiamo ottenere il numero dell'ultimo foglio dal metodo Fogli.Conteggio Inoltre, abbiamo dato un nome al foglio Conto economico .

• Dopodiché, eseguire il codice come mostrato in Metodo 1 .
• Quindi, aggiungerà un nuovo foglio Conto economico alla fine della cartella di lavoro.

Per saperne di più: Creare una nuova cartella di lavoro e salvare usando VBA in Excel

6. Introdurre più fogli utilizzando il valore delle celle con Excel VBA

Per l'ultimo metodo, aggiungeremo più fogli nella cartella di lavoro con il nome di un intervallo di celle utilizzando Excel VBA Inoltre, chiederemo all'utente di inserire l'intervallo per prendere il nome. Quindi, diamo un'occhiata ai passaggi seguenti.

📌 Passi:

• All'inizio, aprire il codice Modulo come mostrato in Metodo 1 .
• Successivamente, copiare il codice seguente e incollarlo.

 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 

Ripartizione del codice

• In primo luogo, chiamiamo la procedura secondaria Add_Multiple_Sheets_Using_Cell_Value.
• Quindi, definiamo i tipi di variabili.
• Successivamente, si utilizza Casella di input per ottenere la gamma di dati dall'utente.
• In quarto luogo, attiviamo il foglio Rapporto sulle vendite .
• In seguito, si utilizza un Per ogni prossimo per scorrere uno per uno l'intervallo di celle selezionato.
• Successivamente, si utilizza il metodo Aggiungi.Nome per dare un nome al foglio appena creato. Creeremo questi fogli dopo il foglio attivo Rapporto sulle vendite della cartella di lavoro.

• Ora, eseguire il codice come mostrato in Metodo 1 .
• Immediatamente, il Exceldemy si apre la casella di immissione.
• Quindi, dare alle celle del B5:B9 nella scatola.
• Infine, fare clic su OK .

• Infine, inserisce cinque che prendono il nome dai valori delle celle del foglio B5:B9 gamma. Sono tutti dopo il foglio Rapporto sulle vendite .

Conclusione

Questo articolo fornisce soluzioni semplici e brevi per l'aggiunta di fogli con nomi da parte di Excel. VBA Non dimenticate di scaricare il file Pratica Grazie per aver letto questo articolo, speriamo sia stato utile. Se avete domande o suggerimenti, fatecelo sapere nella sezione commenti. Visitate il nostro sito web Exceldemy per saperne di più.