Deze zelfstudie demonstreert verschillende methoden om een nieuwe werkmap te maken met VBA.
Nieuwe werkmap maken
Om een nieuwe werkmap te maken, gebruik je gewoon Werkmappen.Toevoegen:
1 | Werkmappen.Toevoegen |
De nieuw toegevoegde werkmap is nu de ActiefWerkboek.
U kunt dit zien met behulp van deze code:
123456 | Sub toevoegenWB()Werkmappen.ToevoegenMsgBox ActiveWorkbook.NameEinde sub |
Nieuwe werkmap maken en aan object toewijzen
U kunt het ActiveWorkbook-object gebruiken om naar de nieuwe werkmap te verwijzen. Hiermee kunt u de nieuwe werkmap toewijzen aan een objectvariabele:
1234 | Dim wb als werkboekWerkmappen.ToevoegenStel wb = ActiveWorkbook in |
Maar het is beter/gemakkelijker om de werkmap onmiddellijk toe te wijzen aan een variabele wanneer de werkmap wordt gemaakt:
123 | Dim wb als werkboekStel wb = Werkmappen in.Toevoegen |
Nu kunt u naar de nieuwe werkmap verwijzen met de variabelenaam.
1 | MsgBox wb.Naam |
Nieuwe werkmap maken en opslaan
U kunt ook een nieuwe werkmap maken en deze onmiddellijk opslaan:
1 | Workbooks.Add.SaveAs Filename:="NewWB" |
Hiermee wordt de werkmap opgeslagen als een .xlsx-bestand in uw standaardmap (bijv. Mijn documenten). In plaats daarvan kunt u de SaveAs aanpassen met onze handleiding voor het opslaan van werkmappen.
Nu kunt u naar de werkmap verwijzen met zijn naam:
1 | Werkmappen ("NewWB.xlsx"). Activeren |
Deze code activeert “NewWB.xlsx”.
Nieuwe werkmap maken en bladen toevoegen
Nadat u een werkmap hebt gemaakt, kunt u deze bewerken. Hier is slechts één voorbeeld om twee bladen aan de nieuwe werkmap toe te voegen (ervan uitgaande dat het de ActiveWorkbook is):
1 | ActiveWorkbook.Worksheets.Add Count:=2 |