1
Word / Office 2013: OLE-OBjekt formatieren VBA
« 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?
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?