关于打印范围？

jscpj

我想打印 2，3, 5，6页，不打1, 4页

我的代码：activedocument.printout Pages:="2-3" & "," & "5-6"

但是运行宏打印的时候，还是6页全打出来了？

求助代码如何写？

守柔

本示例打印活动窗口中文档的前三页。

ActiveDocument.PrintOut Range:=wdPrintFromTo, From:="1", T="3"

以下内容及部分主要参数供参考：

PrintOut方法可打印指定文档的全部或部分。

对于Application、Document、Window对象：

expression.PrintOut(Background, Append, Range, OutputFileName, From, To, Item, Copies, Pages, PageType, PrintToFile, Collate, FileName, ActivePrinterMacGX, ManualDuplexPrint, PrintZoomColumn, PrintZoomRow, PrintZoomPaperWidth, PrintZoomPaperHeight)

expression 必需。该表达式返回上述对象之一。

Range Variant 类型，可选。该参数表示页面范围。可以是任意 WdPrintOutRange 常量。

wdPrintAllDocument

wdPrintCurrentPage

wdPrintFromTo

wdPrintRangeOfPages

wdPrintSelection

From Variant 类型，可选。如果将 Range 设为 wdPrintFromTo，则该参数指定起始页码。

To Variant 类型，可选。如果将 Range 设为 wdPrintFromTo，则该参数指定结束页码。

Item Variant 类型，可选。该参数代表要打印的项目。可以是任意 WdPrintOutItem 常量。

wdPrintAutoTextEntries

wdPrintComments

wdPrintDocumentContent

wdPrintKeyAssignments

wdPrintProperties

wdPrintStyles

Copies Variant 类型，可选。该参数代表要打印的份数。

Pages Variant 类型，可选。该参数表示要打印的页码和页码范围，以逗号分隔各项。例如，“2, 6-10”表示打印第 2 页和第 6 至 10 页。

Collate Variant 类型，可选。在打印文档的多份副本时，如果该参数值为 True，则完成打印所有页面后再打印下一份副本。

FileName Variant 类型，可选。该参数表示要打印的文档的路径和文件名。如果忽略该参数，Word 将打印活动文档。（仅应用于 Application 对象）

cofe2000

版主你不用睡觉啊，老看见你下半夜回的帖子

守柔

以下是引用cofe2000在2004-10-15 12:40:00的发言： 版主你不用睡觉啊，老看见你下半夜回的帖子

谢谢COFE兄的关心。觉当然得睡了（只是少了一点），只是乘自己还在热情的阶段，多用功，多学习，争取多进步。

在知识方面，勤有益，戏无言；自己才力有限，巧功不足，苦学来补。

如意

楼主，你累不累呀，这么简单的事你却要用VBA来搞，我都觉得累。

在打印设置直接设置方便的不得了，你这样一搞，反到是麻烦了。

cxffxc

楼主，这样可行：

Application.PrintOut Range:=wdPrintRangeOfPages, Pages:="2-3,5-6"

jscpj

实在不好意思，几天没来，感谢大家。我试过了，6楼版主的代码也可以的。其它的可能都是默认的吧。

5楼的兄弟，我之所以这样做，是因为有很多这样的文档得这样来打。所以需要一个这样的一个宏。而且中间的缺的页数有时不一样，需要用代码来判断，不得不用代码。有些事很复杂，但是必要的。