[решено] Изменение местоположения картинки в Word через COM-объект

[DJ Mogarych]

Привет!

Есть документ docx, где вставлена картинка.

Как изменить у этой картинки местоположение через COM-объект?
Например, на X мм вправо и на Y мм вверх или на X мм влево и на Y мм вниз?

[DJ Mogarych]

Нашёл. Пример двигает все картинки в документе.


$path = "D:\temp\text.docx"

$Word = new-object -ComObject Word.Application
$Word.Visible = $False
$doc = $Word.Documents.Open($path,$true)

# 28.35 = 1 см.
# left: увеличение - вправо, уменьшение - влево
# top: увеличение - вниз, уменьшение - вверх
1..$doc.Shapes.Count |% {
$doc.Shapes.Item($_).left = $doc.Shapes.Item($_).left + 28.35
$doc.Shapes.Item($_).top = $doc.Shapes.Item($_).top - 28.35
}

$doc.Save()
$doc.Close()
$Word.Application.Quit()