Thanks Dian, Works a treat. Cheers Stephen Doyle steve@xxxxxxxxxxxxxxx ----- Original Message ----- From: "Dian Chapman" <dian@xxxxxxxxxxxxx> To: <mso@xxxxxxxxxxxxx> Sent: Friday, October 25, 2002 7:50 PM Subject: [mso] Re: Word 2000 > > 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 > ************************************************************* > --- 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 *************************************************************