PageSetup.AvailablePageSizes-Eigenschaft (Publisher)
Gibt die PageSizes-Auflistung zurück, die alle pageSize-Objekte enthält, die in der aktuellen Publikation verfügbar sind.
Syntax
Ausdruck. AvailablePageSizes
Ausdruck Eine Variable, die ein PageSetup-Objekt darstellt.
Rückgabewert
PageSizes
HinwBemerkungeneise
PageSize -Objekte entsprechen den Symbolen unter Leere Seiten im Dialogfeld Seite einrichten auf der Microsoft Publisher-Benutzeroberfläche angezeigt.
Von der AvailablePageSizes -Eigenschaft zurückgegebenen Seitenformate umfassen nicht nur die von Microsoft Publisher Seitenformate, sondern auch benutzerdefinierte Seitenformate, die Sie erstellen oder herunterladen, falls vorhanden.
Wenn Sie benutzerdefinierte Seitenformate hinzufügen oder entfernen, ändert sich ggf. die Indexnummer für alle vorhandenen Seitenformate.
Beispiel
The following Microsoft Visual Basic for Applications (VBA) macro shows how to create a text file that contains the list of all page sizes available in the current publication and their corresponding index numbers. Die Textdatei wird im Ordner Dokumente oder Eigene Dokumente des aktuellen Benutzers gespeichert.
Public Sub AvailablePageSizes_Example()
Dim pubPageSize As Publisher.PageSize
Dim pubPageSizes As Publisher.PageSizes
Dim intCount As Integer
Dim lngPageSizeFile As Long
intCount = 1
Set pubPageSizes = ThisDocument.PageSetup.AvailablePageSizes
lngPageSizeFile = FreeFile
Open Environ("USERPROFILE") + "\My Documents\PageSizeList.txt" For Output Access Write As lngPageSizeFile
For Each pubPageSize In pubPageSizes
Write #lngPageSizeFile, pubPageSize.Name, intCount
intCount = intCount + 1
Next
Close lngPageSizeFile
End Sub
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.
Feedback
https://aka.ms/ContentUserFeedback.
Bald verfügbar: Im Laufe des Jahres 2024 werden wir GitHub-Issues stufenweise als Feedbackmechanismus für Inhalte abbauen und durch ein neues Feedbacksystem ersetzen. Weitere Informationen finden Sie unterFeedback senden und anzeigen für