Usa una macro VBA per creare una nuova cartella di lavoro che contenga esattamente tutti i fogli di lavoro di cui hai bisogno
In molte macro devono essere create nuove cartelle di lavoro che, ad esempio, sono riempite con determinati contenuti. Un compito importante qui è creare una nuova cartella di lavoro di Excel che contenga esattamente il numero di fogli di calcolo che desideri.
La seguente macro fa questo lavoro. Crea una nuova cartella di lavoro che contiene fogli di lavoro 31. Questi fogli di lavoro sono numerati da 1 a 31. Ecco i comandi VBA appropriati:
Sub FuegeTabellenEin ()
Dim numero come intero
Dim i As Integer
Dim Mappe come cartella di lavoro
Numero = Application.SheetsInNewWorkbook
Application.SheetsInNewWorkbook = 31
Imposta cartella = Cartelle di lavoro.Aggiungi
Per i = 1 a Mappe.Worksheets.Count
Cartella.Fogli di lavoro (i) .Nome = i
Avanti io
Application.SheetsInNewWorkbook = numero
Fine sottotitolo
All'avvio, Excel visualizza una nuova cartella di lavoro che contiene 31 fogli di lavoro. La figura seguente mostra come appare nel registro dei fogli:
Nella macro, specifichi il numero di fogli di lavoro che desideri utilizzando il numero 31. Modifica questo numero se desideri avere meno o più fogli di lavoro in una cartella di lavoro.
Per inserire la macro, premi ALT F11 in Excel per visualizzare l'editor VBA. Utilizzare il comando INSERT - MODULE per inserire un foglio modulo vuoto. Per avviare la macro direttamente da Excel, utilizzare la combinazione di tasti ALT F8.
