PrintRanges-Objekt (PowerPoint)

Eine Auflistung aller PrintRange -Objekte in der angegebenen Präsentation. Jedes PrintRange -Objekt stellt einen Bereich von aufeinander folgenden Folien oder Seiten gedruckt werden.

Beispiel

Verwenden Sie die Ranges -Eigenschaft, um der PrintRanges -Auflistung zurückzugeben. Im folgende Beispiel werden alle zuvor definierten Druckbereiche aus der Auflistung der aktiven Präsentation gelöscht.

ActivePresentation.PrintOptions.Ranges.ClearAll

Verwenden Sie die Add -Methode können Sie ein PrintRange -Objekt erstellen und Hinzufügen der PrintRanges -Auflistung. Das folgende Beispiel definiert drei Druckbereiche, die Folie 1, Folie 3 bis 5 sowie Folie 8 und 9 der aktiven Präsentation darstellen und druckt die Folien in diesen Bereichen.

With ActivePresentation.PrintOptions

    .RangeType = ppPrintSlideRange

    With .Ranges

        .ClearAll

        .Add 1, 1

        .Add 3, 5

        .Add 8, 9

    End With

End With

ActivePresentation.PrintOut

Verwenden Sie Ranges (Index), wobei index die Indexnummer des Druckbereichs ist, um ein einzelnes PrintRange-Objekt zurückzugeben. Im folgenden Beispiel wird eine Meldung angezeigt, die der ersten und letzten Folie für Druckbereich 1 der aktiven Präsentation angibt.

With ActivePresentation.PrintOptions.Ranges
    If .Count > 0 Then
        With .Item(1)
            MsgBox "Print range 1 starts on slide " & .Start & _
                " and ends on slide " & .End
        End With
    End If
End With

Siehe auch

PowerPoint-Objektmodellreferenz

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.