Avoiding FillIn field in a Word 2000 document wile opening

I

Ingo Hoffmann

Hi,

I have a little application in wich I open word files with the word
object and print them to a given printer automaticaly. So far anything
work fine.

But some documents have field functions like {FILLIN "HELLO WORLD"/o}.
Everytime I open a doc with a fillin field I become a inputbox and my
application is waiting until the inputbox is answerd.

Is there a possibility to avoid the inputbox? I need something like a
'SilentMode' property or anything else.

Regards

Ingo Hoffmann


enclosed my current code
**********************************************

Dim WD As Object
Set WD = CreateObject("Word.Application")

If Err = 0 Then

AddLog Log, " Word Objekt OK"
If WD.Version > gcOffice97 Then
'gibts nicht in Office97
WD.FeatureInstall = 0 'msoFeatureInstallNone
End If

WD.DisplayAlerts = 0

WD.Documents.Open Filename:=FN, _
ConfirmConversions:=False, _
ReadOnly:=True, _
AddToRecentFiles:=False, _
Format:="wdOpenFormatAuto", _
PasswordDocument:="xxxxx"

If Err = 5408 Then

AddLog " Das Passwortgeschützte Dokument kann nicht geladen
werden. Fehler : " & Err.Description & "(" & Err.Number & ")"

Else
If WD.Version > gcOffice97 Then
'gibts in office97 nicht...
WD.Visible = False
End If

WD.Application.PrintOut Filename:=FN_Source, Background:=False

End If

WD.ActiveDocument.Saved = True

WD.ActiveDocument.Close False

WD.Quit
End If

**********************************************
 
P

Peter Hewett

Hi Ingo Hoffmann

Change this line of code:
WD.Documents.Open Filename:=FN, _

to:
WD.WordBasic.DisableAutoMacros True
WD.Documents.Open Filename:=FN, _

HTH + Cheers - Peter
 
C

Charles Kenyon

The problem may be that you have your print options set to update fields
when printing. This will update Fill-In fields and give you the pop-up.
--

Charles Kenyon

See the MVP FAQ: <URL: http://www.mvps.org/word/> which is awesome!
--------- --------- --------- --------- --------- ---------
This message is posted to a newsgroup. Please post replies
and questions to the newsgroup so that others can learn
from my ignorance and your wisdom.
 
P

Peter Hewett

Hi Peter Hewett

Sorry, please ignore this advice! It was a very late nigh and I completely
misread your post! My apologies if you wasted time pursuing this bum lead!

Cheers - Peter

Hi Ingo Hoffmann

Change this line of code:
WD.Documents.Open Filename:=FN, _

to:
WD.WordBasic.DisableAutoMacros True
WD.Documents.Open Filename:=FN, _

HTH + Cheers - Peter

HTH + Cheers - Peter
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top