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.

Running a Procedure when a Workbook is Opened

Written by Allen Wyatt (last updated May 6, 2023)
This tip applies to Excel 97, 2000, 2002, and 2003


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..."
        UpdateYesterday
        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.

Note:

If you would like to know how to use the macros described on this page (or on any other page on the ExcelTips sites), I've prepared a special page that includes helpful information. Click here to open that special page in a new browser tab.

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.

Author Bio

Allen Wyatt

With more than 50 non-fiction books and numerous magazine articles to his credit, Allen Wyatt is an internationally recognized author. He is president of Sharon Parq Associates, a computer and publishing services company. ...

MORE FROM ALLEN

How Word Handles Abbreviations

Abbreviations appear all over the place in our society. If you want to understand how Word recognizes them (which it has ...

Discover More

Worksheet Events

You can create macros that are automatically executed whenever certain events occur within a worksheet. This tip details ...

Discover More

Passing Custom Caption Labels from a Template to a Document Based on the Template

Caption labels can be useful when you are adding document elements such as tables and figures. Word allows you to create ...

Discover More

Solve Real Business Problems Master business modeling and analysis techniques with Excel and transform data into bottom-line results. This hands-on, scenario-focused guide shows you how to use the latest Excel tools to integrate data from multiple tables. Check out Microsoft Excel 2013 Data Analysis and Business Modeling today!

More ExcelTips (menu)

Adding Leading Zeroes to ZIP Codes

Import a bunch of ZIP Codes into Excel, and you may be surprised that any leading zeroes disappear. Here's a handy little ...

Discover More

Positioning a Column on the Screen

If you have static columns and dynamic columns on the screen, you may want the dynamic columns to always show a ...

Discover More

Expiration Date for Excel Programs

If you use Excel to create a macro-based application, you may want to make sure that your programs cease working after a ...

Discover More
Subscribe

FREE SERVICE: Get tips like this every week in ExcelTips, a free productivity newsletter. Enter your address and click "Subscribe."

View most recent newsletter.

Comments

If you would like to add an image to your comment (not an avatar, but an image to help in making the point of your comment), include the characters [{fig}] (all 7 characters, in the sequence shown) in your comment text. You’ll be prompted to upload your image when you submit the comment. Maximum image size is 6Mpixels. Images larger than 600px wide or 1000px tall will be reduced. Up to three images may be included in a comment. All images are subject to review. Commenting privileges may be curtailed if inappropriate images are posted.

What is two more than 7?

There are currently no comments for this tip. (Be the first to leave your comment—just use the simple form above!)


This Site

Got a version of Excel that uses the menu interface (Excel 97, Excel 2000, Excel 2002, or Excel 2003)? This site is for you! If you use a later version of Excel, visit our ExcelTips site focusing on the ribbon interface.

Newest Tips
Subscribe

FREE SERVICE: Get tips like this every week in ExcelTips, a free productivity newsletter. Enter your address and click "Subscribe."

(Your e-mail address is not shared with anyone, ever.)

View the most recent newsletter.