This post may contain affiliate links. Please read my disclosure for more info. Power Query Course

Workbook VBA properties and actions

VBA Code Snippets

Working with workbooks is one of the most common actions when writing VBA code.  The following is a reference guide to for finding the right syntax.

Contents:

Referencing workbooks by name

'Reference a workbook by name
Workbooks("WorkbookName.xlsx").[other properties/actions]

Referencing workbooks by their status

'Reference the workbook in which the VBA code is
ThisWorkbook.[other properties/actions]

'Reference the active workbook
ActiveWorkbook.[other properties/actions]

Referencing workbooks by when they were opened

'Referencing the first workbook opened
Workbooks(1).[other properties/actions]

'Referencing the second workbook opened
Workbooks(2).[other properties/actions]

'Referencing the last workbook opened
Workbooks(Workbooks.Count).[other properties/actions]

Assign a workbook to a variable

'Assign a workbook to a variable
Dim Wk as Workbook
Set Wk = Workbooks("WorkbookName.xlsx")

Create new workbooks

'Create a new workbook
Workbooks.Add

'Assign a new workbook to a variable
Dim Wk as Workbook
Set Wk = Workbooks.Add

Opening workbooks

'Open a workbook
Workbooks.Open ("C:\FilePath\WorkbookName.xlsx")

'Open a workbook as read-only
Workbooks.Open ("C:\FilePath\WorkbookName.xlsx", ReadOnly:=True)

Counting the open workbooks

'Counting the open workbooks
Workbooks.Count

Saving workbooks

'Save a workbook
Workbooks("WorkbookName.xlsx").Save

'Save a workbook with a new name
Workbooks("WorkbookName.xlsx").SaveAs "C:\FilePath\NewWorkbookName.xlsx"

'Save a copy of the workbook
Workbooks("WorkbookName.xlsx").SaveCopyAs "C:\FilePath\NewWorkbookName.xlsx"

Protect & Unprotect workbooks

'Protect workbook without password
Workbooks("WorkbookName.xlsx").Protect

'Unprotect workbook without password
Workbooks("WorkbookName.xlsx").Unprotect

'Protect workbook with password
Workbooks("WorkbookName.xlsx").Protect "Password"

'Unprotect workbook with password
Workbooks("WorkbookName.xlsx").Unprotect "Password"

Closing workbooks

'Close without saving changes
Workbooks("WorkbookName.xlsx").Close False

'Close and save changes
Workbooks("WorkbookName.xlsx").Close True

Using the active workbook

'Activate a workbook
Workbooks("WorkbookName.xlsx").Activate

Save



Want to Learn VBA & Macros?

If you want to automate Excel and save time, my recommended resouces for learning VBA Macros are:

2 thoughts on “Workbook VBA properties and actions

  1. Francis says:

    All the codes are helpful and provided description that are easily to understand. but, my concern is can you provide a specific location where should i put the block of codes. for example, this block of codes put it in module then this one for form load, and then this one is for workbook, etc. I’m frustrated to run the system because there are to many errors occurred. Please, I hope my suggestion will be accepted. Thank you more power.!

    • Excel Off The Grid says:

      Thank you for the feedback Francis. I will take this on board and include it as part of the next full site maintenance.

Leave a Reply

Your email address will not be published. Required fields are marked *