Excel.Tips.Net ExcelTips (Menu Interface)

Running a Procedure when a Workbook is Opened

Please Note: This article is written for users of the following Microsoft Excel versions: 97, 2000, 2002, and 2003. If you are using a later version (Excel 2007 or later), this tip may not work for you. For a version of this tip written specifically for later versions of Excel, click here: Running a Procedure when a Workbook is Opened.

You can cause Excel to run a procedure automatically whenever a particular workbook is opened. For instance, when the workbook is opened, you might want to run a procedure that asks the users if they want to perform some task, such as saving the previous day's data to another file.

In order to run a procedure automatically when a workbook is opened, all you need to do is name the procedure Auto_Open(). Thus, the following procedure will be run automatically whenever the workbook containing it is opened:

Sub Auto_Open()
    Dim strMsg As String
    Dim intBoxType As Integer
    Dim strTitle As String
    Dim intUpdate As Integer
    Dim strDefault As String
    Dim strOldFile As String
    Dim intStatusState As Integer

    strMsg = "Do you want to save yesterday's transactions?"
    intBoxType = vbYesNo + vbQuestion
    strTitle = "Automatic Backup Routine"
    intUpdate = MsgBox(Msg, BoxType, Title)
    If intUpdate = vbYes Then
        strMsg = "Which filename would you like use?"
        strDefault = "OLD.DAT"
        strOldFile = InputBox(strMsg, strTitle, strDefault)
        intStatusState = Application.DisplayStatusBar
        Application.DisplayStatusBar = True
        Application.StatusBar = "Updating past months..."
        Application.StatusBar = False
        Application.DisplayStatusBar = intStatusState
    End If
End Sub

(Remember that this procedure is an example; it won't run properly on your system because it calls a function called UpdateYesterday, which does the actual updating.)

This macro runs automatically whenever the workbook to which it is attached is opened. You could also modify the code and place it within the ThisWorkbook object simply by changing the first line to this:

Private Sub Workbook_Open()

Many people consider using Auto_Open as the "old way" of this type of macro and Workbook_Open as the "new way." In a sense that is true; the Workbook_Open method is a more object-oriented approach to this type of macro than is Auto_Open. In practice, however, there is very little difference between the two.

ExcelTips is your source for cost-effective Microsoft Excel training. This tip (2289) applies to Microsoft Excel 97, 2000, 2002, and 2003. You can find a version of this tip for the ribbon interface of Excel (Excel 2007 and later) here: Running a Procedure when a Workbook is Opened.

Related Tips:

Save Time and Supercharge Excel! Automate virtually any routine task and save yourself hours, days, maybe even weeks. Then, learn how to make Excel do things you thought were simply impossible! Mastering advanced Excel macros has never been easier. Check out Excel 2010 VBA and Macros today!


Leave your own comment:

  Notify me about new comments ONLY FOR THIS TIP
Notify me about new comments ANYWHERE ON THIS SITE
Hide my email address
*What is 5+3 (To prevent automated submissions and spam.)
           Commenting Terms

Comments for this tip:

Greg B    26 Apr 2014, 08:55
On your line item:
intUpdate = MsgBox(Msg, BoxType, Title)

Msg, BoxType Title are never defined.

Should you not have used
strMsg intBoxType strTitle?

Our Company

Sharon Parq Associates, Inc.

About Tips.Net

Contact Us


Advertise with Us

Our Privacy Policy

Our Sites


Beauty and Style




DriveTips (Google Drive)

ExcelTips (Excel 97–2003)

ExcelTips (Excel 2007–2016)



Home Improvement

Money and Finances


Pests and Bugs

Pets and Animals

WindowsTips (Microsoft Windows)

WordTips (Word 97–2003)

WordTips (Word 2007–2016)

Our Products

Helpful E-books

Newsletter Archives


Excel Products

Word Products

Our Authors

Author Index

Write for Tips.Net

Copyright © 2016 Sharon Parq Associates, Inc.