Objet PrintRanges (PowerPoint)
Collection de tous les objets PrintRange dans la présentation spécifiée. Chaque objet PrintRange représente une étendue de diapositives ou de pages consécutives à imprimer.
Exemple
Utilisez la propriété Rangespour renvoyer la collection PrintRanges . L’exemple suivant montre comment supprimer de la collection toutes les étendues d’impression préalablement définies dans la présentation active.
ActivePresentation.PrintOptions.Ranges.ClearAll
Utilisez la méthode Addpour créer un objet PrintRange et l’ajouter à la collection PrintRanges . L’exemple suivant montre comment définir trois étendues d’impression représentant respectivement les diapositives 1, 3 à 5, 8 et 9 dans la présentation active, et imprimer les diapositives qu’elles contiennent.
With ActivePresentation.PrintOptions
.RangeType = ppPrintSlideRange
With .Ranges
.ClearAll
.Add 1, 1
.Add 3, 5
.Add 8, 9
End With
End With
ActivePresentation.PrintOut
Utilisez Ranges (index), où index est le numéro d’index de plage d’impression, pour renvoyer un seul objet PrintRange . L’exemple suivant montre comment afficher un message indiquant les numéros de la première et de la dernière diapositive de l’étendue d’impression un de la présentation active.
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
Voir aussi
Référence du modèle objet PowerPoint
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.
Commentaires
https://aka.ms/ContentUserFeedback.
Bientôt disponible : Tout au long de 2024, nous allons supprimer progressivement GitHub Issues comme mécanisme de commentaires pour le contenu et le remplacer par un nouveau système de commentaires. Pour plus d’informations, consultezEnvoyer et afficher des commentaires pour