If (Selection.InlineShapes(1).Type = _ wdInlineShapeEmbeddedOLEObject) _

Or (Selection.InlineShapes(1).Type = _ wdInlineShapeLinkedOLEObject) Then

ObjOLEFmt = Selection.InlineShapes(1).OLEFormat.ClassType 'Исключаем из объектов формулы MathType

If InStr(1,ObjOLEFmt,"Equation.DSMT",vbTextCompare) = 0 Then Exit Sub

End If End If

'Определяем размер шрифта и высоту объекта

FontSize = Selection.Font.Size

ImageHeight = Selection.InlineShapes(1).Height

'Вычисляем и устанавливаем смещение объекта по вертикали

ObjShift = CInt((ImageHeight - FontSize) / 2) Selection.Font.Position = -ObjShift

End If End Sub

Вызов процедуры выравнивания, как и в предыдущем примере, выполняется командой Вид/ Макросы/ Макросы, выбирается имя процедуры и нажимается кнопка Выполнить. Для удобства при частом применении вызов макроса можно присвоить кнопке на панели инструментов. Откройте окно Файл/ Параметры/ Настройка ленты, в

поле Команды выберите Макросы, в списке выберите макрос «CenterVertInlineShape». В правой части окна вызовите команду Создать вкладку, затем Создать группу. Переименуйте созданную вкладку и группу на своё усмотрение. Поместите макрос на панель кнопкой

Добавить.

9.6. СРЕДСТВА АВТОМАТИЗАЦИИ И ВЁРСТКИ LIO WRITER

9.6.1. Вставка врезки

Для вставки пояснений, правил, изображений, используются врезки (надписи). Командой Вставка/Врезка, вызовите окно, на вкладке Тип задайте ширину врезки 5,5 см и высоту 3 см, Привязка – К странице, Положение – справа по низу и смещением 0 см к области текстовой страницы. На вкладке Обтекание выберите обтекание По контуру. По

187

умолчанию у надписи присутствует рамка, которую можно изменить на вкладке Обрамление. На вкладке Фон выберите любой очень светлый цвет заливки. Введите в надпись следующий текст: Бром (Br, №35) – химически активный неметалл, относится к группе галогенов.

Маркеры границы врезки можно использовать для изменения размера врезки. Двойной щелчок мышью на границе врезки вызывает окно свойств врезки.

9.6.2. Разрывы текста, разделы

При наборе текста довольно часто возникает необходимость вставки разрыва текста. Команда Вставка/Разрыв открывает окно, в котором можно выбрать тип вставляемого разрыва: разрыв строки, разрыв колонки и разрыв страницы. Разрыв строки (Shift+Enter) сдвигает текст справа от курсора в позицию новой строки без создания нового абзаца. Разрыв колонки добавляет новый абзац и перемещает текст справа от курсора в начало следующей колонки (при наличии нескольких колонок), и обозначается непечатаемой рамкой в верхней части нового столбца. Разрыв страницы (Ctrl+Enter) перемещает текст справа от курсора в начало следующей страницы и обозначается непечатаемой рамкой (цветной пунктирной линией) в верхней части новой страницы в режиме разметки. При наведении курсора мыши на линию разрыва появляется кнопка меню, из которого можно удалить разрыв или вызвать окно настроек. При вставке разрывов страниц можно указать стиль новой страницы, это позволяет внутри документа вставлять страницы альбомной ориентации, другого размера, или изменять вид колонтитулов. Если при вставке разрыва страницы указывается стиль страницы, отличный от стиля текущей, то появляется возможность указать новый номер для создаваемой страницы. Автоматический переход на новую страницу может быть задан стилем (добавить разрыв перед страницей на вкладке На странице окна изменения стиля), как это обычно задаётся для заголовка первого уровня (глав).

Для вставки текстовых блоков из других документов, применения нестандартного размещения колонок, для защиты или скрытия блоков текста при выполнении условий используются разделы. Команда

188

Вставка/Раздел вызывает окно, позволяющее добавить новый раздел и задать его параметры.

Для разного количества колонок в пределах одной страницы используются разделы, на разных страницах – разрывы страниц.

Для вставки нового абзаца непосредственно перед разделом или после него установите курсор в требуемой позиции и нажмите клавиши Alt+Enter. Можно вставлять разделы в уже существующие разделы. Разметка раздела, например количество колонок, имеет приоритет над разметкой страницы, определенной в стиле страницы.

9.6.3. Поля, нумерация объектов

Научно-технический документ довольно часто содержит нумерованные объекты и ссылки на них. Если ссылки и нумерацию набирать вручную, то приходится лично следить за правильностью нумерации при перемещении блоков текста. Редактор Writer позволяет автоматизировать этот процесс, и сам следит за нумерацией объектов и ссылками на них. Первый лист задания содержит нумерацию математических формул и ссылку на последнюю из них. Замените обычный текст автоматической нумерацией. Для этого используйте поля (не путать с полями страницы). Поля – функциональные блоки, которые могут обеспечить автоматическое обновление данных, таких как время, заголовок, число страниц и т. д.

Если в заголовке номер главы указан вручную, то удалите номер, добавьте автоматическую нумерацию для заголовков: с помощью команды Сервис/Структура нумерации откройте окно настройки нумерации, на вкладке Нумерация выберите общий Уровень – 1–10, Номер – 1,2,3…, Стиль символа – Символ нумерации, в поле До удалите содержимое, в поле После внесите точку и пробел. При необходимости можно выделить первый уровень (стиль Заголовок 1) и в поле До ввести текст «Глава ». На вкладке Позиция для Уровня 1–10 установите значение списка После нумерации – Пробел. Изменения должны произойти во всех блоках документа, использующих стили заголовков.

Удалите текст номера справа первой формулы. Откройте окно

Вставка/Поля/Дополнительно (Ctrl+F2), на вкладке Переменные в списке

Тип поля выберите Диапазон нумерации, если в списке Выбор нет значения Формула, то в поле Название введите Формула, в списке

189

Формат должно быть выбрано значение «Арабские (1 2 3)», в блоке

Нумерация по главам выберите Уровень 1 и Разделитель – точка. Иначе,

если в списке Выбор уже есть тип Формула, выберите его. Нажмите кнопки Вставить и Закрыть.

Скопируйте содержащий поля номер формулы к остальным формулам, заменив номера обычного текста. Вычисление и обновление значение полей происходит автоматически. При наличии большого количества полей в больших документах для ускорения работы редактора автообновления значений полей можно отключить (Сервис/Параметры,

LibreOffice Writer/Общие, в блоке Автоматически снять пометку Поля) и

при необходимости обновлять их вручную (команда Обновить/поля или F9). Изменить настройки выбранного поля можно командой контекстного меню Поле.

Поместите курсор в поле ссылки на формулу («1.3» в последнем абзаце первой главы), удалите текст ссылки «1.3», вставьте автоматическую ссылку командой Вставка/Перекрёстная ссылка, Тип поля – Формула, Выбор – (1.3), Вставить ссылку – Нумерация, нажмите кнопки Вставить и Закрыть.

Подобного рода автоматизация нумерации позволяет исключить ошибки в нумерации объектов и ссылках на них в процессе редактирования при перемещении объектов и добавлении новых.

9.6.4. Нумерация страниц

Номер страницы является полем, которое можно разместить на странице. Обычно номера страниц располагаются в колонтитулах – полях сверху или снизу страницы. Колонтитулы автоматически повторяются в пределах группы страниц одного стиля. Командой Вставка/Нижний колонтитул/Обычный вставьте колонтитул на страницу (другой способ – поместите курсор мыши в нижнюю область страницы, появится выделенная кнопка-маркер «Нижний колонтитул (Обычный) +»,

нажатие которой также добавит колонтитул). Так как для размещения колонтитула требуется место, то размер рабочей области страницы уменьшается на размер колонтитула. Включите выравнивание абзаца по центру, командой Вставка/Поля/Номер страницы добавьте номер. Обратите внимание, что колонтитулы с номером появились на всех

190