У меня есть документ Word с 200 страницами и форматом .docx . В нем много формул MathType . После многих редактирований в моем файле большинство формул преобразуется в рисунок. Я сделал это, но это не работает для меня. Хуже всего то, что размер преобразованных уравнений изменился, некоторые стали больше, а некоторые стали меньше. Я могу сбросить размер вручную, щелкнув правой кнопкой мыши по изображению, сняв флажок с look aspect ratio и установив Scale Height и Scale Width на 100, но, что хуже всего, я не могу сбросить размер изображений с помощью macro с настройкой ScaleHeight и ScaleWidth до 100. Вот мой код

Sub ScaleSelectedInlineShapes()
    Dim shape As InlineShape
    For Each shape In Selection.InlineShapes
        With shape
            .LockAspectRatio = msoFalse
            .ScaleHeight = 100
            .ScaleWidth = 100
        End With
    Next shape
End Sub

1 ответ1

0

MathType имеет команду, включенную в его макросы, которые устанавливаются как надстройка для Word. Эта команда « Преобразовать уравнения» включена на вкладке MathType в Word для Windows и в меню MathType в Word 2011 для Mac (и упоминается в TSN 103, с которым вы связались в исходном вопросе). Команда Convert Equations переформатирует уравнения в 100x100%. Просто оставьте параметры диалога по умолчанию и запустите его.

То, что не будет делать Convert Equations - это изменить размер уравнения, размер которого был неверно определен с самого начала. В качестве примера рассмотрим документ, в котором для текста установлено значение 10pt, но уравнение MathType слишком велико, чтобы уместиться, поэтому автор перетаскивает угол и изменяет размер уравнения. Выполнение преобразований уравнений приведет к изменению размера всех уравнений до 100x100% от их первоначального размера, независимо от размера перетаскивания. Если у вас есть уравнения, которые вы перетаскивали, чтобы изменить их размер, MathType ничего не сможет сделать, чтобы восстановить их до 100x100% от нужного вам размера, потому что у него нет способа узнать, что это за размер.

Всё ещё ищете ответ? Посмотрите другие вопросы с метками .