Application screenupdating not working

[VBA] Sub Update Story Ranges(Current Doc As Document) 'Loop to update the main body of the document Application. Story Ranges 'Update the all the Form Fields o Story. Just to confirm i am working in office 2003 and currently not running in debug mode. Screen Updating = True End Sub Sub Sheet Print Out() Dim a Doc As Document Dim b Doc As Document Dim o XL2 As Excel. o Story is a range of values for updating the formfields in a document Please view code, What happens is Update() is called at the beginning, it asks to input a title, the title is updated for the formfields in the current document ie. What happens next is that Call Sheet Print Out is called which takes the current document file name, searches an excel spreadsheet for the document file name value, then offsets and creates a list called forms of the offsetted value Ex FNList. Once the forms are opened the formfields are then updated and the forms are printed off. [VBA] Sub Update() Dim Title As String Dim frm Title As User Form1 Dim o Story As Range Application. Screen Updating = FALSE at the begininnig and turn it back on at the end but it still making the screen show everything can anyone help. Open Filename:= _ "P: OFFICERisk OPTIONSOptions Control Function Risk Analysis emplate euribor risk module.xls" Windows("Euribor risk module.xls"). When my macro runs i get a message Word is updating the field codes in the document. Then place the names of travel expenses in say D5 and training expenses in F5.

On Time Now Time Serial(0, 0, 10), "Clear Status Bar" Set a Doc = Active Document 'Word document name open (a Doc) is declared as Word Fn Word FN = Left(a Doc. Name) - 4) 'Open contains a match for Word Fn 'Application. These are also the names of work docs found in c:\forms\travel expenses.doc, c:\forms\training expenses. These are also the names of work docs found in c:\forms\travel expenses.doc, c:\forms\training expenses. Column D, E, F etc are the names of forms say D5- travel expenses, training expenses, end of quarterly expenses etc.o Story is a range of values for updating the formfields in a document Please view code, What happens is Update() is called at the beginning, it asks to input a title, the title is updated for the formfields in the current document ie. What happens next is that Call Sheet Print Out is called which takes the current document file name, searches an excel spreadsheet for the document file name value, then offsets and creates a list called forms of the offsetted value Ex FNList. Once the forms are opened the formfields are then updated and the forms are printed off. Sub Update() Dim Title As String Dim frm Title As User Form1 Dim o Story As Range Application. 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.

These forms are then opened in word like so Set b Doc = Documents. What happens though is that the screenupdating works for the excel part, it then when it gets to word for opening the forms, shows opening the forms and a message appears on the status bar, stating word is updating fields in the current document. Screen Updating = False Set frm Title = New User Form1 With frm Title .

Please or register to post comments
If spammers comment on your content, only you can see and manage such comments Delete all

Application screenupdating not working introduction

Application screenupdating not working

Recent posts

16-Sep-2018 21:39
17-Sep-2018 04:47
17-Sep-2018 08:27
17-Sep-2018 11:47
17-Sep-2018 17:55