preventing background images from printing in word 2000

[iammark]

I am designing a template that uses a specific form. As an aid to the users, I have set a graphic of the form as a watermark in the word document. Since the actual form already contains all the graphics and images that are displayed in the watermark, I do not want this image to actually print--just the text portions of the document. Is there a way to do this with VBA? Thanks all.

 

[Automaton]

I'm wondering...

with one of your completed forms:

1. start recording a macro
2. CTRL + A to select all
3. CTRL + C to copy to the clippy
4. click the NEW icon
5. CTRL + V to paste
6. CTRL + P to print
7. close 'new' document
8. stop recording macro.

Run macro for every completed form. Would that work, or does your watermark appear on all new (step 4) documents?
Perhaps you lose your formatting? I wonder.

 

[iammark]

no. I was thinking of something more like:

thisdocument.image1.enabled=false

and set this code to activate when the user selects print.

this example does not work of course, but there HAS to be something like that available doesn't there?

 

[RobBroekhuis]

How is the watermark inserted into the Word document?
Rob

 

[iammark]

insert picture from file formatted as watermark. This is just the way I did it, not the way it HAS to be done. I've tried the options under print to deselect drawing objects and to print to forms (text only). With these options checked (or unchecked) it prints nothing. I get all or nothing. I saw another recent post on here from Oldtech who was having the exact same problem. This should not be so difficult. any job is 10% work and 90% presentation. 90% of the work I've on this job has been just to make it presentable. I can submit a blank page with a bunch of text on it and it will be acceptable. However, it is not acceptable to me and I simply do not understand why this has to be so difficult.

 

[RobBroekhuis]

Mark,
Have you tried the simplest approach - removing the background image, printing, then restoring?
Assuming you've given your image the name "WaterMark", the following sequence works:

activedocument.Shapes("BookMark&quot.select
selection.Cut
activedocument.PrintOut
selection.Paste

Rob