Microsoft Office Forum [ www.Office-Fragen.de ] >> READONLY <<
Microsoft Office 2003-2019 => Word => Thema gestartet von: Clari am August 17, 2016, 09:34:16 Vormittag
-
Hallo,
ich habe eine PDF in ein Word Dokument eingefügt.
Dies geschieht mit folgenden Code:
Selection.GoTo what:=wdGoToBookmark, Name:="Konformität"
Selection.InlineShapes.AddOLEObject ClassType:="AcroExch.Document.DC", _
FileName:="", LinkToFile:=False, DisplayAsIcon:=False
Jetzt füllt die PDF jedoch eine ganze Seite aus und ich würde das ganze gerne kleiner haben.
Deswegen habe ich folgendes angehängt:
With Selection
.ShapeRange.LockAspectRatio = msoTrue
.ShapeRange.Height = 50#
End With
Jedoch passiert dadurch gar nichts.
Kann mir bitte jemand Helfen?