[mso] Re: Word 2000

  • From: "Dian Chapman" <dian@xxxxxxxxxxxxx>
  • To: <mso@xxxxxxxxxxxxx>
  • Date: Fri, 25 Oct 2002 01:50:08 -0500

Yes, you can modify the PrintPreview code. Click Tools/Macro/Macro.
Check to make sure that the Macro In shows All Active Templates and
Documents. In the Macro Name input box, type this name EXACTLY as I have
below.

FilePrintPreview

Then click Create. You'll go into a Macro code area in the VB Editor
that will have something like the info below already written:


Sub FilePrintPreview()
'
' FilePrintPreview Macro
' Displays full pages as they will be printed
'
  ActiveDocument.PrintPreview

End Sub

You will need to add one line of code after the line written there.
You'll add the view percentage. The total code should NOW look like
this:

Sub FilePrintPreview()
'
' FilePrintPreview Macro
' Displays full pages as they will be printed
'
  ActiveDocument.PrintPreview
  ActiveWindow.ActivePane.View.Zoom.Percentage = 75

End Sub

As long as you typed everything EXACTLY as I told you do write
it...whenever you click PrintPreview...the new macro you wrote with the
same name as the master command for this feature, will be overwritten so
the percentage will be 75%.

If you decide to change this in the future, you can choose this same
FilePrintPreview macro, click Edit and change the percentage to whatever
you want. 

To return the program back to the original format, just delete this
macro. You will NOT delete the master command, as they cannot be
deleted. But you can override all commands by modifying them to what you
want.

And thanks...you've just given me an idea for a tip article for my
Ezine! ;-)


Dian Chapman
Technical Consultant, Instructor,
Microsoft MVP & TechTrax Editor

Word AutoForm/VBA eBook: http://www.mousetrax.com/books.html
Tutorial web site: http://www.mousetrax.com/techpage.html
TechTrax Ezine: http://www.mousetrax.com/techtrax/

-----Original Message-----
From: mso-bounce@xxxxxxxxxxxxx [mailto:mso-bounce@xxxxxxxxxxxxx] On
Behalf Of Stephen Doyle
Sent: Thursday, October 24, 2002 10:33 PM
To: Microsoft Office Freelist
Subject: [mso] Word 2000


Hi Folks,

Is there a way to set the print preview so it always comes up as 75%
rather than 40%

TIA

Cheers

Stephen Doyle
steve@xxxxxxxxxxxxxxx
www.dmsystems.co.nz/mbslc


---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.406 / Virus Database: 229 - Release Date: 21/10/2002

*************************************************************
You are receiving this mail because you subscribed to mso@xxxxxxxxxxxxx
or MicrosoftOffice@xxxxxxxxxxxxxxxx

To send mail to the group, simply address it to mso@xxxxxxxxxxxxx

To Unsubscribe from this group, send an email to 
mso-request@xxxxxxxxxxxxx?Subject=unsubscribe

Or, visit the group's homepage and use the dropdown menu.  This will
also allow you to change your email settings to digest or vacation (no
mail). //www.freelists.org/webpage/mso

To be able to use the files section for sharing files with the group,
send a request to mso-moderators@xxxxxxxxxxxxx and you will be sent an
invitation with instructions.  Once you are a member of the files group,
you can go here to upload/download files:
http://www.smartgroups.com/vault/msofiles
*************************************************************

*************************************************************
You are receiving this mail because you subscribed to mso@xxxxxxxxxxxxx or 
MicrosoftOffice@xxxxxxxxxxxxxxxx

To send mail to the group, simply address it to mso@xxxxxxxxxxxxx

To Unsubscribe from this group, send an email to 
mso-request@xxxxxxxxxxxxx?Subject=unsubscribe

Or, visit the group's homepage and use the dropdown menu.  This will also allow 
you to change your email settings to digest or vacation (no mail).
//www.freelists.org/webpage/mso

To be able to use the files section for sharing files with the group, send a 
request to mso-moderators@xxxxxxxxxxxxx and you will be sent an invitation with 
instructions.  Once you are a member of the files group, you can go here to 
upload/download files:
http://www.smartgroups.com/vault/msofiles
*************************************************************

Other related posts: