1

Тема: Как развернуть рисунки на 90 градусов?

Как развернуть все рисунки в Word на 90 градусов по часовой стрелке?

2

Re: Как развернуть рисунки на 90 градусов?

Выделить все рисунки и через правую кнопку мыши зайти в "Формат объекта...". Там с ними можно делать что угодно.

3

Re: Как развернуть рисунки на 90 градусов?

а как одним движением "выделить все рисунки", и где находится кнопка "развернуть на 90 градусов по часовой стрелке" ?
мне кажется без макроса тут не обойтись

4

Re: Как развернуть рисунки на 90 градусов?

Я начал пистать макрос, но не смог найти команду для поворота рисунков.

Sub Повернуть_все_рисунки_на_90_градусов_по_часовой_стрелке()
    
    Dim j As Object
    
    'для каждой фигуры
    For Each j In ActiveDocument.Shapes

        j.Rotation = 90

    Next
        
    'для каждого рисунка
    For Each j In ActiveDocument.InlineShapes
        
        '???        

    Next
    
End Sub