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 |
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