ClearAll 方法

从 PrintRanges 集合中清除所有打印范围。使用 PrintRanges 集合的 Add 方法向集合添加打印范围。

expression  必选。该表达式返回一个 PrintRange 对象。

示例

本示例清除活动演示文稿中所有以前定义的打印范围；创建新的打印范围，其中包含第一张，第三张到第五张，第八张和第九张幻灯片；打印新定义的幻灯片范围；然后清除新定义的打印范围。

With ActivePresentation.PrintOptions
    .RangeType = ppPrintSlideRange
    With .Ranges
        .ClearAll
        .Add 1, 1
        .Add 3, 5
        .Add 8, 9
        .Parent.Parent.PrintOut
        .ClearAll
    End With
End With