Solved

Auto Run Macros

Posted on 2008-10-24
7
749 Views
Last Modified: 2012-05-05
My secretaries at work asked me if there was a way to display the full path of a file in the title bar in Word 2007. I found a macro on this site, that will let me do that.

Sub ChangeCaption()
    ActiveWindow.Caption = ActiveDocument.FullName
End Sub

However, I would like for that macro to start whenever they open any document. I found code somewhere that stated that I needed to add a DocumentSub to my code. I'm a beginner when it comes to coding and macros so I am unsure where to put the code in. If someone could help me by displaying the entire above code with the autorun code included, that would be a tremendous help. Thanks.
0
Comment
Question by:Smp351
  • 4
  • 3
7 Comments
 
LVL 76

Accepted Solution

by:
GrahamSkan earned 500 total points
ID: 22798121
You have a couple of choices.
A sub called AutoOpen in a code module that has been inserted via Insert/Module in the VBA editor menu.

Or you can have one called Document_Open in the ThisDocument module.

To catch all occurrences, the code should be in the Normal template.
0
 

Author Comment

by:Smp351
ID: 22798137
Thank you for the quick response but where do I put that? I really have no experience with coding so I would not know what to do with your suggestions.
0
 
LVL 76

Expert Comment

by:GrahamSkan
ID: 22798404
Open the VBA editor with Alt + F11.

The top left pane will list the open projects. There dhoul alway be one called Normal. If you open this with the + sign next to it and then the Microsoft Word Objects folder, you will see the ThisDocument module. Double click on it to open the code pane on the right.
You will see that the left-hand box has two items -  (General) and Document. Choose Document and it will volunteer the Document_New event and put an empty procedure for it in the code pane. Ignore that and choose the 'Open' event procedure from the right-hand dropdown. You will get a similar empty procedure . You can put your code in there.
You don't generally need to save it, because the Normal template is routinely saved when Word is closed.
0
PRTG Network Monitor: Intuitive Network Monitoring

Network Monitoring is essential to ensure that computer systems and network devices are running. Use PRTG to monitor LANs, servers, websites, applications and devices, bandwidth, virtual environments, remote systems, IoT, and many more. PRTG is easy to set up & use.

 

Author Comment

by:Smp351
ID: 22798665
I did exactly as you said and when I go to open a new document, I get the debugger for Visual Basic. It says Compile Error: Unexpected End Sub. I'll attach a file with what my code looks like. Sorry, I'm just not great with coding.

Visual-Basic.bmp
0
 

Author Comment

by:Smp351
ID: 22798773
Just to state, I know there should be two End Subs at the end. I deleted one by accident. Even when I add the 2nd one back, I still get the error.
0
 
LVL 76

Assisted Solution

by:GrahamSkan
GrahamSkan earned 500 total points
ID: 22798837
It would be better if you just pasted the code.
It is taking ages for your bmp to load.


Remove the Sub ChangeCaption line
0
 

Author Comment

by:Smp351
ID: 22798920
Sorry about that Graham. Removing the sub worked. Thank you guys very much. I really appreciate it.
0

Featured Post

PRTG Network Monitor: Intuitive Network Monitoring

Network Monitoring is essential to ensure that computer systems and network devices are running. Use PRTG to monitor LANs, servers, websites, applications and devices, bandwidth, virtual environments, remote systems, IoT, and many more. PRTG is easy to set up & use.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Preface: When I started this series, I used the term CommandBars because that is the Office Object class that it discusses. Unfortunately, when Microsoft introduced Office 2007, they replaced the standard Commandbar menus with "The Ribbon" and rem…
Using Word 2013, I was experiencing some incredible lag when typing.  Here's what worked for me....
This video teaches the viewer how to align pictures around text while keeping the text properly aligned in the document.
Office 365 is currently available in five editions. Three of them are for business use: Office 365 Business Essentials, Office 365 Business, and Office 365 Business Premium. Two of them are for home/personal use: Office 365 Home and Office 365 Perso…

777 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question