Hinweis
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
Stellt einen einzelnen Bereich von aufeinander folgenden Folien oder Seiten dar, die gedruckt werden sollen.
Hinweise
Das PrintRange -Objekt ist ein Mitglied der PrintRanges -Auflistung. Die PrintRanges -Auflistung enthält alle Druckbereiche, die für die angegebene Präsentation definiert wurden.
Sie können Druckbereiche in der PrintRanges-Auflistung unabhängig von der RangeType-Einstellung festlegen. Diese Bereiche werden beibehalten, solange die Präsentation, in der sie enthalten sind, geladen wird. Die Bereiche in der PrintRanges-Auflistung werden angewendet, wenn die RangeType-Eigenschaft auf ppPrintSlideRange festgelegt ist.
Beispiel
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
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
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.