Seite 1 von 1

Objekte als Grafik speichern per Makro

BeitragVerfasst: 10. Jun 2021, 13:45
von FrankFisch
Hallo Cracks,

ich möchte gerne alle Objekte auf einer Folie markieren und als Grafik speichern. Als Dateiname kann ich den Inhalt eines Textfeldes nehmen (dieser wechselt mit jeder Folie).
Hat da jemand eine Lösung die mich etwas ans Ziel führt?

1000 Dank vorab
Frank

Re: Objekte als Grafik speichern per Makro

BeitragVerfasst: 10. Jun 2021, 16:12
von Gast1234321
Meinst Du: als jpg exportieren?

Re: Objekte als Grafik speichern per Makro

BeitragVerfasst: 10. Jun 2021, 17:57
von FrankFisch
Das Format ist zunächst unwichtig, ich nehme meistens PNG.

Alle Objekte markieren, Rechts Klick, als Grafik speichern

Re: Objekte als Grafik speichern per Makro

BeitragVerfasst: 11. Jun 2021, 12:30
von DerHoepp
Moinsen,

auf die Schnelle über ein Selection-Hilfsobjekt so:
Code: Alles auswählen
Option Explicit

Sub testen()
    ActivePresentation.Slides(1).Shapes.SelectAll
    ActiveWindow.Selection.ShapeRange.Export "C:\Daten\EinTest.png", ppShapeFormatPNG
End Sub


Viele Grüße
derHöpp