Utwórz nowy skoroszyt

aby utworzyć nowy skoroszyt, po prostu użyj skoroszytów.Dodaj:

Workbooks.Add

nowo dodany skoroszyt jest teraz ActiveWorkbook.

możesz to zobaczyć za pomocą tego kodu:

Sub AddWB()Workbooks.AddMsgBox ActiveWorkbook.NameEnd Sub

Utwórz nowy skoroszyt& przypisanie do obiektu

możesz użyć obiektu ActiveWorkbook, aby odnieść się do nowego skoroszytu. Korzystając z tego, możesz przypisać nowy skoroszyt do zmiennej:

Dim wb as WorkbookWorkbooks.AddSet wb = ActiveWorkbook

ale lepiej przypisać skoroszyt do zmiennej, gdy skoroszyt jest tworzony:

Dim wb As WorkbookSet wb = Workbooks.Add

teraz możesz odwołać się do nowego skoroszytu przez jego nazwę zmiennej

MsgBox wb.Name

utwórz nowy skoroszyt& Zapisz

Możesz również utworzyć nowy skoroszyt i natychmiast go zapisać:

Workbooks.Add.SaveAs Filename:="NewWB"

spowoduje to zapisanie skoroszytu jako .plik xlsx do domyślnego folderu (np. Moje Dokumenty). Zamiast tego możesz dostosować SaveAs za pomocą naszego przewodnika po zapisywaniu skoroszytów.

teraz możesz odwołać się do skoroszytu po jego nazwie:

Workbooks("NewWB.xlsx").Activate

ten kod aktywuje „NewWB.xlsx”.

Utwórz nowy skoroszyt& Dodaj Arkusze

Po utworzeniu skoroszytu możesz go edytować. Oto tylko jeden przykład, aby dodać dwa arkusze do nowego skoroszytu (zakładając, że jest to ActiveWorkbook):

ActiveWorkbook.Worksheets.Add Count:=2