Ich habe mittels Basic ein in einer Tabelle ein Chart erstellt und möchte diese im Landscape-Seitenformat darstellen.
Mittels dieses Makros
Sub Umschalten_auf_Landscape
Dim Stilfamilien as Object
Dim SeitenStile as Object
Dim StandardSeite as Object
Dim KopfZeile as Object
Dim KopfzeilenText as Object
StilFamilien = oDoc.StyleFamilies
SeitenStile = StilFamilien.getByName("PageStyles")
StandardSeite = SeitenStile.getByName("Default")
StandardSeite.IsLandscape = True
End Sub
verändert sich zwar der Radiobutton bei Format > Seite > von Hochformat auf Querformat, aber im Bild wird dies nicht umgesetzt.
Erst wenn ich dann auf Hochformat umstelle wird der Chart im Landscape-Format quer dargestellt.
Hat jemand einen Tip, was ich falsch mache ?
Ich habe mittels Basic ein in einer Tabelle ein Chart erstellt und möchte diese im Landscape-Seitenformat darstellen.
Mittels dieses Makros
[quote]
Sub Umschalten_auf_Landscape
Dim Stilfamilien as Object
Dim SeitenStile as Object
Dim StandardSeite as Object
Dim KopfZeile as Object
Dim KopfzeilenText as Object
StilFamilien = oDoc.StyleFamilies
SeitenStile = StilFamilien.getByName("PageStyles")
StandardSeite = SeitenStile.getByName("Default")
StandardSeite.IsLandscape = True
End Sub
[/quote]
verändert sich zwar der Radiobutton bei Format > Seite > von Hochformat auf Querformat, aber im Bild wird dies nicht umgesetzt.
Erst wenn ich dann auf Hochformat umstelle wird der Chart im Landscape-Format quer dargestellt.
Hat jemand einen Tip, was ich falsch mache ?