Grouping Workbooks

[scanavan]

Does anyone know if it is possible to group workbooks. The idea being that if one particular workbook is opened several other defined workbooks automatically open.

Thanks

Stephen

 

[stanleydgromjr]

scanavan,

With the Master workbook (first workbook) open, you could record a macro to do this.

Click on Tools, Macro, Record New Macro...

In the 'Record Macro' box:
Within the 'Macro name:' box, enter the name of the macro 'OpenTwoWorkbooks'
Within the 'Store macro in:' box, make sure it says 'This Workbook'
And, click on the 'OK' button

Click on File, Open, and search/browse for the first file, and double click on it.

Click on File, Open, and search/browse for the second file, and double click on it.

Then click on the 'Stop Macro' button.

Press and hold down the 'Alt' key, and press the 'F11' key, to open the VBA Editor.

On the left side of the screen, click on and expand the link/levels for your Master File.

Click on this 'ThisWorkbook':
Change 'General' to 'Workbook', and it shoud fill in 'Workbook_Open'

In 'Module1', copy the code above the 'End Sub' and below the last apostrophie:

Sub OpenTwoWorkbooks()
'
' OpenTwoWorkbooks Macro
' Macro recorded 7/28/2007 by Stanley D. Grom, Jr.
'

'
    Workbooks.Open Filename:= _
        "C:\Users\sgrom001\Documents\Excel2003\TEST\One Workbook.xls"
    Workbooks.Open Filename:= _
        "C:\Users\sgrom001\Documents\Excel2003\TEST\Two Workbook.xls"
End Sub

And paste the code into the 'Workbook_Open":

Private Sub Workbook_Open()

    Workbooks.Open Filename:= _
        "C:\Users\sgrom001\Documents\Excel2003\TEST\One Workbook.xls"
    Workbooks.Open Filename:= _
        "C:\Users\sgrom001\Documents\Excel2003\TEST\Two Workbook.xls"

End Sub

Press and hold down the 'Alt' key, and press the 'F11' key, to close the VBA Editor.

Save the Master file, and close it.

Close the two files you just opened.

Open the Master file, and the other two files should open.

Have a great day,
Stan