Readdy Write  
0,00 €
Your View Money
Views: Count
Self 20% 0
Your Content 60% 0

Users by Links 0
u1*(Content+Views) 10% 0
Follow-Follower 0
s2*(Income) 5% 0

Count
Followers 0
Login Register as User

🎬 Word Scale Foto 100 Prozent

23.07.2018 (👁3672)


Word: Foto in der Skalierung auf 100% anpassen

Wie kann man per Macro vba Code ein Foto in Word automatisch auf die Größe 100% zurücksetzen.

Problem:

Es kann sein, dass Fotos beim Einfügen automatisch scheinbar verkleinert werden.

Dabei ist in wirklichkeit nur die Size-Größe auf 30% eingestellt. Die Ursache für die Vordefinition weiß ich noch nicht.

Jedenfalls kann man mit vba-Word Makro Code alle Fotos wieder auf die dargestellte 100% anpassen.

Hierzu setzt man einfach die ScaleWidth auf 100

objInlineShape.ScaleWidth = 100

Problem: beim Einfügen wird das Foto automatisch verkleinert.

 

'--< replace as Thumb.jpg >--

'*pasteBitmap is much smaller

cell_Range.PasteSpecial DataType:=wdPasteBitmap, Placement:=wdInLine

Set objInlineShape = cell_Range.Cells(1).Range.InlineShapes(1)

objInlineShape.ScaleWidth = 100

'--</ replace as Thumb.jpg >--