В предыдущей статье мы рассмотрели способ сжатия текста документа с помощью изменения интервала между строками (ссылка на статью) используя программирование на VBA. В этой статье мы рассмотрим другой способ сжатия или увеличение объема документа - изменение интервала между символами в строке (как это работает можно посмотреть в этом видео)
Результат смещения должен быть таким
Как мы видим, размер абзаца уменьшился на одну строку.
Как всегда, есть два способа выполнить это действие:
способ № 1 - с помощью имеющегося инструмента Microsoft Word
способ № 2 - программирование на VBA
Рассмотрим по порядку оба этих способа.
Способ № 1. Изменение интервала между символами
1. Выделите фрагмент текста, в котором нужно уменьшить или увеличить интервал между символами.
2. На вкладке "Главная" выберите и нажмите на кнопку в правом нижнем углу группы "Шрифт"
или нажмите на сочетание клавиш "Ctrl+D"
3. После нажатия появляется окно редактирования "Шрифта"
На вкладке "Дополнительно" находится наша цель - "Интервал". По умолчанию в выпадающем списке стоит значение - "Обычный".
4. Изменяя значение этого выпадающего списка
вы получаете нужное уплотнение расстояния между символами.
Для того чтобы уместить фрагмент текста в одной строке, Вам может понадобится повторить эти действия несколько раз. Для того, чтобы ускорить это действие, Вам понадобится использовать язык программирования VBA
Способ № 2 - изменение интервала между символами с помощью программирования на VBA
Как всегда переходим в редактор VBA через вкладку "Разработчик" или с помощью комбинации клавиш "Alt+F11"
И в поле ввода кода скопируйте и вставьте следующий код:
Sub УменьшитьИнтервал()
Dim sel As Selection 'задаем переменную sel которая будет отвечать за выделенный фрагмент текста
Set sel = Selection ' непосредственно присваиваем переменной sel выделенный фрагмент текста
sel.Font.Spacing = .Font.Spacing - 0.1 ' в этой строке часть кода sel.Font.Spacing отвечает за свойство интервала между символами в выделенном тексте, а с помощью правой части "= .Font.Spacing - 0.1" мы из самого значения интервала вычитаем величину равную 0,1 пт, тем самым уменьшая интервал. Если вместо " - " поставить знак плюс, то интервал будет увеличиваться.
End Sub
Код очень небольшой, но позволит экономить очень много времени.
Если же вы эту процедуру выведете в панель быстрого запуска, то будет достаточно просто выделить текст и нажимать на эту клавишу. Интервал в выделенном тексте будет меняться в отличие от способа № 1 в 100 раз быстрее.
Если статья вам понравилась, ставьте лайки и подписывайтесь на канал.
