Hallo Jörg,
ist zwar jetzt 3 Monate her aber mein Quartalstermin steht mal wieder an.
Und jedes mal komme ich ein Stück weiter.
Das skalieren geht über ein einfaches Makro:
Folgende Sequenz in ein Makro kopieren
Sub ResetInlineShapes()
' Alles Auswaehlen
Selection.WholeStory
' Schleife über die Bilder / Shapes
For ShapeId = 1 To Selection.InlineShapes.Count
' Zuruecksetzen des Bildes
Selection.InlineShapes(ShapeId).Reset
Next
End Sub
Nach dem Export einfach ausführen.
Irgendwie kann man wenn ich mich recht erinnere auch automatisch ein Makro beim export triggern
... aber es muss ja noch was für das nächste Quartal bleiben.