Auto run Macro on Startup Conflict

[Josh_Johnson]

This is my first time posting on the forum, so I want to go ahead and thank you all for the support that you have given me so far.

I am very new to VBA & Macros, so if my question seems silly, I apologize. I have tried researching this, but I cannot find an answer.


Here is what I have: I am creating a workbook with numerous sheets on it that will be saved on a public drive. Whenever a user opens the workbook I want the "Table of Contents" worksheet to come up. I coded this like:


Private Sub Workbook Open()
Worksheets ("Table of Contents").Activate
End Sub


This works fine, but what I also want is for a Msg box to come up whenever they open the Workbook as well. I had this coded as:

Private Sub Workbook Open()
Msgbox ("Content")
End Sub

This gave me an error because of them having the same name, so i tried changing to

Private Sub Workbook Auto Open()
Msgbox ("Content")
End Sub

This still did not work.

I can make one or the other work, but never both. What do I need to do?

Thanks,

VBA NEWB

 

[Joe4]

Welcome to the Board!

Just place both sections of code in the same procedure, i.e.

[COLOR=#333333]Private Sub Workbook Open()[/COLOR]
[COLOR=#333333]    Worksheets ("Table of Contents").Activate
[/COLOR][COLOR=#333333]    Msgbox ("Content")[/COLOR]
[COLOR=#333333]End Sub[/COLOR]

Note that you cannot change the name of event procedures. They MUST be named in a certain way for them to work, and you cannot have two procedures in the same module with the same name.

 

[Josh_Johnson]

That worked perfect. Thank you very much.

 

[Joe4]

You are welcome!