Работа с макросами в Word

Макросы и функции в Word для быстрого форматирования

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

Предысторию написания данной статьи, а также ее полезность можно оценить по видеоролику.

Макросы — теория

Теперь немного теории.

Как известно, в текстовом редакторе Word есть очень полезная функция «Найти и заменить« (вызывается через сочетание клавиш Ctrl+H или меню «Правка» -> «Заменить…»), которой, к сожалению, пользуются не так часто. Но еще реже используют данную функцию в режиме «Подстановочные знаки«.

А между тем данное умение может принести неоценимую пользу. Свое знакомство с подстановочными знаками и их изучение можно начать со статьи Сергея Хозяинова (будет полезна для новичков).

Я же хочу рассказать о более конкретных случаях применения этого знания, а именно: использование замены с помощью подстановочных знаков и форматирование текста в макросах.

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

Каждая же из функций является действием, либо набором действий, она имеет свое уникальное имя. В макросе же надо лишь указать имя функции для ее вызова.

Макросы — практика

Мой список функций »

Function Tire()‘заменяет дефис в начале абзаца на тиреActiveDocument.Content.Find.ClearFormattingActiveDocument.Content.Find.Replacement.ClearFormattingWith ActiveDocument.Content.Find.Text = «p- ».Replacement.Text = «p= ».Forward = True.Wrap = wdFindContinue.Format = False.MatchCase = False.MatchWholeWord = False.MatchWildcards = False.MatchSounds = False.MatchAllWordForms = False.

Execute Replace:=wdReplaceAllEnd WithEnd FunctionFunction Tire2()‘заменяет дефис окруженный пробелами на тиреActiveDocument.Content.Find.ClearFormattingActiveDocument.Content.Find.Replacement.ClearFormattingWith ActiveDocument.Content.Find.Text = » — ».Replacement.Text = » = ».Forward = True.Wrap = wdFindContinue.Format = False.MatchCase = False.MatchWholeWord = False.MatchWildcards = False.

MatchSounds = False.MatchAllWordForms = False.Execute Replace:=wdReplaceAllEnd WithEnd FunctionFunction Defis()‘заменяет тире в начале абзаца на дефисActiveDocument.Content.Find.ClearFormattingActiveDocument.Content.Find.Replacement.ClearFormattingWith ActiveDocument.Content.Find.Text = «p=».Replacement.Text = «p-».Forward = True.Wrap = wdFindContinue.Format = False.MatchCase = False.

MatchWholeWord = False.MatchWildcards = False.MatchSounds = False.MatchAllWordForms = False.

Execute Replace:=wdReplaceAllEnd WithEnd FunctionFunction Prob()‘заменяет множественные пробелы на одиночный‘удаляет множественные и одиночные пробелы в начале абзаца‘удаляет множественные и одиночные пробелы в конце абзаца‘удаляет знаки абзаца идущие до текста в начале документа‘и знаки абзаца идущие после текста в конце документаActiveDocument.Content.Find.ClearFormattingActiveDocument.

Content.Find.Replacement.ClearFormattingWith ActiveDocument.Content.Find.MatchWildcards = False.Execute «w», , , , , 0, , , 0, » «, 2.Execute «pw», , , , 0, , , , 0, «p», 2.Execute «wp», , , , 0, , , , 0, «p», 2End WithIf ActiveDocument.Paragraphs.Count > 1 ThenDo While ActiveDocument.Paragraphs.Last.Range.Text = Chr(13) And _ActiveDocument.Paragraphs.Count > 1ActiveDocument.Paragraphs.Last.

Range.DeleteLoopEnd IfSelection.HomeKey wdStoryWhile Selection.Paragraphs.First.Range.Characters.Count = 1Selection.Paragraphs.First.Range.DeleteWendEnd FunctionFunction Format()‘весь текст делает 14 размером TimesNewRoman‘с 1,5 интервалом и выравнивает его по ширинеActiveDocument.Content.Font.Name = «Times New Roman»ActiveDocument.Content.Font.Size = 14ActiveDocument.Content.ParagraphFormat.

5)ActiveDocument.Content.ParagraphFormat.Alignment = wdAlignParagraphJustifySelection.HomeKey wdStoryEnd FunctionFunction Zagol()‘делает заголовок (первый абзац) документа жирным‘и выравнивает его по центруActiveDocument.Paragraphs(1).Range.SelectSelection.Font.Bold = TrueSelection.ParagraphFormat.Alignment = wdAlignParagraphCenterSelection.

HomeKey wdStoryEnd FunctionFunction Symb()‘Подсчитывает количество символов в документе‘и выводит сообщениеspacecount = ActiveDocument.Content.ComputeStatistics(Statistic:=wdStatisticCharactersWithSpaces)MsgBox «В тексте содержится символов (включая пробелы) — » & spacecount & » »End FunctionFunction Krasn()‘Делает красный шрифт у выделенного словаSelection.Font.

Color = wdColorRedEnd FunctionFunction Intjyr()‘Выделяет жирным все вопросы «И:»ActiveDocument.Content.Find.ClearFormattingActiveDocument.Content.Find.Replacement.ClearFormattingWith ActiveDocument.Content.Find.Text = «(00130013И:)(*)(0013)».MatchWildcards = True.Forward = True.Replacement.Text = «123».Replacement.Font.Bold = True.

Execute Replace:=wdReplaceAllEnd WithEnd FunctionFunction One_to_Two()‘Разделяет одно предложение на два (перед выполнением курсор ставить после запятой)Selection.TypeBackspaceSelection.TypeText Text:=».»Selection.MoveRight Unit:=wdCharacter, Count:=1Selection.Range.

Case = wdTitleSentenceEnd FunctionFunction Two_to_One()‘Склеивает два предложения в одно (перед выполнением курсор ставить после точки)Selection.TypeBackspaceSelection.TypeText Text:=»,»Selection.MoveRight Unit:=wdCharacter, Count:=1Selection.Range.Case = wdTitleSentenceEnd FunctionFunction Nimerstr()‘Вставляет нумерацию страниц справа вверхуSelection.Sections(1).Headers(1).PageNumbers.

Add PageNumberAlignment:= _wdAlignPageNumberRight, FirstPage:=TrueEnd FunctionFunction MastifTime()‘Находит и заменяет тайм-коды в обычном формате (чч:мм:сс), на формат‘требуемый для Мастифа (чч-мм-сс)ActiveDocument.Content.Find.ClearFormattingActiveDocument.Content.Find.Replacement.ClearFormattingWith ActiveDocument.Content.Find.Text = «(0013)(([0-9]@:[0-9]@:[0-9]@))».MatchWildcards = True.

Forward = True.Replacement.Text = «12».Execute Replace:=wdReplaceAllEnd WithActiveDocument.Content.Find.ClearFormattingActiveDocument.Content.Find.Replacement.ClearFormattingWith ActiveDocument.Content.Find.Text = «:([0-9]@):».MatchWildcards = True.Forward = True.Replacement.Text = «-1-».

MatchWildcards = False.MatchSounds = False.MatchAllWordForms = False.

Execute Replace:=wdReplaceAllEnd WithEnd FunctionFunction Tehnik()‘Ищет в тексте технические надписи в скобках‘если они прописаны без точки, то перед закрывающей скобкой ставится точка,‘если они написаны (случайно) не курсивом, то выделяются имDim MyCollection As New CollectionWith MyCollection.Add («Аплодисменты»).Add («Говорят одновременно»).Add («Дефект записи»).Add («Дефект звука»).Add («Смена кадра»).Add («Обрыв записи»).Add («Техническая съемка»).Add («Техническая реплика»).Add («Технический разговор»).Add («Конец просмотра видеоролика»).Add («Начало просмотра видеоролика»).Add («Просмотр видеоролика»).Add («Возобновление тайм-кода»).Add («Остановка тайм-кода»).Add («Смена тайм-кода»).Add («Смех»).

Add («Смеется»).Add («Кашель»).Add («Кашляет»)End WithDim i As IntegerFor i = 1 To MyCollection.CountActiveDocument.Content.Find.ClearFormattingActiveDocument.Content.Find.Replacement.ClearFormattingWith ActiveDocument.Content.Find.Text = «((» & MyCollection.Item(i) & «))».MatchWildcards = True.Forward = True.Replacement.Text = «(1.)».Replacement.Font.Italic = True.

Execute Replace:=wdReplaceAllEnd WithActiveDocument.Content.Find.ClearFormattingActiveDocument.Content.Find.Replacement.ClearFormattingWith ActiveDocument.Content.Find.Text = «((» & MyCollection.Item(i) & «.))».MatchWildcards = True.Forward = True.Replacement.Text = «(1)».Replacement.Font.Italic = True.Execute Replace:=wdReplaceAllEnd WithNext iEnd FunctionSub Zamena()‘ Комплекс последовательных функций при форматировании работ всех видов кроме Первого канала.ProbTire2TireTroetochNimerstrTehnikSymbEnd FunctionSub Zamena2()‘ Комплекс последовательных функций при форматировании работ Первого канала.ProbDefisTire2TroetochNimerstrTehnikSymbEnd FunctionSub ФОРМАТ()FormatProbTire2TireTroetochIntjyrTehnikNimerstrZagolSymbEnd SubSub МАСТИФ()Format2ProbIntjyrTehnikMastifTimeNimerstrZagolSymb

End Sub

Прописав это и сохранив в шаблоне «Normal.dot« можно получить доступ к этим макросам из любого документа. Вызывается окно выбора макросов горячей клавишей Alt+F8.

Я предпочитаю использовать кнопки на панели инструментов. Поместить на нее кнопку и привязать к ней макрос очень легко. Об этом доступно написано в данной статье.

Использование макрорекордера в Word 2003/2007/2010. Запись, выполнение и просмотр макросов

Если у Вас возник вопрос «Как использовать макрорекордер для записи макроса в Word?» то эта статья для Вашего внимания. Здесь как раз поочередно рассматривается процесс запуска макрорекордера и записи макросов в различных версиях Word. Для лучшего понимания того, что будет происходить, определим задачу — записать макрос, который будет выделять весь текст документа.

Microsoft Word  2003

Запускаем приложение, открываем в нем текстовый файл, заходим в главное меню Сервис/Макрос и выбираем пункт «Начать запись…»

Выбираем пункт меню «Начать запись» и в появившемся окне «Запись макроса», выбираем имя будущему макросу (я оставлю то имя, которое ему присвоено по умолчанию «Макрос1») и место его хранения. Местом хранения может быть сам файл документа, а может быть глобальный шаблон Normal.dot, аналог личной книги макросов Personal.

xls, которая есть в Excel. При необходимости присваиваем будущему макросу сочетание горячих клавиш, при нажатии которых будет происходить выполнение (запуск) макроса. В этом примере не будем присваивать макросу никаких сочетаний клавиш, поле с описанием оставим без изменений и местом для сохранения выберем файл Normal.dot.

Идем дальше, нажимаем кнопку ОК.

Макрорекордер включен, началась запись всех наших действий и одновременный их перевод на язык программирования  Visual Basic for Application, сокращенно VBA.

 В начале этой статьи мы задались целью записать макрос, выделяющий всю текстовую область, поэтому нашим действием будет выделение текста в открытом файле. Для этого можно зайти в главное меню «Правка» и выбрать там пункт «Выделить все», а можно тоже самое сделать нажатием сочетания горячих клавиш Ctrl+A.

Прекращаем запись нажатием кнопки «Остановить запись», для этого переходим туда же, откуда эту запись начинали, то есть в меню Сервис/Макрос. 

Перед выполнением макроса снимем выделение с текста, или откроем новый текстовый файл, зайдем в меню Сервис/Макрос/Макросы либо нажмем сочетание клавиш Alt+F8 (это сочетание актуально для всех приложений любых версий), выберем из списка макрос с нашим названием «Макрос1» и нажмем кнопку «Выполнить».

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

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

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

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

Чтобы просмотреть записанный нами макрос в виде программного кода, нужно запустить редактор Visual Basic через меню Сервис/Макрос/Редактор Visual Basic, либо нажатием сочетания клавиш Alt+F11 (это сочетание тоже актуально во всех версиях всех приложений). В открывшемся окне редактора видим проект Normal и в этом проекте новый модуль Module1, в котором и сохранен программный код нашего макроса.

Microsoft Word  2007

В окне приложения MS Word 2007 кнопку «Начать запись…» можно отыскать сразу в нескольких местах. Во-первых, это левый нижний угол экрана, как показано на рисунке ниже

Во-вторых, на ленте главного меню, на вкладке «Вид»

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

Выполнение макроса и просмотр его программного кода осуществляется абсолютно аналогично описанию из предыдущего раздела, поэтому я не буду повторяться, а перейду к Microsoft Word  2010. Не забываем об изменении настроек системы безопасности, если вдруг записанный Вами макрос не запускается.

Microsoft Word  2010

Если Вы перешли на приложения пакета MS Office 2010 после версии 2007, то кнопки «Запись макроса» и «Остановить запись» в версии Word 2010 будут расположены в привычных уже местах.

Нахождение этих кнопок  идентично предыдущей версии текстового редактора — это все тот же левый нижний угол экрана и две вкладки на ленте — «Вид» и «Разработчик» (подробнее о них написано в предыдущем разделе Microsoft Word 2007).

Сам процесс записи, просмотра и выполнения записанного макроса также полностью повторяет предыдущую версию. После установки офисного пакета 2010, я обнаружил, что по умолчанию редактор Visual Basic отсутствует, пришлось шагнуть назад и доустановить этот недостающий компонент.

Называется он «Visual Basic для приложений» и находится в отдельном компоненте пакета под названием «Общие средства Office», так что не пугайтесь, если кнопка записи при первом на нее нажатии никак не среагировала на Ваши действия.

Если же запись прошла успешно, но возникла проблема при запуске макроса, то скорее всего это связано с настройками системы безопасности.

Использование макросов в Microsoft Office

Вы работаете в приложениях пакета Microsoft Office и периодически выполняете повторяющиеся задачи? Любая последовательность команд может быть автоматизирована и сведена к выбору пункта меню или нажатию комбинации клавиш.

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

Как это делается в приложениях MS Word и Excel, мы и рассмотрим в данной статье.

Концепция макросов

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

Цель макросов – автоматизировать повторяющиеся действия и расширить функциональные возможности приложения.

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

Технология макросов поддерживается большинством профессиональных программных продуктов, среди которых: AutoCAD, Adobe Photoshop, 3D Studio Max, Microsoft Office и др.

Поддержка макросов в Microsoft Office

MS Office предлагает два способа создания макропрограмм: непосредственно ввод ее текста (процедуры VBA) в редакторе VBA либо применение встроенного средства записи.

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

Второй, напротив, необычайно прост и предназначен для новичков, не требует знания принципов программирования и синтаксиса команд VBA.

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

Предварительно макропрограмме необходимо дать уникальное имя, описание (необязательно) и указать параметры сохранения – они несколько отличаются в различных приложениях MS Office, но в общем случае их два: сохранение макроса в текущем документе (в других он будет недоступен) либо в собственной библиотеке макросов или шаблоне (станет доступен для всех файлов в этом приложении). Библиотека макросов может быть перенесена на другой компьютер и подключена к соответствующему приложению MS Office, а макропрограмма, сохраненная в файле, копируется и переносится вместе с ним.

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

При записи автоматически генерируется текст макропрограммы – процедура VBA. Желающим научиться самостоятельно создавать более мощные и гибкие макросы непосредственно в редакторе будет очень полезно изучить последовательность сгенерированных команд VBA. Для этого нужно нажать сочетание Alt+F8, выбрать из списка соответствующий макрос и нажать кнопку Изменить.

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

Макросы для Microsoft Word

В MS Word макросы можно использовать для форматирования объектов (таблиц, рисунков и т. д.), указания различных настроек для вывода текущего документа на печать, преобразования документов, созданных в других текстовых редакторах, выполнения различных действий с выделенными данными и прочих операций.

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

Даже в малом фрагменте их удаление вручную займет много времени. С помощью диалогового окна поиска и замены это можно выполнить в 6–7 кликов мышью и вводом небольшого текста.

Последовательность действий в этом случае следующая:

1. В MS Word 2007 перейдите на вкладку Вид, найдите меню Макросы, нажмите в нем раскрывающееся меню Макросы, после чего выберите команду Запись макроса, как показано на рис. 1. Для MS Word 2003: Сервис -> Макрос -> Начать запись…
2. В появившемся диалоговом окне Запись макроса введите имя создаваемой макропрограммы. Оно должно быть уникальным, отражать смысл макроса и не содержать пробелов. Назовем наш макрос ЛишниеПробелы. В графе Макрос доступен для выберите место сохранения – для всех документов либо только для текущего. Выбираем первый вариант. Далее в графе Описание вкратце укажите, для чего предназначен макрос.
3. После этого в том же диалоговом окне нажмите одну из кнопок Назначить макрос кнопке (панели для версии 2003) или Назначить макрос клавишам. При выборе первого варианта откроется окошко, из которого в MS Word 2003 название данного макроса можно перетащить на панель инструментов или на любое меню (сделать его пунктом этого меню), а работая в Word 2007, нажав кнопку Добавить, можно поместить вызов макропрограммы в панель быстрого доступа. Если же вы предпочитаете запускать макрос сочетанием клавиш, выберите второй вариант, укажите желаемую комбинацию и нажмите OK. Назначим нашему макросу сочетание клавиш Ctrl+Alt+Пробел.
4. Запись начата. Теперь вызываем диалог Найти и заменить. Для этого на вкладке в меню Редактирование нажимаем кнопку Заменить. Для 2003 версии: Правка -> Заменить…
5. В окне Найти и заменить в поле Найти пишем: «{2;}». Эта запись означает – искать 2 или более пробелов подряд. А в графе Заменить на ставим один пробел. После этого нажимаем на кнопку Больше для указания особых параметров поиска. Укажите Направление – везде и снимите галочки со всех опций, кроме Подстановочные знаки. Если эта опция не была установлена, выберите ее. Параметры замены должны быть указаны, как на рис. 2, затем нажмите кнопку Заменить все.
6. После того как будет выдано сообщение о результатах замены, нужно остановить запись макропрограммы. Для этого нажмите на кнопку Остановить запись (значок- квадратик), которая находится в строке состояния, если вы работаете в Word 2007, и Сервис -> Макрос -> Остановить запись для Word 2003.

Макрос записан. Теперь по нажатии комбинации клавиш Сtrl+Alt+Пробел из текущего документа будут автоматически удаляться лишние пробелы.

Макросы для Microsoft Excel

В MS Excel макропрограммы могут быть использованы для создания и печати отчетов, применения специального форматирования к выбранным диапазонам ячеек, импортирования данных, автоматического построения диаграмм, написания собственных программ табличных вычислений и др.

В MS Excel запись, сохранение и быстрый запуск созданных макросов осуществляется подобно тому, как это делается в Word. Рассмотрим несколько примеров, с которыми встречаются пользователи Excel.

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

Вследствие этого в зависимости от версии и текущих настроек Excel текст будет перекрывать соседние ячейки или «прятаться» под ними, если же вводятся числовые данные – вместо цифр вы можете увидеть набор символов #####.

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

1. Создать новую книгу или открыть существующую. Описанным выше способом задайте имя, сохранение в личной книге макросов (не только для текущей книги), комбинацию клавиш (по желанию) и начните запись макроса.
2. Нажмите сочетание клавиш Ctrl+Ф для выделения всех ячеек листа. На закладке в меню Ячейки нажмите кнопку Формат и в меню выберите команду Автоподбор ширины столбца (если вы работаете в 2007 версии MS Office) либо выполните команду Формат -> Столбец -> Автоподбор ширины (для MS Excel 2003). Поставьте курсор снова в ячейку А1 для снятия выделения.
3. Остановите запись (идентично остановке записи макроса в Word).

Часть пользователей применяют автоформат для быстрого создания таблиц. Наверняка у каждого из них есть свои, наиболее часто используемые стандартные или созданные стили автоформата.

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

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

P.S

Если вы заметили, что в используемом приложении MS Office периодически выполняете одну и ту же последовательность операций, приступайте к написанию макроса. Этим вы сэкономите свое время, не будете отвлекаться на рутинные операции и сосредоточите внимание на более важных задачах.

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

Несколько советов пользователям, применяющим макросы:

1. Настройте свою антивирусную программу на фоновую проверку документов MS Office, содержащих макросы (во многих антивирусах установлено по умолчанию).
2. Выбирайте опцию Отключить макросы при открытии документов с макросами, загруженных из Интернета или полученных из сомнительных источников.
3. Без особой необходимости не изменяйте настройки по умолчанию, касающиеся макросов и безопасности, в приложениях MS Office.

Установка рекомендуемых настроек для Word или Excel 2007: кнопка Office -> Параметры Word Excel -> Центр управления безопасностью -> Параметры центра управления безопасностью -> Параметры макросов, выберите опцию Отключить все макросы с уведомлением. Для пользователей предыдущей версии: Сервис -> Параметры -> Безопасность -> Защита от макросов выберите степень защиты Средняя или Высокая.

Ссылки по теме

office.microsoft.com/ru-ru/help/HA012317941049.aspx – статья, посвященная основам создания макропрограмм для всех приложений Microsoft Office.

office.microsoft.com/ru-ru/word/HA100997691049.aspx – рассмотрение общих вопросов записи макросов в Microsoft Word 2007.

office.microsoft.com/ru-ru/excel/HP100141111049.aspx – запись макросов в Excel 2007, создание макропрограмм непосредственно в редакторе VBA.

office.microsoft.com/ru-ru/excel/HA100310711049.aspx – безопасное использование макросов в разных приложениях MS Office 2007.

www.philol.msu.ru/~yegorov/macro/index.php – полезные макросы для Microsoft Word.

www.firststeps.ru/vba/excel/vbaexcel1.html – документация по созданию мощных процедур для MS Excel на языке VBA с примерами.

Создать макрос в ворд это легко

В этом уроке Вы узнаете:

• Что такое Макросы в ворд
• Как применить макросы в ворд
• Как записать макрос в ворд

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

Что такое макросы в ворд

Макросы в программе Microsoft Office Word — это набор команд/сочетание клавиш на клавиатуре, сообщающее алгоритм выполнения действий в автоматическом режиме, для достижения результата. Другими словами, это записанная последовательность сочетания команд в единую команду.

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

товаров и т.д. Алгоритм был следующий:

1. Выйти за покупками
2. Пройтись по n-количеству продавцов
3. Доставить купленный товар домой

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

1. Фирма, предоставляющее услуги доставки заказанного Вами товара, наладило взаимодействия между поставщиком товара и услугой транспортировки.
2. Вы в свою очередь сделали заказ, кликнув по монитору или в приложении в телефоне.

Итог: кто-то выполняет сочетание различных действий за Вас, по вашему заказу.

Вот и в Microsoft Word похожий процесс.

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

Как применить макрос в ворд

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

Ярким примером такого случая является структурирование текста для создание программного обеспечения. А точнее, Вам дают перечень помещений в каком-то огромном здании, и вам необходимо выстроить их иерархию из предоставленных данных.

Но это примеры от среднего уровня и выше, а пока я Вам расскажу и покажу основы, принцип действия макроса на достаточно легком примере.

Как записать макрос в word

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

В данной статье написано как сделать ударение с использованием кода (для ударения этот код — 0301). Переходите по ссылке Ударение над буквой в ворде. 

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

1. Устанавливаем курсор мышки за буквой, на которую хотим поставить ударение (в слове «года» нам нужно поставить ударение на букву «о»).

1. Переходим в вкладку «Вид» → раздел «Макросы» →нажимаем «Запись Макроса»

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

1. В появившемся окне выделяем создаваемый макрос нажимаем «Добавить» и нажимаем «Ок»

1. После того, как Вы нажали «Ок» пошла запись макроса. Теперь каждое нажатие клавиши записывается ровно в той же последовательности. Вводим 0301 и нажимаем сочетание клавиш ALT+X

1. Теперь во вкладке «Вид», в разделе «Макросы» нажимаем на «Макросы» → «Остановить запись»

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

Ворд файл макрос

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

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

Как создать макросы в Word?

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

Что такое макрос и для чего он используется?

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

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

Такой элемент является очень важным и нужным, особенно для тех, кто привык экономить свое время.

Макрос в программе Ворд может использоваться для следующих целей:

1. Для ускорения процесса обработки текста. В частности, с помощью этого элемента можно быстро заполнить требуемую область либо отформатировать содержимое документа.
2. Для того чтобы объединить несколько команд. Согласитесь, создавать табличную форму в Ворд и потом еще наполнять ее содержимым довольно проблематично. Такого рода инструмент позволит быстро создать нужный параметр и в дальнейшем просто вставить его в требуемое место.
3. Для того чтобы максимально упростить доступ к всевозможным параметрам, которые разбросаны в разных диалоговых окнах. Пользователи инструмента Ворд наверняка знают, как сложно порой отыскать требуемый элемент из-за обилия различных многоуровневых меню. Подобный компонент поможет заметно упростить эту задачу.
4. Для того чтобы автоматизировать обработку тех действий, которые являются весьма сложными и рутинными. Макросы в Ворд умеют доводить до автоматизма те параметры, на которые, казалось бы, уходит очень много драгоценного времени.

Как создать макрос?

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

Первый вариант — это создание подобного элемента при помощи специального средства для создания макроса. Оно может быть как встроено в Word, так и взято с каких-либо сторонних источников.

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

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

Второй вариант — это создать элемент такого рода для Word путем использования специального программного кода, пишущегося на языке под названием Visual Basic.

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

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

Есть возможность провести процесс создания макросов в Word путем комбинирования вышеприведенных методик.

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

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

Потом надо войти в меню «Вид — Макросы — Запись макроса», выполнить необходимые действия, которые надо записать, после чего выполняется остановка записи макроса.

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

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

Нужно заметить, что макросами могут пользоваться не только те, кому по роду службы необходимо заполнять объемные документы и бланки.

В частности, прибегать к использованию такого рода инструментов могут и обычные пользователи, которым необходимо что-либо напечатать в Ворде, к примеру, какие-либо официальные документы.

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

Как создать макросы в

А вы знали, что часто повторяемые действия в текстовом редакторе Word последних версий (2007, 2010, 2013, 2016) можно автоматизировать? Достигается это путем создания макросов в «Ворде». Что это, как их сделать, включить/отключить, как открыть файл с такими элементами, мы обязательно разберем далее.

Что это — макросы в «Ворде»?

Макрос — это комплекс инструкций, группируемых в единую команду для автоматического выполнения того или иного задания. Пишутся они на языке Visual Basic в редакторе с одноименным названием.

Чаще всего макросы применяются пользователем для:

• Ускорения наиболее востребованных действий форматирования, редактирования.
• Объединения нескольких команд в одну. Как пример — создание таблицы с определенным числом столбцов, строк, стилем границ.
• Облегчения доступа к параметрам, находящимся в диалоговых окнах.
• Автоматизации процесса обработки последовательных сложных операций.

Таким образом, макросы в «Ворде» превращают несколько задач в одно действие. Чтобы его осуществить, необходимо набрать комбинацию клавиш или нажать на кнопку панели быстрого доступа.

Разберем, как создать макрос в «Ворде» этого типа:

1. Зайдите в «Вид», выберите «Макрос» — «Создать…».
2. Придумайте имя для этого комплекса команд.
3. Если вы хотите использовать его для всех файлов, то обязательно выберите доступность «Для всех документов».
4. Кликните на назначение «По кнопке».
5. В следующем окне кликните на новый макрос. Его наименование будет начинаться с Normal — NewMacros, после чего будет следовать имя, которым вы его обозначили.
6. Далее — щелчок на «Добавить», а затем на «Изменить».
7. Из предложенной палитры выберите значок для своего макроса в «Ворде».
8. Теперь самая важная часть: запись шагов. Для каждого нужно выбрать команду или нажать определенную клавишу. Текст необходимо выделять с помощью клавиатуры. Система будет записывать все шаги, что вы сделаете, — нажатия клавиш, действия мышью.
9. Когда вы завершите задуманное, закончите запись: зайдя в раздел «Макросы», выберите «Остановить…»

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

Word 2010-2016: запись макроса, запускающегося комбинацией клавиш

Теперь разберем, как создать макрос в «Ворде», который активируется нажатием сочетания кнопок:

1. Зайдите в «Вид», найдите «Макросы». Далее — «Записать…»
2. Введите его имя. Не забудьте указать, если это нужно, что макрос доступен для всех документов.
3. Выберете значок доступности по клавиатуре.
4. В поле «Новое сочетание…» введите определенную комбинацию клавиш, которая будет запускать в действие макрос. Если она будет совпадать с другой стандартной командой, то нужно придумать иное сочетание.
5. Кликните на «Назначить».
6. Теперь запись шагов для макроса: для каждого из них выставляйте определенную команду, щелчок мышкой. Все действия будут сохраняться системой.
7. Когда все будет готово, зайдите в «Макросы» (меню «Вид») и остановите запись.

Теперь установленным сочетанием клавиш вы можете активировать созданный комплекс команд.

Word 2007: начало создания макроса

Теперь расскажем, как сделать макрос в «Ворде 2007». Процесс немного отличается от того, что представлен для поздних версий этого текстового редактора.

Первым делом вам нужно активировать вкладку разработчика:

1. Кликните на кнопку Microsoft Office (круглую, с логотипом компании).
2. Выберите «Параметры «Ворда»».
3. В «Основных параметрах…» сделайте активным пункт «Показывать «Разработчик» на ленте».

Теперь переходим непосредственно к созданию комплекса команд:

1. Зайдите на появившуюся вкладку «Разработчик». В «Коде» выберите «Запись макроса».
2. В «Имя…» введите название. Будьте внимательны: если оно будет совпадать с наименованием стандартного макроса, то новая запись заменит его. Поэтому для проверки в «Макросах» группы «Код» найдите «Команды Word» и убедитесь, что придуманное имя не совпадает с там присутствующими.
3. В «Макрос доступен…» выберите, где его можно применять. Если для всех файлов, то остановитесь на Normal.dotm.
4. Введите описание.

Word 2007: три варианта записи макроса

Далее вы можете пойти тремя путями.

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

Привязка макроса к кнопке. Тут следует пойти таким путем:

1. Щелкните на «По кнопке».
2. В «Настройки панели быстрого доступа» выберите все документы или отдельный файл, где можно применять этот макрос.
3. В окне «Выбрать команды» нажмите на нужный макрос. Затем — щелчок на «Добавить».
4. Для настройки кликните на «Изменить».
5. В «Символе» выберите значок для кнопки.
6. «Отображаемое имя» — наименование макроса.
7. Два раза кликните на ОК, чтобы начать запись.

Привязка макроса к сочетанию клавиш. Здесь следующий путь:

1. Остановитесь на «Клавиатуре».
2. В «Командах» найдите макрос, который вы собрались записать.
3. В «Новом сочетании клавиш» введите придуманную комбинацию. Клик на «Назначить».
4. Щелкните на «Закрыть», чтобы начать запись.

Далее путь становится единым для всех вариантов:

1. Выполните последовательность действий, которую нужно включить в макрос.
2. Завершить процесс можно выбором «Остановить запись» во вкладке «Код».

Открытие файлов с макросами

Документы, поддерживающие макросы, имеют расширение .docm. Трудности с ними иногда возникают на моменте запуска — текстовой редактор выдает ошибку. Разберем, как открыть «Ворд» с макросами:

• Два раза щелкните на данный документ. Система сама выберет программу на вашем ПК, способную его открыть.
• При неудаче измените расширение на .doc, .docx.
• В случае неудовлетворительного результата воспользуйтесь программами:
• Word 2007, распознающий Open XML.
• «Ворд» 2010.
• Приложение FileViewPro.

Включение макросов

Как включить макросы в «Ворде»? Есть три варианта.

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

С помощью представления Backstage. При открытии файла с макросами сделайте следующее:

1. Кликните на «Файл».
2. В «Предупреждении системы безопасности» нажмите на пункт «Включить содержимое».
3. В данном разделе сделайте активным «Всегда включать…» Это превратит документ в надежный.

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

1. Откройте вкладку с названием «Файл».
2. В «Предупреждении системы безопасности» нажмите на «Включить содержимое».
3. Перейдете в «Доп. параметры».
4. В «Параметрах безопасности…» выберите «Включить лишь для этого сеанса» в отношении каждого из имеющихся в документе макросов.
5. Подтвердите нажатием ОК.

Напоследок разберем, как убрать макросы в «Ворде»:

1. Во вкладке «Файл» перейдите на «Параметры».
2. В «Центре управления…» выберите «Параметры центра…»
3. Щелкните на «Параметры макросов».
4. Выберите, что вам нужно:
   • Отключить все без уведомления (как макросы, так и предупреждения об опасности/безопасности).
   • Отключить все с уведомлением (убираются только макросы, уведомления о безопасности остаются).
   • Отключить все, кроме макросов с цифровой подписью (отображаются только макросы издателя, которому выражено доверие, — на их включение нужно согласиться в уведомлении при открытии файла).
5. Подтвердите выбор нажатием на ОК.

Создание макросов имеет свои особенности в различных версиях текстового редактора «Ворд». А при открытии файла с данной группой команд в данной программе вы можете выбрать, включать или не активировать их.