Letysite.ru

IT Новости с интернет пространства
0 просмотров
Рейтинг статьи
1 звезда2 звезды3 звезды4 звезды5 звезд
Загрузка...

Vba макросы word

Макросы в Microsoft Word

Нередко простановка HTML тегов в статье занимает почти столько же времени, сколько ее написание. Особенно часто такая проблема возникает со статьями со сложной версткой, включающей множество заголовков, списков, цитат и стилей.

Заметно облегчить работу по подготовке текстов к публикации на web-сайте помогут макросы Word, которые могут автоматизировать любую задачу. Для написания такого макроса требуется знание языка программирования Visual Basic for Applications (VBA), встроенного не только в линейку программных пакетов от MicroSoft, но и многие другие приложения. Однако, благодаря тому, что VBA представляет собой упрощенную версию Visual Basic, начать писать простейшие скрипты может любой пользователь.

Кроме того, упростить задачу по написанию VBA макроса поможет возможность записи всех действий пользователя, которые автоматически преобразуются в программный код. Таким образом, чтобы создать простейший макрос, достаточно:

    выбрать пункт меню Вид –> Макросы –> Запись макроса;

дать ему любое имя;

  • выполнить необходимые действия, которые вы хотите автоматизировать;
  • остановить запись (Вид –> Макросы –>Остановить запись).
  • Кликнув по пункту меню Вид –> Макросы –> Запись макроса, вы откроете окно со список всех имеющихся у вас макросов и сможете запустить их, отредактировать или удалить.

    Расстановка тегов абзаца

    в Word при помощи VBA макроса

    Предварительная простановка тегов

    в тексте перед его размещением требуется при работе со многими CMS. Далеко не все встроенные в web-движки редакторы могут автоматически опознать абзацы в статье и автоматически вставить туда тексты. Кроме того, нередко разбивку текста HTML-тегами требуют и от копирайтеров, чтобы размещение статьи занимало у заказчика как можно меньше времени.

    Самый простой способ автоматизировать вставку HTML-тега в Word – это использование опции автозамены (окошко «Найти и заменить»), вызываемой сочетанием клавиш Ctrl+H.

    Вставляем в строку «Найти» сочетание ^p, а в строку «Заменить на»

    и жмем на кнопку «Заменить все». Word автоматически проставит необходимые HTML-теги в тексте.

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

    1. Включаем запись макроса.
    2. Выполняем замену абзацев на HTML-теги в тексте при помощи опции «Заменить все».
    3. Останавливаем запись.

    Теперь, чтобы проставить тег

    в статье, вам будет достаточно нажать единственную кнопку запуска макроса.

    Готовый код (помимо простановки тегов, он изменяет шрифт текста на Times New Roman и устанавливает размер 11):

    Sub P()



    Selection.WholeStory
    Selection.Font.Name=»TimesNewRoman»
    Selection.Font.Size=11
    Selection.Find.ClearFormatting
    Selection.Find.Replacement.ClearFormatting
    WithSelection.Find
    .Text=»^p»
    .Replacement.Text=»

    »
    .Forward=True
    .Wrap=wdFindAsk
    .Format=False
    .MatchCase=False
    .MatchWholeWord=False
    .MatchWildcards=False
    .MatchSoundsLike=False
    .MatchAllWordForms=False
    EndWith
    Selection.Find.ExecuteReplace:=wdReplaceAll
    Selection.HomeKeyUnit:=wdStory
    Selection.TypeTextText:=»

    »
    Application.Browser.Next
    Selection.EndKeyUnit:=wdStory
    Selection.TypeBackspace
    Selection.TypeBackspace
    Selection.TypeBackspace
    Selection.TypeBackspace
    End Sub

    Учтите, что если в конце вашего текста есть много лишних абзацев, то данный VBA скрипт обязательно заменит их на HTML-теги, поэтому обязательно проверяйте то, как выглядит конец статьи, перед ее непосредственной публикацией на сайте.

    Как видите, код интуитивно понятный, и многие команды VBA имеют говорящее название, указывающее на их функцию:

    • Selection.Find.Replacement.ClearFormatting – заменить в выбранном тексте,
    • .Text – текст, который нужно найти;
    • .Replacement.Text – текст для замены.

    Команда Selection.TypeBackspace обозначение удаление одного символа, стоящего впереди курсора. Она необходима, так как в случае выполнения замены абзацев на HTML-теги

    в конце всегда будет находиться лишний открывающий тег

    Продолжим писать наш макрос для «Ворда». Пусть он обрамляет тегами или или текст, выделенный жирным.

    Сделать это при помощи автозамены можно так.

    В поле «Найти» вставляем текст ( ). В пункте «Формат» выбираем Шрифт –> Полужирный. Ставим галочку в пункте «Подстановочные знаки». В поле «Заменить на» пишем 1. Нажимаем «Заменить все».

    У такой опции есть один недостаток: программа расставит обрамляющие HTML-теги не возле вокруг всего «куска» жирного текста, а вокруг каждого слова, следовательно, итоговый код будет очень грязный.

    Чтобы исправить эту ошибку, просто заменим

    Итоговый код (на примере замены на

    Sub B()



    Selection.Find.ClearFormatting
    Selection.Find.Font.Bold=True
    Selection.Find.Replacement.ClearFormatting
    WithSelection.Find
    .Text=»( )»
    1
    .Forward=True
    .Wrap=wdFindContinue
    .Format=True
    .MatchCase=False
    .MatchWholeWord=False
    .MatchAllWordForms=False
    .MatchSoundsLike=False
    .MatchWildcards=True
    EndWith
    Selection.Find.ExecuteReplace:=wdReplaceAll
    WithSelection.Find
    .Text = » »
    .Replacement.Text=»»
    .Forward=True
    .Wrap=wdFindContinue
    .Format=False
    .MatchCase=False
    .MatchWholeWord=False
    .MatchWildcards=False
    .MatchSoundsLike=False
    .MatchAllWordForms=False
    EndWith
    Selection.Find.ExecuteReplace:=wdReplaceAll
    End Sub

    Двойные кавычки в коде – это не опечатка, так как именно таким образом осуществляется экранирование кавычек в VBA-скриптах.

    Аналогичным способом вы можете дополнить макрос, например, обрамляя курсив тегами &#60i&#62&#60&#47i&#62 или &#60blockquote&#62&#60&#47blockquote&#62.

    Автоматическая простановка тегов заголовков

    Чтобы автоматически расставить заголовки H1, H2, H3, H4, H5 и H6, необходимо задать для них размер шрифта, отличный от остального текста. Например, если вы пишите статью 12 размером, можно выделять заголовки 16 размером. Тогда опция автозамены будет выглядеть так:

    • в поле «Найти» ( ),
    • в поле «Заменить на»

    Затем заменяем лишние «

    Макрос будет выглядеть следующим образом:

    Selection.Find.ClearFormatting
    Selection.Find.Font.Size=18
    Selection.Find.Replacement.ClearFormatting
    WithSelection.Find
    .Text=»( )»
    .Replacement.Text=»

    »
    .Replacement.Text=»»
    .Forward=True
    .Wrap=wdFindContinue
    .Format=True
    .MatchCase=False
    .MatchWholeWord=False
    .MatchWildcards=False
    .MatchSoundsLike=False
    .MatchAllWordForms=False
    EndWith
    Selection.Find.ExecuteReplace:=wdReplaceAll
    EndSub

    Используя приведенные примеры, вы можете создавать собственные макросы, форматируя текст, как вам удобно, что позволит ускорить работу по подготовке тексте перед размещением на сайте.

    Как запустить макрос?

    В приложениях Microsoft Word и Microsoft Excel макросы запускаются одинаково. Существует несколько способов, которыми можно запустить макрос в этих приложениях, но для того чтобы этими способами воспользоваться необходимо знать имя макроса и место, в котором он сохранен. Большая часть рассмотренных ниже способов запуска макросов может быть использована и в других приложениях, таких как Outlook, PowerPoint и др.

    Как запустить макрос из редактора Visual Basic ?

    Для того чтобы запустить макрос, необходимо открыть приложение, для которого он написан. Из открытого приложения перейти в редактор VisualBasic сочетанием клавиш Alt+F11 (Alt с левой стороны клавиатуры). В обозревателе проектов (окно ProjectExplorer по умолчанию находится в левом верхнем углу редактора) найти проект, а в проекте модуль, в котором записан макрос. Двойной клик левой кнопкой мыши по выбранному модулю отображает все макросы (процедуры, функции), которые в нем хранятся. Остается отыскать макрос с нужным именем, установить курсор в любое место между ключевыми словами Sub и End Sub, после чего нажать кнопку Run Sub в меню редактора либо кнопку F5 на клавиатуре.

    Как запустить макрос из приложения?

    Чтобы запустить макрос из приложения, для которого он написан, прежде всего, необходимо открыть приложение, затем нажать сочетание клавиш Alt+F8 на клавиатуре, в диалоговом окне «Макрос» отыскать нужный макрос по имени, навести на него курсор и нажать кнопку «Выполнить», либо дважды кликнуть по имени левой кнопкой мыши.

    Как запустить макрос горячими клавишами?

    Можно назначить макросу горячие клавиши, в этом случае запускаться макрос будет сразу после нажатия заданной комбинации клавиш на клавиатуре. В разных приложениях, а также в разных версиях этих приложений сочетание клавиш может присваиваться по-разному, но принцип одинаков для всех.

    Microsoft Excel

    Вызывается диалоговое окно «Макрос» сочетанием клавиш Alt+F8, выделяется имя макроса, нажимается кнопка «Параметры» и задается сочетание клавиш.

    Microsoft Word

    На ленте выбирается меню «Файл»/«Параметры»/«Настройка ленты», в поле «Сочетание клавиш» нажимается кнопка «Настройки», после чего любому макросу можно изменить текущее сочетание либо присвоить новое.

    Как запустить макрос из панели быстрого доступа?

    В версиях Microsoft Office 2007 и выше есть так называемая панель быстрого доступа, которая может располагаться как над, так и под лентой. В настройках панели быстрого доступа есть пункт меню «Другие команды». Если в поле «Выбрать команды из:» из выпадающего списка выбрать пункт «Макросы», навести курсор на имя какого-либо макроса и нажать кнопку «Добавить», в панели быстрого доступа появится иконка, нажатие на которую будет запускать макрос. В окне настроек панели быстрого доступа можно изменить отображаемое имя макроса, которое всплывает при наведении курсора мыши на иконку, а также можно изменить изображение на кнопке, выбрав одну из предложенных картинок. И в Word и в Excel эта возможность реализована одинаково.

    Как запустить макрос из другого макроса?

    Предположим, что существует макрос (процедура) с именем Name1, который необходимо запустить из другого макроса (процедуры) с именем Test.

    Макросы находятся в одном модуле

    В программном коде макроса Test необходимо вписать имя макроса (процедуры) который должен быть запущен, то есть Name1

    Макросы находятся в одном проекте, но в разных модулях

    Если макрос Test расположен в модуле Module1, а макрос Name1 находится в модуле Module2, но в пределах одного проекта, то в программном коде необходимо вписать имя модуля и сразу за ним поставить точку, после этого вписать имя макроса (процедуры) вручную либо выбрать из списка всплывающей подсказки, чтобы получилось Module2.Name1

    Макрос на VBA Excel – Формируем документы по шаблону

    Очень часто бывает такое, что нужно сформировать документы по определенному шаблону, на основе каких-то данных, например, по каждому сотруднику или по каждому лицевому счету. И делать это вручную бывает достаточно долго, когда этих самых сотрудников или лицевых счетов много, поэтому сегодня мы рассмотрим примеры реализации таких задач в Excel с помощью макроса написанного на VBA Excel.

    Немного поясню задачу, допустим, нам необходимо сформировать какие-то специфические документы по шаблону массово, т.е. в итоге их получится очень много, как я уже сказал выше, например, по каждому сотруднику. И это нужно сделать непосредственно в Excel, если было бы можно это сделать в Word, то мы бы это сделали через «Слияние», но нам нужно именно в Excel, поэтому для этой задачи мы будем писать макрос.

    Мы с Вами уже выгружали данные по шаблону через клиент Access из базы MSSql 2008 в Word и Excel вот в этой статье — Выгрузка данных из Access в шаблон Word и Excel. Но сейчас допустим, у нас данные располагаются в базе, в клиенте которой нельзя или слишком трудоемко реализовать такую задачу, поэтому мы просто выгрузим необходимые данные в Excel и на основе таких данных по шаблону сформируем наши документы.

    В нашем примере мы, конечно, будем использовать простой шаблон, только для того чтобы это было просто наглядно и понятно (только в качестве примера), у Вас в свою очередь шаблон будет, как мне кажется намного сложней.

    Напомню, что на данном сайте тема VBA Excel уже затрагивалась, например, в материале – Запрет доступа к листу Excel с помощью пароля

    И так приступим!

    Пишем макрос на VBA Excel по формированию документов

    Реализовывать нашу задачу будем на примере «Электронной карточке сотрудника» (я это просто придумал:), хотя может такие и на самом деле есть), т.е. документ в котором хранится личные данные сотрудника вашего предприятия, в определенном виде, именно в Excel.

    Примечание! Программировать будем в Excel 2010.

    И для начала приведем исходные данные, т.е. сами данные и шаблон

    Данные.

    Лист, на котором расположены эти данные так и назовем «Данные»

    Шаблон.

    Лист, на котором расположен шаблон, тоже так и назовем «Шаблон»

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

    Это делается очень просто, выделяете необходимую ячейку или диапазон, и жмете правой кнопкой мыши и выбираете «Присвоить имя», пишите имя ячейки и жмете «ОК»

    Свои поля я назвал следующим образом:

    • ФИО – fio;
    • № — number;
    • Должность – dolgn;
    • Адрес проживания – addres;
    • Тел. № сотрудника – phone;
    • Комментарий – comment.

    Код макроса на VBA Excel

    Для того чтобы написать код макроса, открывайте на ленте вкладку «Разработчик», далее макросы.

    Примечание! По умолчанию данной вкладке в Excel 2010 может и не быть, чтобы ее отобразить нажмите правой кнопкой по ленте пункт меню «Настройка ленты»

    затем, в правой области поставьте галочку напротив пункта «Разработчик»

    После вкладка разработчик станет отображаться на ленте.

    Далее, когда Вы откроете вкладку разработчик и нажмете кнопку «Макросы» у Вас отобразится окно создания макроса, Вы пишите название макросы и жмете «создать».

    После у Вас откроется окно редактора кода, где собственно мы и будем писать свой код VBA. Ниже представлен код, я его как обычно подробно прокомментировал:

    Теперь осталось выполнить этот макрос, для этого откройте вкладку разработчик->макросы->выполнить наш макрос:

    и после выполнения у Вас в той же папке появится вот такие файлы

    Вот с таким содержимым:

    Для удобства можете на листе с данными создать кнопку и задать ей событие выполнить наш только что созданный макрос, и после чего простым нажатием выполнять этот макрос. Вот и все! Удачи!

    Макросы в Microsoft Word

    Нередко простановка HTML тегов в статье занимает почти столько же времени, сколько ее написание. Особенно часто такая проблема возникает со статьями со сложной версткой, включающей множество заголовков, списков, цитат и стилей.

    Заметно облегчить работу по подготовке текстов к публикации на web-сайте помогут макросы Word, которые могут автоматизировать любую задачу. Для написания такого макроса требуется знание языка программирования Visual Basic for Applications (VBA), встроенного не только в линейку программных пакетов от MicroSoft, но и многие другие приложения. Однако, благодаря тому, что VBA представляет собой упрощенную версию Visual Basic, начать писать простейшие скрипты может любой пользователь.

    Кроме того, упростить задачу по написанию VBA макроса поможет возможность записи всех действий пользователя, которые автоматически преобразуются в программный код. Таким образом, чтобы создать простейший макрос, достаточно:

      выбрать пункт меню Вид –> Макросы –> Запись макроса;

    дать ему любое имя;

  • выполнить необходимые действия, которые вы хотите автоматизировать;
  • остановить запись (Вид –> Макросы –>Остановить запись).
  • Кликнув по пункту меню Вид –> Макросы –> Запись макроса, вы откроете окно со список всех имеющихся у вас макросов и сможете запустить их, отредактировать или удалить.

    Расстановка тегов абзаца

    в Word при помощи VBA макроса

    Предварительная простановка тегов

    в тексте перед его размещением требуется при работе со многими CMS. Далеко не все встроенные в web-движки редакторы могут автоматически опознать абзацы в статье и автоматически вставить туда тексты. Кроме того, нередко разбивку текста HTML-тегами требуют и от копирайтеров, чтобы размещение статьи занимало у заказчика как можно меньше времени.

    Самый простой способ автоматизировать вставку HTML-тега в Word – это использование опции автозамены (окошко «Найти и заменить»), вызываемой сочетанием клавиш Ctrl+H.

    Вставляем в строку «Найти» сочетание ^p, а в строку «Заменить на»

    и жмем на кнопку «Заменить все». Word автоматически проставит необходимые HTML-теги в тексте.

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

    1. Включаем запись макроса.
    2. Выполняем замену абзацев на HTML-теги в тексте при помощи опции «Заменить все».
    3. Останавливаем запись.

    Теперь, чтобы проставить тег

    в статье, вам будет достаточно нажать единственную кнопку запуска макроса.

    Готовый код (помимо простановки тегов, он изменяет шрифт текста на Times New Roman и устанавливает размер 11):

    Sub P()



    Selection.WholeStory
    Selection.Font.Name=»TimesNewRoman»
    Selection.Font.Size=11
    Selection.Find.ClearFormatting
    Selection.Find.Replacement.ClearFormatting
    WithSelection.Find
    .Text=»^p»
    .Replacement.Text=»

    »
    .Forward=True
    .Wrap=wdFindAsk
    .Format=False
    .MatchCase=False
    .MatchWholeWord=False
    .MatchWildcards=False
    .MatchSoundsLike=False
    .MatchAllWordForms=False
    EndWith
    Selection.Find.ExecuteReplace:=wdReplaceAll
    Selection.HomeKeyUnit:=wdStory
    Selection.TypeTextText:=»

    »
    Application.Browser.Next
    Selection.EndKeyUnit:=wdStory
    Selection.TypeBackspace
    Selection.TypeBackspace
    Selection.TypeBackspace
    Selection.TypeBackspace
    End Sub

    Учтите, что если в конце вашего текста есть много лишних абзацев, то данный VBA скрипт обязательно заменит их на HTML-теги, поэтому обязательно проверяйте то, как выглядит конец статьи, перед ее непосредственной публикацией на сайте.

    Как видите, код интуитивно понятный, и многие команды VBA имеют говорящее название, указывающее на их функцию:

    • Selection.Find.Replacement.ClearFormatting – заменить в выбранном тексте,
    • .Text – текст, который нужно найти;
    • .Replacement.Text – текст для замены.

    Команда Selection.TypeBackspace обозначение удаление одного символа, стоящего впереди курсора. Она необходима, так как в случае выполнения замены абзацев на HTML-теги

    в конце всегда будет находиться лишний открывающий тег

    Продолжим писать наш макрос для «Ворда». Пусть он обрамляет тегами или или текст, выделенный жирным.

    Сделать это при помощи автозамены можно так.

    В поле «Найти» вставляем текст ( ). В пункте «Формат» выбираем Шрифт –> Полужирный. Ставим галочку в пункте «Подстановочные знаки». В поле «Заменить на» пишем 1. Нажимаем «Заменить все».

    У такой опции есть один недостаток: программа расставит обрамляющие HTML-теги не возле вокруг всего «куска» жирного текста, а вокруг каждого слова, следовательно, итоговый код будет очень грязный.

    Чтобы исправить эту ошибку, просто заменим

    Итоговый код (на примере замены на

    Sub B()



    Selection.Find.ClearFormatting
    Selection.Find.Font.Bold=True
    Selection.Find.Replacement.ClearFormatting
    WithSelection.Find
    .Text=»( )»
    1
    .Forward=True
    .Wrap=wdFindContinue
    .Format=True
    .MatchCase=False
    .MatchWholeWord=False
    .MatchAllWordForms=False
    .MatchSoundsLike=False
    .MatchWildcards=True
    EndWith
    Selection.Find.ExecuteReplace:=wdReplaceAll
    WithSelection.Find
    .Text = » »
    .Replacement.Text=»»
    .Forward=True
    .Wrap=wdFindContinue
    .Format=False
    .MatchCase=False
    .MatchWholeWord=False
    .MatchWildcards=False
    .MatchSoundsLike=False
    .MatchAllWordForms=False
    EndWith
    Selection.Find.ExecuteReplace:=wdReplaceAll
    End Sub

    Двойные кавычки в коде – это не опечатка, так как именно таким образом осуществляется экранирование кавычек в VBA-скриптах.

    Аналогичным способом вы можете дополнить макрос, например, обрамляя курсив тегами &#60i&#62&#60&#47i&#62 или &#60blockquote&#62&#60&#47blockquote&#62.

    Автоматическая простановка тегов заголовков

    Чтобы автоматически расставить заголовки H1, H2, H3, H4, H5 и H6, необходимо задать для них размер шрифта, отличный от остального текста. Например, если вы пишите статью 12 размером, можно выделять заголовки 16 размером. Тогда опция автозамены будет выглядеть так:

    • в поле «Найти» ( ),
    • в поле «Заменить на»

    Затем заменяем лишние «

    Макрос будет выглядеть следующим образом:

    Selection.Find.ClearFormatting
    Selection.Find.Font.Size=18
    Selection.Find.Replacement.ClearFormatting
    WithSelection.Find
    .Text=»( )»
    .Replacement.Text=»

    »
    .Replacement.Text=»»
    .Forward=True
    .Wrap=wdFindContinue
    .Format=True
    .MatchCase=False
    .MatchWholeWord=False
    .MatchWildcards=False
    .MatchSoundsLike=False
    .MatchAllWordForms=False
    EndWith
    Selection.Find.ExecuteReplace:=wdReplaceAll
    EndSub

    Используя приведенные примеры, вы можете создавать собственные макросы, форматируя текст, как вам удобно, что позволит ускорить работу по подготовке тексте перед размещением на сайте.

    Что такое макрос в ворде и как им пользоваться?

    Приветствую на Fast-Wolker.ru!! В сегодняшнем выпуске продолжим знакомство с созданием макросов уже в приложении Microsoft Office Word. Все знакомы с ним; многим приходится набирать документы в этой программе. Документы чаще всего имеют одну и ту же структуру — мы берем шаблон правим его так как нам надо в одних и тех же местах — меняем даты, имена, форматируем текст.

    То есть мы каждый раз делаем одни и те же операции с текстом, и чтобы их не делать каждый раз — можно заставить компьютер совершать их автоматически. Для этого в МS Word можно применять макрокоманды (или макросы) которые вы самостоятельно записываете в виде программы на языке VBA, который встроен в Word.

    Что такое включенные макросы в Ворд?

    А сейчас разберемся подробно, что за «макросы», как их включать. Начнем изучение на примере Office Word 2007, так как для многих он по прежнему остается самым привычным пакетом. Включать макросы нужно через меню «Файл» -«Параметры Word».

    Дело в том, что настройки макросов в программе по умолчанию выключены, либо заданы такие настройки безопасности, что работать с полноценно с макрокомандами Вы не сможете. Когда Вы создаете макросы, Вы по сути становитесь программистом. Можно не только самому их писать, но и находить уже готовые. Среда VBA позволяет работать не только в пределах MS OFFICE. Можно создавать полноценные программы, которые получают доступ системным файлам на компьютере, можно нанести вред. Этим пользуются злоумышленники.

    Включаем первую настройку на ленте. Она сделает видимой вкладку «Разработчик» и позволит работать с макрокомандами и запускать редактор VBA:

    Следующая настройка отвечает за безопасность. Здесь же, переходим в «Центр управления безопасностью»..

    …»Парамеры центра» отвечает за запуск наших будущих программ. Вы можете настроить так как нужно вам. Настройка «Доверять доступ к объектной модели VBA» позволит пользоваться уже готовыми проектами VBA, например скачанными из Интернет.

    Сторонние макрокоманды и проекты VBA перед запуском всегда проверяйте на вирусы!

    Стабильный MS Office 2007 морально устарел и поддержка его прекращена. Нужно уметь включать режим разработчика и в поздних версиях. Они более функциональны и для серьезной работы лучше использовать их. В Word 2016 включаем вкладку «Разработчик». Для этого так же в меню «Файл» переходим в «Параметры» и затем «Настройки Ленты»:

    Не забываем сделать настройки безопасности так как делали до этого. Теперь, когда все настройки сделаны можно работать далее.

    Что такое макросы в Ворде и как с ними работать?

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

    Но Вы получаете возможность изучать язык, если вас это дело увлечет. Создание макросов — это введение в программирование. VBA позволяет создавать для себя мощные инструменты при работе с текстовыми и табличными документами для решения многих задач в привычном виде . Тем, кто после прочтения статьи заинтересуется и захочет начать изучать язык VBA самостоятельно в помощь книга.

    В качестве примера расскажу об одной такой полезной программе для Word. Иногда появляется желание распечатать полезную книгу на принтере, потому что не все любят читать с экрана. Это может быть большая инструкция, или же полноценное художественное произведение в виде документа Ворд.

    Чтобы понравившийся документ после распечатывания стал полноценной привычной брошюрой — нужен макрос. А точнее написанный в VBA программный код, он вам и позволит распечатать ваш документ в виде брошюры, в которой будет правильное расположение текста и нумерация страниц. Эту программу для ознакомления качаем тут. Вам останется распечатать и сшить брошюру и вот у вас книга готова

    Но чаще всего мы используем макросы на работе при составлении документов. Нужно форматировать текст, менять его размер, менять даты, имена на другие. Это ответственно и занимает время. И здесь наши знания могут очень пригодится. Для начала покажу демонстрационный пример — как работает макрос. У нас есть шаблон договора, который нужно подготовить для заполнения. Задача: открыть документ, убрать ненужные нам элементы из текста автоматически:

    Согласитесь, убирать вручную каждый раз пустые поля (выделено желтым) на нескольких страницах утомительно, поэтому мы для примера прибегнем к помощи макроса. Итак, запускаю Ворд 2016, начинаю записывать макрос:

    Указываем имя нашего макроса (без пробелов), доступ делаю из шаблона Normal.doth. Такой выбор позволит запускать выполнение нашей макрокоманды из любого документа Word. Назначать макрос можно кнопке на панели инструментов или вызвать нажатием сочетания определенный клавиш, но мы этого делать пока не будем. Просто нажмем на «OK» и начнется запись наших действий. Предлагаю посмотреть на видео, что получилось, это будет нагляднее.

    Мы сделали самую простую операцию — замену текста во всем документе. Но, поизучав язык можно пойти и далее — отформатировать текст, сделать форму, в которой указываются все необходимые данные договора (даты, номер, ФИО директора, должности, наименование организации, реквизиты и т .д.). При выполнении макроса все эти данные заполнялись бы автоматически после указания в форме в нужных местах. По опыту знаю ошибок будет меньше при таком заполнении и времени уходит меньше.

    Что такое макрос в ворде 2007? Формула из Excel таблицы

    Многие интересуются — как вставить формулы Excel в таблицу Word? Excel хорош при вычислениях но не удобен для работы с текстом, а таблицы Word не так привычны после работы с Excel. Туда нельзя вставить формулы как в Excel, но можно вставлять таблицу Excel путем копирования или создания таблицы прямо в документе Word. Для этого переходим в меню «Вставка»:

    Далее, «рисуем» таблицу так, как мы делаем это в Excel:

    Создавать Excel таблицу в Word с помощью макроса вышеописанным способом не получится — нужны дополнительные усилия. А что касается обычной Word таблицы — можно записывать макросы в случае создания сложных макетов таблиц.

    Можно попробовать записать создание таблицы в макрос любым из этих способов и посмотреть что получится. Лично я таблицы копирую прямо из Excel, а макросы записываю в Office 2016 — там мне удобнее работать со стилями и оформлением. Удачи в освоении программы!

    Читать еще:  Восстановление поврежденных файлов word бесплатно
    Ссылка на основную публикацию
    Adblock
    detector