Document-Objekt (Publisher)
Stellt eine Publikation dar.
HinwBemerkungeneise
Verwenden Sie die ActiveDocument -Eigenschaft, um auf die aktuelle Publikation zu verweisen.
Beispiel
In diesem Beispiel wird der ersten Seite der aktiven Publikation eine Tabelle hinzugefügt.
Sub NewTable()
With ActiveDocument.Pages(1).Shapes
.AddTable NumRows:=3, NumColumns:=3, Left:=72, Top:=300, _
Width:=488, Height:=36
With .Item(1).Table.Rows(1)
.Cells(1).TextRange.Text = "Column1"
.Cells(2).TextRange.Text = "Column2"
.Cells(3).TextRange.Text = "Column3"
End With
End With
End Sub
Sie können auch die vorherige Routine schreiben, indem Sie einen Verweis auf das ThisDocument-Modul verwenden. Dieses Beispiel verwendet einen ThisDocument -Verweis anstelle von ActiveDocument.
Sub PrintPublication()
With ThisDocument.Pages(1).Shapes
.AddTable NumRows:=3, NumColumns:=3, Left:=72, Top:=300, _
Width:=488, Height:=36
With .Item(1).Table.Rows(1)
.Cells(1).TextRange.Text = "Column1"
.Cells(2).TextRange.Text = "Column2"
.Cells(3).TextRange.Text = "Column3"
End With
End With
End Sub
Veranstaltungen
Methoden
- BeginCustomUndoAction
- ChangeDocument
- Close
- ConvertPublicationType
- EndCustomUndoAction
- ExportAsFixedFormat
- FindShapeByWizardTag
- FindShapesByTag
- PrintOutEx
- Wiederholen
- Save
- SaveAs
- SetBusinessInformation
- Undo
- UndoClear
- UpdateOLEObjects
- WebPagePreview
Eigenschaften
- ActiveView
- ActiveWindow
- AdvancedPrintOptions
- Anwendung
- AvailableBuildingBlocks
- BorderArts
- ColorScheme
- DefaultTabStop
- DocumentDirection
- EnvelopeVisible
- Suchen
- FullName
- IsDataSourceConnected
- IsWizard
- LayoutGuides
- MailEnvelope
- MailMerge
- MasterPages
- Name
- Pages
- PageSetup
- Parent
- Path
- PrintPageBackgrounds
- PrintStyle
- PublicationType
- ReadOnly
- RedoActionsAvailable
- RemovePersonalInformation
- Saved
- SaveFormat
- ScratchArea
- Sections
- Selection
- Erfolgsgeschichten
- SurplusShapes
- Tags
- TextStyles
- UndoActionsAvailable
- ViewBoundaries
- ViewGuides
- ViewHorizontalBaseLineGuides
- ViewTwoPageSpread
- ViewVerticalBaseLineGuides
- WebNavigationBarSets
- Wizard
Siehe auch
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