This article has been archived. It is offered "as is" and will no longer be updated.
For a Microsoft Word 2000 version of this article, see 817432.
When you use the Show or Run methods to programmatically display the Print dialog box (wdDialogFilePrint), and you then change the pages per sheet setting, the change may be ignored, and one page per sheet is always printed. However, this symptom does not occur if you use the Print command on the File menu to manually show the dialog box.
This problem may occur if you use one of the following samples of Microsoft Visual Basic for Applications macros:
Sub TestPrint() Application.Dialogs(wdDialogFilePrint).ShowEnd Sub
Sub TestPrint() Application.Dialogs(wdDialogFilePrint).ExecuteEnd Sub
Service Pack Information
This problem is corrected in Office XP Service Pack 3.To resolve this problem, obtain the latest service pack for Microsoft Office XP. For additional information, click the following article number to view the article in the Microsoft Knowledge Base:
307841 How to obtain the latest Office XP Service Pack
A supported hotfix is available from Microsoft. However, this hotfix is intended to correct only the problem that is described in this article. Apply this hotfix only to systems that are experiencing this specific problem.
If the hotfix is available for download, there is a "Hotfix download available" section at the top of this Knowledge Base article. If this section does not appear, submit a request to Microsoft Customer Service and Support to obtain the hotfix.
Note If additional issues occur or if any troubleshooting is required, you might have to create a separate service request. The usual support costs will apply to additional support questions and issues that do not qualify for this specific hotfix. For a complete list of Microsoft Customer Service and Support telephone numbers or to create a separate service request, visit the following Microsoft Web site:
Note The "Hotfix download available" form displays the languages for which the hotfix is available. If you do not see your language, it is because a hotfix is not available for that language.
The global version of this fix should have the following file attributes or later:
Date Time Size File name -------------------------------------------- 10-Apr-2003 15:04 3,018,496 Winwordop.msp (Client Update) 10-Apr-2003 16:12 8,299,864 Winwordff.msp (Full File Update)
After the hotfix is installed, the global version of this fix will have the file attributes (or later) that are listed in the following table. The dates and times for these files are listed in coordinated universal time (UTC). When you view the file information, it is converted to local time. To find the difference between UTC and local time, use the Time Zone tab in the Date and Time tool in Control Panel.
Date Time Version Size File name -------------------------------------------------------- 10-Apr-2003 07:32 10.0.5208.0 10,603,080 Winword.exe
This fix is a post-Office XP Service Pack 2 (SP-2) fix. To install the fix, you must have Office XP SP-2 installed. For additional information about Office XP SP-2, click the following article number to see the article in the Microsoft Knowledge Base:
325671 OFFXP: Overview of the Office XP Service Pack 2
Additionally, you may have to install Windows Installer 2.0 to install this fix. For additional information about the Windows Installer requirement for post-Office XP SP-2 fixes, click the following article number to see the article in the Microsoft Knowledge Base:
330537 OFFXP: Office XP Updates and Patches Released After September 2002 May Require Windows Installer 2.0
Microsoft provides programming examples for illustration only, without warranty either expressed or implied, including, but not limited to, the implied warranties of merchantability and/or fitness for a particular purpose. This article assumes that you are familiar with the programming language being demonstrated and the tools used to create and debug procedures. Microsoft support professionals can help explain the functionality of a particular procedure, but they will not modify these examples to provide added functionality or construct procedures to meet your specific needs. If you have limited programming experience, you may want to contact a Microsoft Certified Partner or Microsoft Advisory Services. For more information, visit these Microsoft Web sites:
Sub TestPrint() Application.CommandBars("Menu Bar") _ .Controls("&File").Controls("&Print...").ExecuteEnd Sub
Microsoft has confirmed that this is a problem in the Microsoft products that are listed at the beginning of this article. This problem was first corrected in Office XP Service Pack 3.