[X-DeViL]

Господа... Нужен макрос на VBA в ворде чтобы при нажатии выделеную в тексте картинку он масштабировал с параметрами:
горизонтальный масштаб - 120%
вертикальный - 80%

[X-DeViL]

Все.... разобрался.... если кому надо то вот что я написал...

Код:

[Выделить все]

Sub Image_Scale()
    
    Selection.InlineShapes(1).Width = Selection.InlineShapes(1).Width * 1.2
    Selection.InlineShapes(1).Height = Selection.InlineShapes(1).Height * 0.8
 
End Sub

[fixo]

Спасибо за решение

~'J'~