Excel kent enerzijds een Workbooks object of collectie en anderzijds een Workbook object. Enkele voorbeelden; klik op de driehoek om de oplossing te zien!

Druk het aantal geopende mappen af. Dit is een eigenschap van het Workbooks object.

Sub voorbeeld1()
    Dim aantal As Byte
    aantal = Application.Workbooks.Count
    MsgBox "aantal mappen: " & aantal
End Sub

Druk de naam af van het actieve werkboek.

Sub voorbeeld2()
    MsgBox Application.ActiveWorkbook.Name
End Sub

Maak een nieuwe werkmap aan en bewaar deze onder de naam test.xls in de temp-folder van de c-schijf.

  Sub bijvoegen_en_bewaren()
    Dim w As Workbook
    Set w = Application.Workbooks.Add
    w.SaveAs "c:\temp\test.xls"
  End Sub

Schakel over naar de map test.xls, terwijl een andere map actief is.

  Sub overschakelen()
    Application.Workbooks("test.xls").Activate
  End Sub

Sluit de actieve map, waarbij de macro vraagt of eventuele veranderingen moeten bewaard worden.

Sub sluiten()
  Application.ActiveWorkbook.Close (True)
End Sub

Druk de naam en de plaats af waar een werkboek is opgeslagen; bv. c:\test\Book1.xls.

Sub afdrukkenNaam_plaats()
  MsgBox Application.ActiveWorkbook.FullName
End Sub

Druk de namen af van alle geopende mappen in Excel.

Sub alleNamen()
   Dim aantal As Byte, tel As Byte
   aantal = Application.Workbooks.Count
   tel = 1
   Do While tel <= aantal
        MsgBox Application.Workbooks(tel).Name
        tel = tel + 1
    Loop
End Sub
    

Het Workbooks object is een referentie naar alle geopende werkboeken. U kunt een werkboek benaderen aan de hand van een index zoals in Application.Workbooks(1); wat een referentie is naar het eerste geopende werkboek of aan de hand van een naam zoals in Application.WorkBooks("mijnWerkmap.xls").

Het Workbook object telt vele eigenschappen en methoden. Enkele belangrijke zijn:

• Eigenschappen: ActiveChart, ActiveSheet, Application, Fullname, Name, Names, Sheets, Windows, Worksheets
• Methoden: Activate, NewWindow, PrintOut, PrintPreview, Protect, Save, SaveAs