Luo uusi työkirja

luodaksesi uuden työkirjan yksinkertaisesti käytä työkirjoja.Lisää:

Workbooks.Add

äskettäin lisätty työkirja on nyt ActiveWorkbook.

voit nähdä tämän tällä koodilla:

Sub AddWB()Workbooks.AddMsgBox ActiveWorkbook.NameEnd Sub

Luo uusi työkirja & Määritä objektille

voit käyttää ActiveWorkbook-objektia viittaamaan uuteen työkirjaan. Tämän avulla voit määrittää uuden työkirjan muuttujalle:

Dim wb as WorkbookWorkbooks.AddSet wb = ActiveWorkbook

mutta työkirja on parempi antaa muuttujalle, kun työkirja luodaan:

Dim wb As WorkbookSet wb = Workbooks.Add

nyt voit viitata uuteen työkirjaan sen muuttujan nimellä

MsgBox wb.Name

luo uusi työkirja & tallenna

voit myös luoda uuden työkirjan ja tallentaa sen välittömästi:

Workbooks.Add.SaveAs Filename:="NewWB"

Tämä tallentaa työkirjan an .xlsx-tiedosto oletuskansioon (esim. Omat Dokumentit). Sen sijaan, voit muokata SaveAs meidän opas tallentaa työkirjoja.

Nyt voit viitata työkirjaan sen nimellä:

Workbooks("NewWB.xlsx").Activate

tämä koodi aktivoi ”NewWB.xlsx”.

Luo uusi työkirja & lisää arkkeja

työkirjan luomisen jälkeen voit muokata sitä. Tässä on vain yksi esimerkki kahden levyn lisäämisestä uuteen työkirjaan (olettaen, että kyseessä on ActiveWorkbook):

ActiveWorkbook.Worksheets.Add Count:=2