Questo tutorial dimostrerà diversi metodi per creare una nuova cartella di lavoro utilizzando VBA.
Crea nuova cartella di lavoro
Per creare una nuova cartella di lavoro usa semplicemente Cartelle di lavoro.Aggiungi:
1 | Cartelle di lavoro.Aggiungi |
La cartella di lavoro appena aggiunta è ora la Cartella di lavoro attiva.
Puoi vederlo usando questo codice:
123456 | Sub AggiungiWB()Cartelle di lavoro.AggiungiMsgBox ActiveWorkbook.NameFine sottotitolo |
Crea nuova cartella di lavoro e assegna a oggetto
È possibile utilizzare l'oggetto ActiveWorkbook per fare riferimento alla nuova cartella di lavoro. Usando questo, puoi assegnare la nuova cartella di lavoro a una variabile oggetto:
1234 | Dim wb come cartella di lavoroCartelle di lavoro.AggiungiImposta wb = ActiveWorkbook |
Ma è meglio / più facile assegnare la cartella di lavoro immediatamente a una variabile quando viene creata la cartella di lavoro:
123 | Dim wb come cartella di lavoroImposta wb = Cartelle di lavoro.Aggiungi |
Ora puoi fare riferimento alla nuova cartella di lavoro in base al nome della variabile.
1 | MsgBox wb.Nome |
Crea nuova cartella di lavoro e salva
Puoi anche creare una nuova cartella di lavoro e salvarla immediatamente:
1 | Cartelle di lavoro.Add.SaveAs Nome file:="NewWB" |
Ciò salverà la cartella di lavoro come file .xlsx nella cartella predefinita (es. Documenti). Invece, puoi personalizzare SaveAs con la nostra guida al salvataggio delle cartelle di lavoro.
Ora puoi fare riferimento alla cartella di lavoro con il suo nome:
1 | Cartelle di lavoro ("NewWB.xlsx"). Attiva |
Questo codice attiverà "NewWB.xlsx".
Crea nuova cartella di lavoro e aggiungi fogli
Dopo aver creato una cartella di lavoro, puoi modificarla. Ecco solo un esempio per aggiungere due fogli alla nuova cartella di lavoro (supponendo che sia ActiveWorkbook):
1 | ActiveWorkbook.Worksheets.Aggiungi conteggio:=2 |