Runtime Error 438 - What does this mean?
I posted in the word newsgroup as well - hope that is okay.
When tyring to run a macro I get this error: Runtime error "438" on the
following code:
If Dialogs(wdDialogFilePrint).Show_ <> 0 Then Call IncrementNr
I am trying to create a macro that increases a number by one and I have
three macros:
The instructions were place a textbox form field in docu., deactivate
the checkbox that allows users to type in it. Give it a name i.e. docnr
and create the macros. I did all of this but I did not name the textbox
I thought it meant give the document a name and I named it DocNr.
Anyway, when I print I receive the runtime error at the line noted
above. What am I doing wrong?
Sub IncrementNr()
Dim ffld As Word.FormField
Set ffld_ = ActiveDocument.FormFields("DocNr")
ffld.Result = ffld.Result + 1
End Sub
Sub FilePrint()
If Dialogs(wdDialogFilePrint).Show_ <> 0 Then Call IncrementNr
End Sub
Sub FilePrintDefault()
'
' FilePrintDefault Macro
' Prints the active document using the current defaults
'
Call IncrementNr
End Sub
Cathy
