Hallo Zusammen,
meine VBA Kentnisse sind eher gering. Dennoch habe ich mir ein Makro in Excel geschrieben, in dem ich in einer Schleife für bestimmte Zellen eine PNG-Datei als OLE Objekt einfüge.
Soweit habe ich alles hinbekommen und es funktioniert gut.
Was mich in der Darstellung noch stört, ist die Größe der Symbole für die eingebetteten Dateien.
Daher würde ich gerne beim einfügen des Objekt oder auch am Ende meines Makros, alle in der Datei vorhandenen OLE Objekte in der Größe anpassen (verkleinern)
Gibte es dafür eine Möglichkeit ?
Der Teil meines Codes zum einfügen der Objekte sieht biher so aus:
ActiveSheet.OLEObjects.Add(Filename:=strPfad & Rng.Offset(, 14), Link:=False, _
DisplayAsIcon:=True, IconFileName:="R:\Vorlagen\Wartungsplan\Icon\Zeichnung.ico", _
IconIndex:=0, IconLabel:="png").Select
Alle Internet Recherchen haben mich bislang nicht weiter gebracht,
daher wäre ich für eine kleine Hilfestellung sehr dankbar.
Gruß Oliver