Während Präsentation zwischen Hoch- und Querformat wechseln
auf Folie zwei commandbuttons anlegen (über Steuerelement-toolbox)
einen fuer hoch und einen für querformat
für Hochformat folgendes vb-script:
With ActivePresentation.PageSetup
.SlideSize = ppSlideSizeOnScreen
.FirstSlideNumber = 1
.SlideOrientation = msoOrientationVertical
.NotesOrientation = msoOrientationVertical
End With
für Querformat folgendes vb-script:
With ActivePresentation.PageSetup
.SlideSize = ppSlideSizeOnScreen
.FirstSlideNumber = 1
.SlideOrientation = msoOrientationHorizontal
.NotesOrientation = msoOrientationVertical
End With
einen fuer hoch und einen für querformat
für Hochformat folgendes vb-script:
With ActivePresentation.PageSetup
.SlideSize = ppSlideSizeOnScreen
.FirstSlideNumber = 1
.SlideOrientation = msoOrientationVertical
.NotesOrientation = msoOrientationVertical
End With
für Querformat folgendes vb-script:
With ActivePresentation.PageSetup
.SlideSize = ppSlideSizeOnScreen
.FirstSlideNumber = 1
.SlideOrientation = msoOrientationHorizontal
.NotesOrientation = msoOrientationVertical
End With
Kommentieren
Teilen
Auf Facebook teilen
Auf X (Twitter) teilen
Auf Reddit teilen
Auf Linkedin teilenBitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 34501
Url: https://administrator.de/tutorial/waehrend-praesentation-zwischen-hoch-und-querformat-wechseln-34501.html
Ausgedruckt am: 15.05.2025 um 10:05 Uhr
