Come creare una nuova cartella di lavoro excel utilizzando vba?

Per creare una nuova cartella di lavoro utilizzando VBA, è necessario utilizzare il metodo “Workbooks.Add” . Quando si utilizza questo metodo, inserisce una nuova cartella di lavoro (senza salvarla) e quindi la attiva. Funziona come quando premi la scorciatoia da tastiera CONTROL + N. Puoi anche utilizzare un modello per inserire una nuova cartella di lavoro.

Crea una nuova cartella di lavoro utilizzando VBA

Assicurati di aggiungere la scheda Sviluppatore alla barra multifunzione per inserire questo codice nel VBE .

1. Digitare la parola chiave “Binders” per fare riferimento all’oggetto raccoglitore.
2. Successivamente, digita un punto.
3. Qui avrai un elenco di proprietà e metodi da selezionare.
4. Seleziona “Aggiungi” da questo elenco o digitalo.

 Sub vba_new_workbook() Workbooks.Add End Sub

Aggiungi una nuova cartella di lavoro utilizzando un modello

Come ho detto, utilizziamo il metodo Workbooks.Add. Con questo metodo è disponibile un argomento (facoltativo) che è possibile utilizzare per fare riferimento a un file come modello.

 Workbook.Add Template (Optional)

Supponiamo che tu abbia una cartella di lavoro e desideri che la nuova cartella di lavoro sia esattamente uguale a quella, puoi chiamarla modello.

 Workbooks.Add Template:="C:UsersDellDesktopbook1.xlsx"

Quando esegui il codice precedente, prende il riferimento a “book1” che viene salvato sul desktop. La cartella di lavoro modello contiene 6 fogli di lavoro e la nuova cartella di lavoro contiene esattamente lo stesso numero di fogli di lavoro.

Oltre a ciò, puoi utilizzare gli argomenti predefiniti per decidere quale tipo di foglio desideri avere nella nuova cartella di lavoro.

1. xlWBATChart : foglio grafico
2. xlWBATExcel4IntlMacroSheet: foglio macro versione 4
3. xlWBATExcel4MacroSheet : foglio macro (internazionale) versione 4
4. xlWBATWorksheet : foglio di calcolo

Crea una nuova cartella di lavoro Excel e salvala

Quando crei una nuova cartella di lavoro, Excel la apre ma non la salva con il metodo Aggiungi. Quindi per questo è necessario utilizzare il metodo SaveAs.

 Sub vba_create_workbook() Workbooks.Add ActiveWorkbook.SaveAs "C:usersdelldesktopmyBook.xlsx" End Sub

1. Innanzitutto, utilizza workbook.add per creare una nuova cartella di lavoro.
2. Quindi, fare riferimento alla cartella di lavoro attiva e utilizzare il metodo SaveAs.
3. Nel metodo SaveAs utilizzare il percorso in cui si desidera salvare la cartella di lavoro con il nome del file.
4. Alla fine esegui il codice .