ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Watermarks in Excel (https://www.excelbanter.com/excel-programming/389767-watermarks-excel.html)

Will Fleenor

Watermarks in Excel
 
With MS Word (97-2007) you can place a command (see below) in the header or
footer (Ctrl-F9) that will tell your printer with PostScript drivers to put
a watermark on the page.

Can you issue a PostScript print command in an Excel header or footer? (I
don't think so.)

If not is there any other way (other than VBA code) to send a PostScript
printer command while sending an excel print print request?

Thanks Will

Example of a command that can be placed in the header or footer of a Word
document to place a watermark in each page of the printout.

Print \p page " /Wmark (DRAFT) def /WSize 100 def /Wrot 45 def wp$x wp$right
sub wp$left add 2 div wp$y wp$top sub wp$bottom add 2 div translate Wrot
rotate /Helvetica-BoldOblique findfont WSize scalefont setfont .7 setgray 3
setlinewidth Wmark stringwidth pop 2 div neg WSize .4 mul neg moveto Wmark
true charpath stroke


NickHK

Watermarks in Excel
 
Will,
AFAIK the PS formatting will not work.

Maybe one of these methods as a workaround:
http://www.google.co.uk/search?hl=en...S earch&meta=

My Adobe Acrobat v6 supports adding watermarks to a document. If you
automated the printing of the PDF through its objects, I suppose you can add
the watermark in code - I've never tried.

NickHK

"Will Fleenor" wrote in message
...
With MS Word (97-2007) you can place a command (see below) in the header

or
footer (Ctrl-F9) that will tell your printer with PostScript drivers to

put
a watermark on the page.

Can you issue a PostScript print command in an Excel header or footer? (I
don't think so.)

If not is there any other way (other than VBA code) to send a PostScript
printer command while sending an excel print print request?

Thanks Will

Example of a command that can be placed in the header or footer of a Word
document to place a watermark in each page of the printout.

Print \p page " /Wmark (DRAFT) def /WSize 100 def /Wrot 45 def wp$x

wp$right
sub wp$left add 2 div wp$y wp$top sub wp$bottom add 2 div translate Wrot
rotate /Helvetica-BoldOblique findfont WSize scalefont setfont .7 setgray

3
setlinewidth Wmark stringwidth pop 2 div neg WSize .4 mul neg moveto Wmark
true charpath stroke





All times are GMT +1. The time now is 06:03 AM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com