Создание макроса в word: Как создать макрос в Ворде

Как сделать макросы в word?

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

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

Как создать макрос в программе Microsoft Word?

Перейдите в программе Microsoft Word ко вкладке «Вид», а затем щелкните по кнопке «Макросы». В отобразившемся дополнительном меню выберите пункт «Запись макроса».

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

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

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

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

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

Запуск макросы выполняется в зависимости от того, какой метод запуска был выбран вами при его настройке. Если вы выбрали пункт «Кнопка», то, соответственно, в самой верхней части окна Microsoft Word будет отображена выбранная вами кнопка.

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

Правильное использование макросов позволит сделать работу с офисным пакетом Microsoft Office значительно быстрее и продуктивнее. Если вам требуется выполнение большого количества рутинных задач – не пренебрегайте использованием данной функции.

Источник: https://itcreeper.ru/macros-in-ms-word/

Как записывать макросы и автоматизировать сложные задачи в Microsoft Word

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

Что такое макрос

Макрос — это просто запись серии нажатий кнопок, кликов и набора текста.

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

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

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

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

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

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

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

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

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

 В нашем примере мы собираемся создать некую вставку для ввода в стиле jokey, которая вставляет в текст имя: «Lwaxana Troi, Дочь Пятого Дома, обладатель Священной Чаши Rixx, наследница Святых Кольцов Betazed» — то, что мы не хотел бы печатать снова и снова, если бы это был наш полный титул.

Выберите, следует ли назначать макрос кнопке или комбинации клавиш. И, наконец, выберите, где хранить ваш макрос. По умолчанию он сохраняется в главном шаблоне Word (файл с именем Normal.dotm), чтобы вы могли использовать его во всех ваших документах. Но вы так же можете сохранить его только в текущем документе, если хотите. Нажмите кнопку «ОК», когда закончите.

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

Если вы выберете опцию «Кнопка», вам будет предоставлен экран, позволяющий выбрать, где хранить новую кнопку. По умолчанию это делается на панели быстрого доступа. Нажмите имя макроса в левом столбце, а затем нажмите кнопку «Добавить», чтобы добавить макрос в список кнопок панели инструментов, показанной справа. Когда вы закончите, нажмите кнопку «ОК».

Назначение макроса

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

 Убедитесь, что имя макроса выбрано в панели «Команды», щелкните внутри «Нажмите клавишу« Создать ярлык », а затем нажмите комбинацию клавиш, которую вы хотите использовать.

 Вы можете выбрать практически любую комбинацию Ctrl, Alt, Shift и любого другого первичного ключа, но имейте в виду, что вам понадобится тот, который еще не назначен ярлыку Word или

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

 Word наблюдает и записывает все, что вы делаете в качестве макроса.

 Word на самом деле не дублирует все ваши действия, вместо этого он принимает фактические действия (определённый набор действий или команд), которые вы делаете, и создает скрипт для их запуска.

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

При создании макроса вы можете нажать кнопку «Пауза записи», если вам нужно что-то подстроить или сделать несколько быстрых заметок. Нажмите кнопку «Возобновить запись», чтобы продолжить работу над вашим макросом.

Когда все будет готово, откройте раскрывающееся меню «Макросы» еще раз, а затем нажмите команду «Остановить запись».

Вот и все. Word создает макрос из вашей записи и сохраняет его как комбинацию клавиш или клавиши.

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

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

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

Перевод статьи » How to Record Macros and Automate Tiresome Tasks In Microsoft Word «

Источник: https://greatech.ru/2018/03/09/how-to-record-macros-and-automate-tiresome-tasks-in-microsoft-word/

Как включить макросы в Word

1. Нажмите кнопку Microsoft Office , а затем — кнопку Параметры Word.
2. Выберите Центр управления безопасностью, затем  — Параметры центра управления безопасностью, а затем  — Параметры макросов.

1. Выберите нужные параметры.
   • Отключить все макросы без уведомления Данный параметр следует выбирать при отсутствии доверия к макросам. В результате в документах отключаются все макросы и связанные с ними оповещения системы безопасности. Макросы без цифровой подписи, но полученные из достоверных источников, можно переместить в надежное расположение. Макросы в документах из надежного расположения могут запускаться без проверки системой безопасности центра управления безопасностью.
     
   • Отключить все макросы с уведомлением Данный параметр установлен по умолчанию. Выберите этот параметр, если нужно отключить макросы, но при их наличии необходимо получать предупреждения системы безопасности. Это позволит включать макросы только в случаях, когда это требуется.
   • Отключить все макросы кроме макросов с цифровой подписью Данный параметр идентичен параметру Отключить все макросы с уведомлением за исключением того, что при наличии цифровой подписи надежного разработчика макрос запускается только в случае, если данный разработчик занесен в список доверенных издателей. Если разработчик не занесен в список доверенных издателей, последует предупреждение. Таким образом, можно выбирать нужный вариант: включить макрос, содержащий цифровую подпись, или занести разработчика в список доверенных издателей. Все макросы, не содержащие цифровой подписи, отключаются без уведомления.
     
     • Включить все макросы (не рекомендуется, возможен запуск опасной программы) Данный параметр разрешает выполнение всех макросов. Компьютер становится уязвимым для потенциально опасных программ, поэтому использовать данный параметр не рекомендуется.
     • Доверять доступ к объектной модели проектов VBA.    Этот параметр предназначен для разработчиков и позволяет явно заблокировать или разрешить программный доступ к объектной модели VBA от любого клиента автоматизации. Другими словами, он позволяет защитить код, созданный для автоматизации программ Office и программного управления средой Microsoft Visual Basic для приложений (VBA) и объектной моделью. Этот параметр можно установить для отдельного пользователя или приложения. По умолчанию доступ запрещен. Этот параметр безопасности затрудняет несанкционированным программам создание самореплицирующегося кода, который может причинить вред системе пользователя. Чтобы любой клиент автоматизации смог получить доступ к объектной модели VBA, пользователь, выполняющий код, должен явным образом предоставить доступ. Чтобы включить доступ, установите флажок.
       

СОВЕТ : Диалоговое окно с параметрами безопасности макросов можно открыть с вкладки Разработчик на ленте, которая является частью пользовательского интерфейса Microsoft Office Fluent.

Если вкладка Разработчик недоступна, нажмите кнопку Microsoft Office , а затем — кнопку Параметры Word. Выберите категорию Основные и установите флажок Показывать вкладку «Разработчик» на ленте.

Подписываемся на канал, ставим лайки, даём деньги.

Источник: https://prodma.ru/kak-vklyuchit-makrosy-v-word/

Как создать макросы в Word — Офис Ассист

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

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

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

• Определить порядок действий;
• Выполнить;
• Записать действия в макрос.

Допустим, нужная вторая колонка. Перемещение между столбцами таблицы осуществляется при помощи клавиши «Tab». Вы нажимаете «Tab» необходимое количество раз, пока не дойдёте до нужной колонки.

Затем, если вам нужно выделить часть содержимого ячейки, снимаете выделение, нажав стрелку влево. Далее, выделим два слова из ячейки. Выполните комбинацию Ctrl+Shift и нажмите стрелку вправо дважды (либо столько раз, сколько слов необходимо выделить).

И последний шаг — сделать выделенную область полужирной с помощью комбинации Ctrl+B.

Подобные команды могут содержать любое количество шагов и быть любого уровня сложности. Процесс создания макрокоманд одинаковый и для Word 2007, и для Word 2010, и для версии Word 2013.

Источник: http://officeassist.ru/word/kak-sozdat-makrosy-v-word/

Создание макросов в Word

• Цель работы: научиться создавать макросы в Word.
• Содержание работы:
• 1 Создание и запуск макроса
• 2 Создание макроса, запускаемого из меню Сервис.
• 3 Создание макроса, запускаемого с клавиатуры.
• 4 Создание макроса, запускаемого с панели инструментов.
• Контрольные вопросы:

1.

Как создать макрос, запускаемый из меню Сервис?

1 Начните запись макроса, дважды щелкнув на индикаторе ЗАП в строке состояния или выбрав команду СервисМакросНачать запись…

2 В поле Имя макроса введите имя нового макроса.

3 Выберите в поле Макрос доступен для: шаблон или документ, в котором будет храниться макрос. Обычно выбирают шаблон “Всех документов(Normal.dot).

4 При желании введите краткое описание макроса в поле Описание.

5 Выбор способа запуска макроса.

5. 1 Если макрос будет запускаться только из меню Сервис, то нажмите кнопку OK для начала записи макроса.

2.Как создать макрос, запускаемый из Панели инструментов?

1 Начните запись макроса, дважды щелкнув на индикаторе ЗАП в строке состояния или выбрав команду СервисМакросНачать запись…

2 В поле Имя макроса введите имя нового макроса.

3 Выберите в поле Макрос доступен для: шаблон или документ, в котором будет храниться макрос. Обычно выбирают шаблон “Всех документов(Normal.dot).

4 При желании введите краткое описание макроса в поле Описание.

5 Выбор способа запуска макроса.

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

3.Как создать макрос, который можно запускать из Панели инструментов и с клавиатуры ?

1 Начните запись макроса, дважды щелкнув на индикаторе ЗАП в строке состояния или выбрав команду СервисМакросНачать запись…

2 В поле Имя макроса введите имя нового макроса.

3 Выберите в поле Макрос доступен для: шаблон или документ, в котором будет храниться макрос. Обычно выбирают шаблон “Всех документов(Normal.dot).

4 При желании введите краткое описание макроса в поле Описание.

5 Выбор способа запуска макроса.

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

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

4.Как создать макрос с запуском только с клавиатуры?

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

5.Как удалить макрос из Панели инструментов и строки Меню?

Удаление клавиш макросов с Панели инструментов или Меню выполняется командой СервисНастройка…, в которой нужно выделить удаляемый макрос, нажать клавишу Изменить выделенный объект…, и выбрать в списке команду Удалить

6.Какие клавиши следует использовать для запуска макросов и почему?

В качестве запускающих клавиш берутся функциональные клавиши F2…F12 и служебные клавиши Alt и Ctrl в сочетании с любыми клавишами. Следует назначать клавиши, не занятые какими-либо операциями, о чем можно узнать, введя их в поле Новое сочетание клавиш: в окне Настройка.

Если клавиша уже несёт какую-нибудь функциональную нагрузку, то после её ввода появится наименование этой функции, оно изменится на функцию запуска данного макроса, т.е. прежнее назначение клавиш будет утеряно.

Если клавиша свободна, появится слово [нет] и её можно использовать для запуска макроса.

Рекомендуется для макросов использовать следующие свободные сочетания клавиш: Shift+F10, Ctrl+1, Ctrl+2, Ctrl+5, Ctrl+7, Ctrl+8, Ctrl+9 и др.

7.Как запустить макрос, если его кнопка не видна на Панели инструментов или в Меню

Если кнопку макроса на панели или в меню не видно, значит, она на видимой части этих групп не помещается.

В этом случае нужно пере-тащить всю группу на свободное место экрана (в рабочую область, например), ухватив её мышью за пунктирную или двойную вертикальную линию в левой части строки (начало группы) или за свободные места в середине и в правой части группы (знак конца группы — ▼ или » — Параметры панелей инструментов).

Задание

1 Разработать макрос для вставки в текст на место курсора своей фамилии с инициалами. Присвоить макросу имя «ФИО» и любой значок из предлагаемого в окне Настройка списка . Макрос должен запускаться

1. • из меню Сервис,
2. • из Панели инструментов и
3. • клавишами клавиатуры.

2 Разработать макрос для вывода Редактора формул, использующего стиль Times New Roman, полужирный, курсив. Вручную он за-пускается командами Вставка Объект Microsoft Equation 3.0 ОК меню Стиль Другой шрифт Times New Roman Полужирный Кур-сив.

• 3 Разработать макрос для вставки таблицы из двух строк с количеством столбцов, равным порядковому номеру студента в списке группы из журнала преподавателя или старосты.
• Лабораторная работа №10
• Создание форм в Word
• Цель работы: научиться создавать формы в Word.
• Содержание работы:
• 1 Создание формы.
• 2 Операции с полями формы
• 3 Защита полей формы.
• Контрольные вопросы:

1.Что называется формой документа. Состав формы. Чем она отличается от шаблона или мастера?

Форма – это документ, содержащий постоянную и переменную части.

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

Переменная часть – это пустые места (поля), в которые вводятся данные пользователя.

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

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

2.Как создать форму?

Для создания форм нужно вывести на экран новую панель инструментов Формы. Она вызывается командой ВидПанели инструментов Формы

3.Назначение кнопок панели инструментов Формы. Как вывести её на экран?

1. •Текстовые поля — прочерки которые можно заполнить текстом, числами, датой, временем или формулой для вычислений – создаются кнопкой Текстовое поле.
2. •Поля-флажки — маленькие квадраты в которые можно поставить крестик или галочку – кнопка Флажок
3. •Поля-списки – раскрывающиеся списки элементов из которых можно выбирать нужный – кнопка Поле со списком
4. Параметры этих полей задаются с помощью кнопки Параметры поля формы. Кроме инструментов для полей панель Формы содержит кнопки:
5. •создать или вставить в документ таблицу;
6. •добавить рамку. Если новые поля создавать внутри рамки, то эту группу полей можно переместить за рамку в любое место формы;
7. •затенение полей для их выделения в форме;
8. •Очистить поле формы – установка во всех полях значений по умолчанию;
9. •Защита формы – от внесения изменений как в постоянную, иак и в переменную части.

4.Как добавить текстовое поле? Виды текстовых полей?

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

Поставить курсор на место вставки текстового поля, нажать на панели Форма кнопку Текстовое поле, на месте курсора появится серый прямоугольник поля. Если на панели Формы отжать кнопку Затенение полей формы, прямоугольник исчезнет (поле станет невидимым) или останется текст, введённый в поле по умолчанию.

Нажать на панели кнопку Параметры поля формы или дважды щелкнуть поле мышью, появится окно Параметры текстового поля

5.Как добавить флажок? Что можно вводить в поле флажок?

Для вставки поля — типа Флажок нужно:

Поставить курсор на место вставки поля флажка, нажать на пане-ли Форма кнопку Флажок, на месте курсора появится квадратик, в который мышью можно поставить крестик или галочку. В окне Параметры флажка, вызываемого кнопкой Параметры поля формы, можно задать его размеры, состояние по умолчанию и др. В окне клавиши Текст справки… также задаётся справочный текст.

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

6.Как добавить поле со списком? Как добавлять, перемещать и удалять элементы в списке?

Для добавления списка нужно:

Поставить курсор на место вставки поля списка, нажать на панели Форма кнопку Поле со списком, на месте курсора появится поле списка. Нажать на панели кнопку Параметры поля формы или дважды щелкнуть поле мышью, появится окно Параметры поля со списком (рис. 4)

• Чтобы ввести или добавить элемент списка, нужно ввести его имя в поле Элемент списка и нажать кнопку Добавить или Enter.
• При необходимости порядок отображение значений списка изменяется кнопками группы Порядок – стрелки Вверх и Вниз. Выполните одно из следующих действий:
• Чтобы удалить элемент, выделите его в поле Список, а затем нажмите кнопку Удалить.
• Чтобы переместить элемент, выделите его в поле Список, а затем нажмите кнопку со стрелкой в группе Порядок.
• Пояснительный текст поля вводится в окне клавиши Текст справки…

7.Как изменить типоразмер и цвет шрифта в поле, убрать тень, очистить копировать и удалить поле?

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

Очистка полей заключается в автоматической установке в каждом поле значений по умолчанию (если они есть).Эта операция выполняется вручную нажатием кнопки Очистить поле формы.

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

Удаление полей выполняется их выделением и нажатием клавиши Delete на клавиатуре.

8.Как выполнить макросы в форме? Где они должны храниться?

Чтобы назначить макрос полю:

Дважды щелкните мышью поле формы, запускающее макрос.

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

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

9.Способы защиты формы.

Защита формы выполняется на двух уровнях:

1 На уровне отдельного поля, выполняется при установке параметров поля и заключается в запрещении внесения изменений. Если запретить выполнение изменений в каком-либо поле формы (снять флажок разрешить изменения, то данное поле будет содержать только значение по умолчанию (если оно есть).

2 На уровне формы, при этом все поля формы будут защищены. Эта защита может быть выполнена двумя способами:

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

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

В пункте 3 Включить защиту нажать клавишу Да, включить за-щиту, в появившемся окне ввести и подтвердить пароль (до 15 символов) – при необходимости, чтобы другие пользователи не могли снять данную защиту.

10.Что можно редактировать в форме, если установлена защита с ограничением Запись изменений?

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

Задание

Вариант 1. Форма Продажа автомобилей. Названия столбцов: Марка, Цвет (список), ЛегковойГрузовой (флажок),Страна-изготовитель (список), Стоимость. Формула – количество автомобилей в таблице (функция COUNT).

Лабораторная работа №11

Рекомендуемые страницы:

Источник: https://poisk-ru.ru/s34833t3.html

Использование макросов при редактировании текста

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

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

Как известно, в текстовых
процессорах MS WORD, начиная с версии
6.0, могут использоваться макросы,
выполняющие различные операции над
текстом.

Макрос — это
последовательность
интерпретируемых инструкций,
которые выполняются при обработке
документа в MS OFFICE, например, при
форматировании.

В редакторе WORD 97
макросы можно создавать путем
записи действий, выполняемых
пользователем при редактировании,
либо путем создания программы на
языке VBA (Visual Basic for Applications).

Что же касается использования
макросов, созданных в предыдущих
версиях WORD 6.0 и 7.0 на языке WordBasic, то
WORD 97 автоматически преобразует
такие макросы к принятой в Visual Basic
форме записи.

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

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

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

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

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

В данном случае WORD считает,
что в этом месте допущена ошибка, и
подчеркивает оба слова. Чтобы
разрешить этот вопрос, необходимо
вставить после запятой пробел.
Нередко это случается при импорте
документа в WORD из форматов DOS text или
Windows text.

При большом размере
документа эту операцию можно
выполнить с помощью следующего
макроса:

Sub insert()
‘
‘ insert Макрос
‘ Макрос создан 13.05.98 No name
‘
Dim n As Byte
Dim c1, c2, c3 As Characters
ActiveDocument.Bookmarks(«startOfDoc»).Select
Do
c1 = Selection.Text
n = Selection.Move(unit:= wdCharacter, Count:=1)
c2 = Selection.Text
If c1 = «, » And c2 » » Then Selection.InsertBefore » »
Loop Until WordBasic. CmpBookmarks(«sel», «EndOfDoc») = 0
End Sub

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

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

Здесь используются макросы AUTOOPEN и
AUTOCLOSE, выполняющиеся автоматически
при открытии и закрытии документа.
Их следует хранить в
обрабатываемом документе.

Источник: https://www.kv.by/archive/index1998293002.htm

Как создать макросы в Word 2007: Аудио-транскрипт

Microsoft Word поставляется с несколькими предустановленными комбинациями клавиш. Например, вы можете удерживать клавишу управления и нажимать букву B, чтобы выделить жирным шрифтом текст или нажать кнопку управления и букву I, чтобы сделать что-то курсивное.

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

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

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

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

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

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

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

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

Хорошо, вот где все становится хорошо, у меня открыта страница параметров Word, и я собираюсь выделить имя моего макроса в списке слева. Затем нажмите кнопку «Добавить». Теперь отображается макрос и список параметров панели быстрого доступа справа. Поэтому нажмите «ОК».

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

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

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

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

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

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

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

Я собираюсь сделать так, чтобы вы удерживали клавиши управления и Alt и набирали букву B, чтобы сделать текст полужирным и выделенным курсивом сразу. Поэтому, когда я удерживаю эти три клавиши, диалоговое окно заполняет команду. Теперь нажмите «Назначить», а затем нажмите кнопку «Закрыть».

Снова появляется значок кассеты, это означает, что Macro собирается записывать нажатия клавиш, которые мы делаем. Поэтому я буду повторять те же нажатия клавиш, которые я только что сделал в диалоговом окне, удерживая клавиши управления и Alt при вводе буквы B.

Затем мне нужно выполнить две команды; контроль плюс B для смелых и контрольных плюс I курсивом. И когда я закончу, я вернусь к группе Macros и остановит запись. Все сделано.

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

Источник: https://ru.howtodou.com/how-to-create-macros-in-word-2007-audio-transcript

Макрос в Word для тех, кто много пишет — Сервисы на vc.ru

{«id»:74702,»url»:»https:\/\/vc.ru\/services\/74702-makros-v-word-dlya-teh-kto-mnogo-pishet»,»title»:»\u041c\u0430\u043a\u0440\u043e\u0441 \u0432 Word \u0434\u043b\u044f \u0442\u0435\u0445, \u043a\u0442\u043e \u043c\u043d\u043e\u0433\u043e \u043f\u0438\u0448\u0435\u0442″,»services»:{«facebook»:{«url»:»https:\/\/www.facebook.com\/sharer\/sharer.php?u=https:\/\/vc.ru\/services\/74702-makros-v-word-dlya-teh-kto-mnogo-pishet»,»short_name»:»FB»,»title»:»Facebook»,»width»:600,»height»:450},»vkontakte»:{«url»:»https:\/\/vk.com\/share.php?url=https:\/\/vc.ru\/services\/74702-makros-v-word-dlya-teh-kto-mnogo-pishet&title=\u041c\u0430\u043a\u0440\u043e\u0441 \u0432 Word \u0434\u043b\u044f \u0442\u0435\u0445, \u043a\u0442\u043e \u043c\u043d\u043e\u0433\u043e \u043f\u0438\u0448\u0435\u0442″,»short_name»:»VK»,»title»:»\u0412\u041a\u043e\u043d\u0442\u0430\u043a\u0442\u0435″,»width»:600,»height»:450},»twitter»:{«url»:»https:\/\/twitter.com\/intent\/tweet?url=https:\/\/vc.ru\/services\/74702-makros-v-word-dlya-teh-kto-mnogo-pishet&text=\u041c\u0430\u043a\u0440\u043e\u0441 \u0432 Word \u0434\u043b\u044f \u0442\u0435\u0445, \u043a\u0442\u043e \u043c\u043d\u043e\u0433\u043e \u043f\u0438\u0448\u0435\u0442″,»short_name»:»TW»,»title»:»Twitter»,»width»:600,»height»:450},»telegram»:{«url»:»tg:\/\/msg_url?url=https:\/\/vc.ru\/services\/74702-makros-v-word-dlya-teh-kto-mnogo-pishet&text=\u041c\u0430\u043a\u0440\u043e\u0441 \u0432 Word \u0434\u043b\u044f \u0442\u0435\u0445, \u043a\u0442\u043e \u043c\u043d\u043e\u0433\u043e \u043f\u0438\u0448\u0435\u0442″,»short_name»:»TG»,»title»:»Telegram»,»width»:600,»height»:450},»odnoklassniki»:{«url»:»http:\/\/connect.ok.ru\/dk?st.cmd=WidgetSharePreview&service=odnoklassniki&st.shareUrl=https:\/\/vc.ru\/services\/74702-makros-v-word-dlya-teh-kto-mnogo-pishet»,»short_name»:»OK»,»title»:»\u041e\u0434\u043d\u043e\u043a\u043b\u0430\u0441\u0441\u043d\u0438\u043a\u0438″,»width»:600,»height»:450},»email»:{«url»:»mailto:?subject=\u041c\u0430\u043a\u0440\u043e\u0441 \u0432 Word \u0434\u043b\u044f \u0442\u0435\u0445, \u043a\u0442\u043e \u043c\u043d\u043e\u0433\u043e \u043f\u0438\u0448\u0435\u0442&body=https:\/\/vc.ru\/services\/74702-makros-v-word-dlya-teh-kto-mnogo-pishet»,»short_name»:»Email»,»title»:»\u041e\u0442\u043f\u0440\u0430\u0432\u0438\u0442\u044c \u043d\u0430 \u043f\u043e\u0447\u0442\u0443″,»width»:600,»height»:450}},»isFavorited»:false}

25 247 просмотров

Создание и использование макросов в Microsoft Word

15

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

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

Как создать макрос в программе Microsoft Word?

Перейдите в программе Microsoft Word ко вкладке «Вид», а затем щелкните по кнопке «Макросы». В отобразившемся дополнительном меню выберите пункт «Запись макроса».

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

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

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

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

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

Запуск макросы выполняется в зависимости от того, какой метод запуска был выбран вами при его настройке. Если вы выбрали пункт «Кнопка», то, соответственно, в самой верхней части окна Microsoft Word будет отображена выбранная вами кнопка.

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

Правильное использование макросов позволит сделать работу с офисным пакетом Microsoft Office значительно быстрее и продуктивнее. Если вам требуется выполнение большого количества рутинных задач – не пренебрегайте использованием данной функции.

Создание макроса и работа с ним [BS Docs 4]

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

В Microsoft Word 2007 это осуществляется следующей последовательностью действий:

• нажать кнопку Office в верхнем левом углу, нажать кнопку «Параметры Word»;

• выбрать закладку «Центр управления безопасностью», нажать кнопку «Параметры центра управления безопасностью»;

• выбрать закладку «Параметры макросов», в разделе «Параметры макросов для разработчика» установить опцию «Доверять доступ к объектной модели проектов VBA».

В Microsoft Word 2010/2013/2016:

• выбрать пункт меню «Файл → Параметры…»;

• в окне «Параметры Word» выбрать закладку «Центр управления безопасностью», нажать кнопку «Параметры центра управления безопасностью»;

• выбрать закладку «Параметры макросов», в разделе «Параметры макросов для разработчика» установить опцию «Доверять доступ к объектной модели проектов VBA».

Примечание

VBA — Visual Basic for Applications (Visual Basic для приложений) — упрощённая реализация языка программирования Visual Basic, встроенная в линейку продуктов Microsoft Office.

Макрос для отчетов формата Word

Для того, чтобы создать или просмотреть макрос для отчета формата Word необходимо:

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

Если макроса там не будет, его можно создать самостоятельно, введя в данном окне строки начала и конца макроса, а между ними — сам текст макроса:

Sub ПослеВыполненияОтчета(ob As Variant, app As Variant)

<Текст макроса>

End Sub

Внимание!

В Word 2007 закладка «Разработчик» по умолчанию скрыта. Чтобы вывести ее на показ необходимо:

• запустить MS Word;

• нажать кнопку Office в верхнем левом углу, нажать кнопку «Параметры Word»;

Макрос для отчетов формата Excel

Для того, чтобы создать или просмотреть макрос для отчета формата Excel, необходимо:

• в MS Excel на ленте «Разработчик» в группе «Код» нажать кнопку «Visual Basic» (или сразу нажать Alt+F11). Откроется окно приложения «Microsoft Visual Basic for Application»;

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

Внимание!

В Excel 2007 закладка «Разработчик» по умолчанию скрыта. Чтобы вывести ее на показ необходимо:

• запустить MS Excel;

• нажать кнопку Office в верхнем левом углу, нажать кнопку «Параметры Excel»;

Любой отчет изначально содержит следующий макрос:

Sub ПослеВыполненияОтчета(ob As Variant, app As Variant)

' MsgBox "MACRO ПослеВыполненияОтчета" + CStr(ob.Название)

End Sub

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

Переменные, которые передаются в макрос:

• «app» − приложение, от которого был вызван отчет, то есть Business Studio.

Внимание!

Просмотреть объектную модель Word для разработки макросов в редакторе Visual Basic можно по клавише F2.

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

1. Знать название привязки.

2. Связать переменные в коде VBA с этим названием.

Ниже описано, как это это делается для привязок разных типов.

Тип привязки: Объект

В отчете такие привязки представлены полями.

Узнать название в шаблоне отчета: см. статью Руководство пользователя → Пример определения названия привязки типа «Объект».

Использование названия привязки в коде:

 
ПеременнаяВКоде = Application.ActiveDocument.Variables.Item("НазваниеПривязки").Value

Тип привязки: Список и Фильтр

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

Узнать название в шаблоне отчета: см. статью Руководство пользователя → Пример определения названия привязки типа «Список».

Использование названия привязки в коде:

  
Set ТаблицДляОбработки = Application.ActiveDocument.Bookmarks("НазваниеПривязки").Range.Tables(1)

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

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

Работа с таблицей через название привязки

 'переменная для работы с конкретной таблицей
Set Table = Application.ActiveDocument.Bookmarks("НазваниеПривязки").Range.Tables(1)

countColumn = Table.Columns.Count 'количество столбцов таблицы

countRow = Table.Rows.Count 'количество строк таблицы

СellText  = Table.Cell(2,1).Range.Text 'значение ячейки во 2й строке 1го столбца
 

Работа с таблицей через её номер в документе

сountTables = ActiveDocument.Tables.Count 'количество таблиц в документе

Selection.GoTo What:=wdGoToTable, Which:=wdGoToFirst, Count:=5, Name:="" 'перейти к таблице номер 5

countColumn  = Selection.Tables(1).Columns.Count 'количество столбцов таблицы

countRow = Selection.Tables(1).Rows.Count 'количество строк таблицы

СellText  = Selection.Tables(1).Cell(2,1).Range.Text 'значение ячейки во 2й строке 1го столбца
 

При работе с таблицами следует помнить ряд моментов:

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

On Error Resume Next ' игнорирование <error 5991> - ячейки таблицы имеют вертикальное объединение
 

• При получении текста таблицы следует помнить, что полученное значение ячейки так же содержит в себе 2 служебных символа. Для обработки данных ячейки без этих служебных символов следует произвести «очистку» значения. Например:

СellText = Selection.Tables(1).Cell(3,2).Range.Text 'текст ячейки со служебными символами

СellText = Left$(СellText, (Len(CellText) - 2)) 'убираем 2 последних символа ячейки - чистый текст
 

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

Один и тот же отчет Business Studio может рассматриваться из разных мест:

При рассмотрение такого отчета в разных местах есть свои нюансы. Например, отчеты в HTML-публикации и Business Studio Portal не содержат колонтитулов, которые есть в отчете, сделанным отдельным документом Word.

Также могут быть и разные задачи по обработке отчета кодом в зависимости от направления формирования отчета. Для определения направления формирования отчета используются параметры: BSInThread, BSHtml и BSPortal.

Таблица 1. Значения специальных переменных в зависимости от направления формирования отчета

Пример использования в коде:

Dim HTMLCreate As Boolean
HTMLCreate = Application.ActiveDocument.Variables("BSHtml").Value 'True или False

If HTMLCreate Then

     MsgBox "Выводим для HTML: HTML-публикация или Business Studio Portal"

Else
     
     MsgBox "Выводим в одиночный файл или потоком файлов"     

End If

Примечание

При формировании отчета типа HTML (HTML-публикация, Business Studio Portal) так же происходит формирование и отдельного файла типа Word.

При обработке кодом VBA отчета, сформированного для HTML-публикации или Business Studio Portal, следует помнить, что после формирования отчет представляет собой отображение не тех данных, что видны в браузере, а документ с показом кодов полей. Это не позволяет вести обработку гиперссылок.

Для «нормализации» отображения данных следует сначала использовать следующий код:

ActiveWindow.View.ShowFieldCodes = Not ActiveWindow.View.ShowFieldCodes 'Alt+F9 - видим не коды пол

При копировании отчета названия всех привязок изменяются.

Рисунок 3. Названия привязок в исходном отчете

Рисунок 4. Названия привязок в копии отчета

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

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

Пример проверки наличия привязки типа «Список». В документе это закладки.

Определяем название привязки типа «Список», которая представляет нужную таблицу (см. Руководство пользователя → Пример определения названия привязки типа «Список»).

BookmarkName = "Изменения_процесса_e1ded8b0" 'название привязки

        'Проверка на корректность названия привязки

        Dim BookmarkIs As Boolean 'сначала считаем, что нужной закладки нет
        Dim Bkm As Bookmark 'переменная типа Закладка

        For Each Bkm InActiveDocument.Bookmarks 'перебираем все закладки в документе

            IfBkm.Name = BookmarkName Then 'если нашли закладку с нашим именем

                BookmarkIs = True 'отмечаем, что закладка есть
                'получаем таблицу по названию привязки 
                Set SettableStatus = Application.ActiveDocument.Bookmarks(BookmarkName).Range.Tables(1)

            End If

        Next

If BookmarkIs Then 'если в документе закладка есть
    
   'производим необходимые действия c таблицей

End If

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

Пример проверки наличия привязки типа Объект

Определяем название привязки типа «Объект», которая представляет нужное поле в отчёте (см. статью Руководство пользователя → Пример определения названия привязки типа «Объект»).

VarName = "Статус_процесса_c9a10e8d" 'название привязки

      'Проверка наличия указанной привязки в документе
        Dim VarIs As Boolean 'сначала считаем что привязки нет

        'перебираем все переменные документа
        For Each aVar In ActiveDocument.Variables

            If aVar.Name = VarName Then 'если среди них есть с нашим именем

                VarIs = True 'отмечаем это
                'получаем значение переменной по названию привязки 
                MyVar = Application.ActiveDocument.Variables.Item(VarName).Value 

            End If

        Next aVar

If VarIs Then 'если в документе привязка есть

     'производим необходимые действия с переменной

End If

Примечание

Закладки, не относящиеся к привязкам, например, созданные пользователем самостоятельно, при копировании отчетов не изменяются.

Из отчета можно напрямую обращаться к данным из базы бизнес-модели. Это делается двумя способами:

1. Через обращение к параметрам объекта, от которого был вызван отчет.

2. Через использование механизма OLE.

Обращение к параметрам объекта

Обращение к параметрам объекта, от которого был вызван отчет, происходит таким образом:

ob.<СистемноеНазваниеПараметра>,

где

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

   Name = ob.Название  'получаем Название объекта, от которого вызвали отчет 
 

Использование механизма OLE

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

Описание механизма OLE подробно описано в главе Руководство технического специалиста → Работа с Business Studio через OLE. Для задействования OLE в отчетах конкретной базы нет необходимости во включении опции «Разрешено использование OLE».

Внимание!

В отчетах при работе с OLE недоступны все методы класса «Система.OleApplication», поскольку в макросе «ПослеВыполненияОтчета» есть аргумент «app», который является приложением Business Studio, а не «Система.OleApplication».

Бывают ситуации, когда:

1. В рамках одного отчета необходимо решить более чем одну задачу. Например, форматирование полей типа RTF и вставка столбца в таблицу.
2. Одну и ту же задачу необходимо применять к разным отчетам. Для этого необходимо скопировать код VBA, который решает поставленную задачу. И будет удобней, если этот код не пересекается с кодами других задач.

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

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

Sub ПослеВыполненияОтчета(ob As Variant, app As Variant)

   Call Macros1
   Call Macros2
   'любые другие макросы 

End Sub


Sub Macros1 ()
   'В рамках этого макроса решается одна задача
End Sub


Sub Macros2 ()
   'В рамках этого макроса решается другая задача
End Sub

Если такие макросы имеют одинаковые части кода, то их тоже можно (и рекомендуется) выносить в отдельные макросы или функции в том же окне с ключевым макросом. Например, функция для определения присутствия в отчете необходимой привязки типа «Список» (см. Работа с копией отчета, содержащим макрос) может быть следующей:

Function BookmarkIs(BookmarkName As String) As Boolean

'Проверка на корректность названия привязки

Dim Bkm As Bookmark 'переменная типа Закладка


BookmarkIs = False 'сначала считаем, что нужной закладки нет

For Each Bkm In ActiveDocument.Bookmarks 'перебираем все закладки в документе

    If Bkm.Name = BookmarkName Then 'если нашли закладку с нашим именем
    
        BookmarkIs = True 'отмечаем, что закладка есть
        
    End If
 
Next
    
End Function

Использование этой функции из макроса может быть таким:

Sub MacrosN ()

BookmarkName = "НазваниеЗакладкиТипаСписок"
   
If BookmarkIs(BookmarkName) Then 'если в документе закладка есть
   'Выполняются необходимые действия
End If

End Sub

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

Как включить макросы в Word

Word

1. Нажмите кнопку Microsoft Office , а затем — кнопку Параметры Word.
2. Выберите Центр управления безопасностью, затем  — Параметры центра управления безопасностью, а затем  — Параметры макросов.

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

   • Отключить все макросы с уведомлением Данный параметр установлен по умолчанию. Выберите этот параметр, если нужно отключить макросы, но при их наличии необходимо получать предупреждения системы безопасности. Это позволит включать макросы только в случаях, когда это требуется.
   • Отключить все макросы кроме макросов с цифровой подписью Данный параметр идентичен параметру Отключить все макросы с уведомлением за исключением того, что при наличии цифровой подписи надежного разработчика макрос запускается только в случае, если данный разработчик занесен в список доверенных издателей. Если разработчик не занесен в список доверенных издателей, последует предупреждение. Таким образом, можно выбирать нужный вариант: включить макрос, содержащий цифровую подпись, или занести разработчика в список доверенных издателей. Все макросы, не содержащие цифровой подписи, отключаются без уведомления.
     • Включить все макросы (не рекомендуется, возможен запуск опасной программы) Данный параметр разрешает выполнение всех макросов. Компьютер становится уязвимым для потенциально опасных программ, поэтому использовать данный параметр не рекомендуется.
     • Доверять доступ к объектной модели проектов VBA.    Этот параметр предназначен для разработчиков и позволяет явно заблокировать или разрешить программный доступ к объектной модели VBA от любого клиента автоматизации. Другими словами, он позволяет защитить код, созданный для автоматизации программ Office и программного управления средой Microsoft Visual Basic для приложений (VBA) и объектной моделью. Этот параметр можно установить для отдельного пользователя или приложения. По умолчанию доступ запрещен. Этот параметр безопасности затрудняет несанкционированным программам создание самореплицирующегося кода, который может причинить вред системе пользователя. Чтобы любой клиент автоматизации смог получить доступ к объектной модели VBA, пользователь, выполняющий код, должен явным образом предоставить доступ. Чтобы включить доступ, установите флажок.

СОВЕТ : Диалоговое окно с параметрами безопасности макросов можно открыть с вкладки Разработчик на ленте, которая является частью пользовательского интерфейса Microsoft Office Fluent. Если вкладка Разработчик недоступна, нажмите кнопку Microsoft Office , а затем — кнопку Параметры Word. Выберите категорию Основные и установите флажок Показывать вкладку «Разработчик» на ленте.

Подписываемся на канал, ставим лайки, даём деньги.

Создание макросов в т.р. Word — реферат

Отчет по лабораторной работе № 3

Тема: Создание макросов в т.р. Word.

Задание:

1. Создание макроса для оформления шаблона документа blank.dot

· Cервис — макрос – начать запись – изменение имени на МакроWA – вставка – объект WordArt- завершить макрос. Сервис – настройка – команды – добавляем макрос на панель инструментов – выделяем макрос – «изменить выделенный объект» — «текст только в меню» — «выбрать значок для кнопки».

Selection.InlineShapes.AddPicture FileName:= _

«D:\TEMP\PROF\All Users\Documents\My Pictures\Sample Pictures\Water lilies.jpg» _

, LinkToFile:=False, SaveWithDocument:=True

· Создали макрос аналогично макросу МакроWA, который вставлял бы рисунок, Присвоили имя макросу МакроРис
.

Selection.InlineShapes.AddPicture FileName:= _

«D:\TEMP\PROF\All Users\Documents\My Pictures\Sample Pictures\Sunset.jpg» _

, LinkToFile:=False, SaveWithDocument:=True

· На основе двух созданных макросов создали один, используя редактор VBA и сохранили под именем МакроWA
R
: сервис — макрос – макросы – выбираем макрос Макро
WA
– «изменить» — копируем текст макрома Макро Рис и вставляем после текста макроса Макро
WA
.
Для вызова создали кнопку: Сервис – настройка – команды – добавляем макрос на панель инструментов – выделяем макрос – «изменить выделенный объект» — «текст только в меню» — «выбрать значок для кнопки».

Selection.InlineShapes.AddPicture FileName:= _

«D:\TEMP\PROF\All Users\Documents\My Pictures\Sample Pictures\Water lilies.jpg» _

, LinkToFile:=False, SaveWithDocument:=True

Selection.InlineShapes.AddPicture FileName:= _

«D:\TEMP\PROF\All Users\Documents\My Pictures\Sample Pictures\Sunset.jpg» _

, LinkToFile:=False, SaveWithDocument:=True

· Создали макрос, который: добавляет страницу в текст ( вставка – разрыв – «начать новую страницу») и необходимо, чтобы ориентация этой страницы была альбомная ( файл – параметры страницы – ориентация альбомная). Присвоили имя макросу МакроПС.

Selection.InsertBreak Type:=wdPageBreak

With ActiveDocument.Styles(wdStyleNormal).Font

If .NameFarEast = .NameAscii Then

.NameAscii = «»

End If

.NameFarEast = «»

End With

With ActiveDocument.PageSetup

.LineNumbering.Active = False

.Orientation = wdOrientLandscape

.TopMargin = CentimetersToPoints(3)

.BottomMargin = CentimetersToPoints(1.5)

.LeftMargin = CentimetersToPoints(2)

.RightMargin = CentimetersToPoints(2)

.Gutter = CentimetersToPoints(0)

.HeaderDistance = CentimetersToPoints(1.25)

.FooterDistance = CentimetersToPoints(1.25)

.PageWidth = CentimetersToPoints(29.7)

.PageHeight = CentimetersToPoints(21)

.FirstPageTray = wdPrinterDefaultBin

.OtherPagesTray = wdPrinterDefaultBin

.SectionStart = wdSectionNewPage

.OddAndEvenPagesHeaderFooter = False

.DifferentFirstPageHeaderFooter = False

.VerticalAlignment = wdAlignVerticalTop

.SuppressEndnotes = False

.MirrorMargins = False

.TwoPagesOnOne = False

.BookFoldPrinting = False

.BookFoldRevPrinting = False

.BookFoldPrintingSheets = 1

.GutterPos = wdGutterPosLeft

End With

Как создать макрос в Microsoft Word и Excel

Обновлено: 31.12.2020, Computer Hope

Макрос помогает повысить эффективность при создании документов и электронных таблиц, добавлении или поддержании информации или создании форм для заполнения другими людьми. Microsoft Word и Excel — популярные программы, в которых люди используют макросы для упрощения ввода и хранения данных. Макросы в Word и Excel создаются с использованием языка программирования Visual Basic или путем записи выполняемых действий.

Чтобы создать макрос в Microsoft Word или Microsoft Excel, выберите его из списка ниже и следуйте инструкциям.

Создать макрос в Microsoft Word

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

Создать макрос вручную с помощью Visual Basic

1. В Microsoft Word щелкните вкладку View в строке меню.
2. Щелкните опцию Macros .

3. В окне Макросы введите имя нового макроса в текстовое поле Имя макроса .
4. Нажмите кнопку Создать .
5. Откроется программа Microsoft Visual Basic для приложений, в которой можно создать макрос, набрав код Visual Basic вручную.
6. По завершении создания макроса щелкните значок Сохранить в строке меню и закройте программу Visual Basic.

Создать макрос путем записи действий

1. В Microsoft Word щелкните вкладку View в строке меню.
2. Щелкните стрелку под опцией Macros и выберите опцию Record Macro .

3. В окне Запись макроса введите имя нового макроса в текстовое поле Имя макроса .
4. Щелкните значок клавиатуры, чтобы назначить комбинацию клавиш для выполнения макроса.
5. В окне Настроить клавиатуру щелкните поле Нажмите новую комбинацию клавиш , затем нажмите комбинацию клавиш, которую вы хотите использовать для выполнения макроса в Microsoft Word. Например, вы можете нажать клавиши Ctrl + Shift + M , и эта комбинация клавиш будет автоматически введена в поле.

6. Нажмите кнопку Назначить в нижнем левом углу, затем нажмите кнопку Закрыть .
7. Запись макроса начинается сразу после нажатия кнопки «Закрыть». Выполните действия, которые вы хотите записать, и запустите макрос. Вы можете вводить текст, форматировать текст, создавать таблицу, добавлять фигуры или изображения и выполнять другие действия.
8. Когда вы выполнили все действия, которые хотите включить в макрос, на вкладке View щелкните стрелку под опцией Macros и выберите Stop Recording .

Создать макрос в Microsoft Excel

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

Создать макрос вручную с помощью Visual Basic

1. В Microsoft Excel щелкните вкладку View в строке меню.
2. Щелкните опцию Macros .

3. В окне Макросы введите имя нового макроса в текстовое поле Имя макроса .
4. Нажмите кнопку Создать .
5. Откроется программа Microsoft Visual Basic для приложений, в которой можно создать макрос, набрав код Visual Basic вручную.
6. По завершении создания макроса щелкните значок Сохранить в строке меню и закройте программу Visual Basic.

Создать макрос путем записи действий

1. В Microsoft Excel щелкните вкладку View в строке меню.
2. Щелкните стрелку под опцией Macros и выберите опцию Record Macro .

3. В окне Запись макроса введите имя нового макроса в текстовое поле Имя макроса .
4. Щелкните значок клавиатуры, чтобы назначить комбинацию клавиш для выполнения макроса.
5. В окне Настроить клавиатуру щелкните поле Нажмите новую комбинацию клавиш , затем нажмите комбинацию клавиш, которую вы хотите использовать для выполнения макроса в Microsoft Excel. Например, вы можете нажать клавиши Ctrl + Shift + M , и эта комбинация клавиш будет автоматически введена в поле.

6. Нажмите кнопку Назначить в нижнем левом углу, затем нажмите кнопку Закрыть .
7. Запись макроса начинается сразу после нажатия кнопки «Закрыть». Выполните действия, которые вы хотите записать, и запустите макрос. Вы можете вводить данные, форматировать данные, создавать диаграмму или график из данных, добавлять формулы и выполнять другие действия.
8. Когда вы выполнили все действия, которые хотите включить в макрос, на вкладке View щелкните стрелку под опцией Macros и выберите Stop Recording .

Создание макросов в Word Скачать PDF бесплатно

Введение в Word 2007

Введение в Word 2007 Вы заметите некоторые очевидные изменения сразу после запуска Word 2007.Во-первых, верхняя панель имеет совершенно новый вид, состоящий из новых функций, кнопок и названия

   Общедоступный подформатSelectedText ()
    Dim objItem как объект
    Dim objInsp как Outlook.Inspector
    
    'Добавить ссылку на библиотеку Word
    'в редакторе VBA, Инструменты, Ссылки
    Dim objWord как Word.Application
    Dim objDoc как Word.Документ
    Dim objSel As Word.Selection
    При ошибке Возобновить Далее
   
'Ссылка на текущий элемент Outlook
    Установите objItem = Application.ActiveInspector.currentItem
    Если не объект - ничто, то
        Если objItem.Class = olMail Тогда
            Установите objInsp = objItem.GetInspector
            Если objInsp.EditorType = olEditorWord Тогда
                Установите objDoc = objInsp.WordEditor
                Установите objWord = objDoc.Application
                Установите objSel = objWord.Selection

'замените блок With своим кодом
       С помощью objSel
       'Код форматирования находится здесь
            .Font.Color = wdColorBlue
            .Font.Size = 18
            .Font.Bold = True
            .Font.Italic = True
            .Font.Name = "Arial"
       Конец с

            Конец, если
        Конец, если
    Конец, если
    
    Установите objItem = Nothing
    Установите objWord = Nothing
    Установите objSel = Nothing
    Установите objInsp = Nothing
Конец подписки

 

Общедоступный Sub ChangeTextSize ()
    Dim objItem как объект
    Dim objInsp как Outlook.Inspector
    
    'Добавить ссылку на библиотеку Word
    'в редакторе VBA, Инструменты, Ссылки
    Dim objWord как Word.Application
    Dim objDoc как Word.Document
    Dim objSel As Word.Selection
    При ошибке Возобновить Далее
   
'Ссылка на текущий элемент Outlook
   Установите objItem = Application.ActiveInspector.currentItem
   Если не объект - ничто, то
      Если objItem.Class = olMail Тогда
        Установите objInsp = objItem.GetInspector
          Если objInsp.EditorType = olEditorWord Тогда
            Установите objDoc = objInsp.WordEditor
            Установите objWord = objDoc.Application
            Установите objSel = objWord.Selection

'переведите сообщение в режим редактирования
Если objDoc.ProtectionType = WdProtectionType.wdAllowOnlyReading, то objDoc.UnProtect

  С помощью objSel
'Выбрать все сообщение
   .Целая история
 
'Код форматирования находится здесь
   .Font.Size = 12
            
  Конец с
         Конец, если
      Конец, если
  Конец, если
objItem.Save
    
    Установите objItem = Nothing
    Установите objWord = Nothing
    Установите objSel = Nothing
    Установите objInsp = Nothing
Конец подписки
 

Подложка CreateAppointmentSelectedContact ()

 Dim ObjItem как объект
 Dim strFullName As String
 Dim strPhone As String
 Dim strAddress как строка
 Dim strDynamicDL2 как строка
 Dim strDynamicDL3 как строка
 Тусклый StartDateTime
 Dim itmAppt

 Установите oContact = ObjItem
 Установите objApp = CreateObject ("Outlook.Заявка")
 Установите objNS = objApp.GetNamespace ("MAPI")
 Установите objSelection = objApp.ActiveExplorer.Selection

 Для каждого объекта ObjItem в objSelection
 Если ObjItem.Class = olContact, то

 strFullName = ObjItem.FullName
 strPhone = ObjItem.HomeTelephoneNumber
 strAddress = ObjItem.HomeAddressStreet & "," & ObjItem.HomeAddressCity & "," & ObjItem.HomeAddressState & "" & ObjItem.HomeAddressPostalCode

 strDynamicDL2 = ("Имя:") & strFullName
 strDynamicDL3 = ("Адрес:") & strAddress
 
 Установите MyFolder = Session.GetDefaultFolder (9)
 Установите itmAppt = MyFolder.Items.Add ("IPM.Appointment")

 itmAppt.Subject = strFullName & ("-") & strPhone

        С itmAppt
            .Body = strDynamicDL2 & vbCrLf & strDynamicDL3
        Конец с

 StartDateTime = Дата + 3,5
 itmAppt.Start = StartDateTime
Конец, если
 следующий

itmAppt.Display

Dim objInsp как Outlook.Inspector
Dim objWord как Word.Application
Dim objDoc как Word.Document
Dim objSel As Word.Selection

Установите objInsp = itmAppt.GetInspector
Установите objDoc = objInsp.WordEditor
Установите objWord = objDoc.Application
Установите objSel = objWord.Selection

 
 objSel.Find.ClearFormatting
 objSel.Find.Replacement.ClearFormatting
 
    С objSel.Find.Replacement.Font
       .Размер = 14
       .Жирный шрифт = True
       .Underline = wdUnderlineSingle
       .Color = wdColorBlack
    Конец с
    
    С помощью objSel.Find
       .Text = strFullName
       .Replacement.Text = strFullName
       .Forward = True
       .Wrap = wdFindContinue
       .Format = True
       .MatchCase = Ложь
       .MatchWholeWord = False
       .MatchWildcards = Ложь
       .MatchSoundsLike = Ложь
       .MatchAllWordForms = Ложь
    Конец с
 objSel.Find.Execute Заменить: = wdReplaceAll
 
     С помощью objSel.Find
       .Text = strAddress
       .Replacement.Text = strAddress
       .Forward = True
       .Wrap = wdFindContinue
       .Format = True
       .MatchCase = Ложь
       .MatchWholeWord = Ложь
       .MatchWildcards = Ложь
       .MatchSoundsLike = Ложь
       .MatchAllWordForms = Ложь
    Конец с
 objSel.Find.Execute Replace: = wdReplaceAll
 
Установите objInsp = Nothing
Установите objDoc = Nothing
Установите objSel = Nothing
Установите objMsg = Nothing

Установите objMsg = Nothing
 Установите ObjItem = Nothing
 Установите objFolder = Nothing
 Установите objNS = Nothing
 Установите objApp = Nothing
 
 Конец подписки