Gruppenbild aus Excel mit VBA Exportieren

[ASNCM]

Hallo zusammen.

Ich versuche gerade vergeblich mit VBA in Excel ein Bild zu extrahieren was als "Gruppieren 7" gespeichert werden soll als .png oder .jpg

Kann man mir eine Hilfestellung geben ?

Per Auszeichnung mit VBA bleibt der stehen bei der Maskierung des Gruppenbildes und zeichnet die Speicherung leider nicht mit auf.

Code:

Sub Gruppernbildspeichern()
ActiveSheet.Shapes.Range(Array("Group 7")).Select
End Sub

Danke für die Hilfe Gruß
Markus

[00202]

Hallo Markus,  

so der Spur nach:  
[attachment=51547]

Bild/Gruppe anklicken. Wird im gleichen Verzeichnis wie die Datei mit dem Makro gespeichert.

Eventuell kannst du dir hier noch Infos rausziehen.

[snb]

Mit Irfanview:
anpassen: Irfanview Path F:\
Speicher path C:\

Code:

Sub M_snb()
  c00="F:\IrfanView\"
  sheet1.shapes("Group 7").copypicture
  shell c00 & dir(c00 & "i_view*.exe") & " /clippaste /convert=C:\pict.png", 0
End Sub