Hallo zusammen,
ich habe bis jetzt noch mit Office 2003 gearbeitet.
Jetzt möchte ich auf Office 2010 umstellen.
Ich habe Excel-Tabellen, die ich in Word einfüge mit folgendem code:
Mit diesem Code füge ich über eine Schaltfläche eine Aufstellung aus Excel in mein Word ein,
wobei die Skalierung der Grafik auf 100 % gesetzt wird. In 2003 funktioniert das wunderbar.
In Word 2010 springt der Code zwar im Einzelschrittmodus auf die Codezeilen .scaleHeight und .scalewidth,
setzt aber den Wert nicht auf 100, sondern belässt ihn auf 0. Woran kann das liegen? Gibt es in Office2010
diesen Befehl für scaleheight und scalewidth nicht mehr? Und wenn nicht, welche Alternativen gibt es?
Danke für jegliche Hilfe
selection.pasteSpecial link:=True, DataType:=wdPasteOLEObject, Placement:=wdLine, DisplayIcon:=False
on error resume next
for i = 1 to ActiveDocument.InlineSchapes.Count
with ActiveDocument.Inlineshapes(i)
.scaleheight = 100
. scalewidth = 100
end with
next
exit sub
end sub
|