|
Hallo Leute,
ich sitze gerade an dem Problem, dass ich aus Excel heraus einige Diagramme als Grafiken in ein neu erstelltes Word-Dokument übertragen möchte. Zum Testen habe ich diese Code geschrieben. 123 und Halle werden geschrieben, aber die Seitenausrichtung funktioniert nicht. Das Dokument bleibt weiterhin hochkant. Wisst ihr vielleicht wieso? Vielen Dank im Voraus
Set wdApp = CreateObject("Word.Application")
wdApp.Visible = True
Set wdDoc = wdApp.Documents.Add
wdDoc.Content.InsertAfter 123
wdDoc.Content.InsertAfter "Hallo"
wdDoc.PageSetup.Orientation = wdOrientLandscape
|