Word will open stating the documents name but the document itself will not and that message of updating appears on the statusbar. What is takes into consideration is that the is a file called on the C: Drive and There are form that are in c:\forms\ I want to implement a progress bar for the opening of the formsfranzozola, If it's the Status Bar that is not working, then use: application. Like I said in the previous post, please place "Option Explicit" at the top of the module and click Debug-Hi Malik When you say the screen updating works fine for you, do you mean you don't get a message in the status bar saying Word is updating the fields in this document, the document will not look fully opened but the title of the document will appear at the top.The silly code I presented in the Screen Updating Demonstration just numbers cells. Screen Updating=False are presented below: Ryan Wells is a Nuclear Engineer and professional VBA Developer.He is the lead developer of several VBA products, including Mouse To Macro. Visible = True here; but your code will 'run faster if you don't make it visible 'Open the workbook Set o WB = o XL. Open(File Name:=Workbook To Work On) Set o Sheet = o WB. Everytime it offsets it opens the cell value say c:\forms\travel expenses ; if travel expenses is in the cell. Screen Updating = False Workbook To Work On = "C:\forms\index.xls" 'If Excel is running, get a handle on it; otherwise start a new instance of Excel On Error Resume Next Set o XL = Get Object(, "Excel. Number 0 Then Excel Was Not Running = True Set o XL = New Excel. Screen Updating = False End If On Error Go To Err_Handler 'If you want Excel to be visible, you could add the 'line: o XL. When the macro is called for May2008, May2008 is found in say C5 and offsetting of cells will take place.
The macro is reformatting the document and the Screen keeps updating while the macro is running, which I guess is where word spends most of it's time.
Your screen will show each action your VBA code performs. It’s a good practice to disable screen updating to decrease total run time.
Don’t forget to set your Screen Updating property back to True when you’re done.
When you use the 'New' keyword it's like clicking Start-Microsoft Office Word 2003 If you modified the code like this: Set o Doc = New Word. And you are not updating the o Doc document in your code..do you have it visible, so you wouldn't see it.
Screen Updating = False This is in Shee Print Out() sub procedure. Visible = True You would see that there is an entirely new window.
Range Dim First Address As String Dim Excel Was Not Running As Boolean Dim Workbook To Work On As String Dim Word FN As String Dim Excel FN As String Dim a Col As Integer Dim Ex Fn List As String Application. You might need to create a Word doc called May2008, then go into C:\and put say May2008 in C5, you will also have to create word docs called travel expenses.doc, training in c:\forms.