рефераты конспекты курсовые дипломные лекции шпоры

Реферат Курсовая Конспект

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

Создание макросов - раздел Информатика, Лабораторная Работа №3 Создание Макросов Word С Использованием Яз...

Лабораторная работа №3
Создание макросов WORD с использованием языка Visual Basic for Application

 

Краткие теоретические сведения

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

Редактор Visual Basic доступен во всех приложениях Microsoft Office. Макрос может быть создан в автоматическом режиме и вручную в редакторе Visual… Макросы сохраняются вместе с документом.

Структура проекта

1) модули – содержат процедуры макросов ; 2) модули класса – содержат описания пользовательских классов; 3) формы – содержат описания форм и процедур обработки событий; позволяют организовать диалог с пользователем;

Организация диалога

Настройка формы осуществляется через окно свойств объекта. Для формы рекомендуется использовать следующие свойства объекта UserForm: … Возможные элементы управления находятся ан панели инструментов формы. Они… Например, установим на форму элемент управления Переключатель (объект типа CheckBox). Через окно свойств объекта…

Основные конструкции языка Basic

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

R.WholeStory

Selection.StartOf unit:=wdStory

K = 1

I = 0

While k < r.End – i

Selection.EndKey unit:=wdLine

Selection.Delete unit:=wdCharacter, Count:=1

K = Selection.start

i = i + 1

Wend

Текст программы с комментариями

REM создание объектной переменной r типа диапазон, начальная и конечная

REM позиции которого равны 0, т.е. диапазон пустой

Set r = ActiveDocument.Range(Start:=0, End:=0)

REM задание значения диапазону r –весь документ

R.WholeStory

REM выделения текста нет, поэтому объект Selection представляет из себя

REM текущую позицию курсора, начало и конец этого объекта совпадают;

REM установить начальную позицию – начало документа (единица измерения REM перемещений – весь документ)

Selection.StartOf unit:=wdStory

K = 1

I = 0

REM цикл выполняется до тех пор, пока k меньше разности номера последнего

REM символа в документе (позиция конца диапазона r)и i

While k < r.End – i

REM переместить текущую позицию курсора в конец строки

Selection.EndKey unit:=wdLine

REM удалить один символ в текущей позиции курсора

Selection.Delete unit:=wdCharacter, Count:=1

REM переменной k присвоить значение начала выделения,

REM т.е. в данном случае текущей позиции курсора

K = Selection.start

i = i + 1

Wend

Пример 2.

В выделенном фрагменте текста после фамилии Петров добавить его инициалы.

Set col = Selection.Words

For Each a In col

If a = "Петров " Then a.InsertAfter "B.B. "

Next

Пример 3.

В выделенном фрагменте текста изменить размер шрифта на 14 или 20 по выбору пользователя.

 

В шаблон Normal добавить объект UserForm и дать ему имя Myform, используя свойство Name инспектора объектов.
На форму установить два компонента CheckBox и один CommonButton, дать им имена соответственно Ch1, Ch2, B1.
Создать процедуру обработки события нажатия кнопки:

 

Private Sub B1_Click()

REM Свойство Tag формы используется для передачи значения,

REM выбранного пользователем.

If ch1 = True Then Tag = 1 Else Tag = 0

myform.hide

REM форма невидима на экране

End Sub

 

Текст программы макроса:

 

myform.Show

REM показать форму

If myform.Tag = 1 Then Selection.Font.Size = 14 Else Selection.Font.Size = 20

 

Варианты заданий

1. Составить программу перекодировки выделенного текста из кодировки ANSI (Windows) в KOI8. Соответствие символов следующее:

Кодировка Исходная строка Результат
ANSI-KOI8 Абвгдежзийклмнопрстуфхцчшщъыьэюя юабцдефгхийклмнопярстужвьызшэщчъ
KOI8- ANSI Абвгдежзийклмнопрстуфхцчшщъыьэюя бвчздецъйклмнопртуфхжигюыэящшьас

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

Для обработки строк рекомендуется использовать встроенные функции Basic: ASC, RIGHT; CHR, INSTR; информация в Справочнике по Visual Basic.

2. Составить программу правильной расстановки пробелов в тексте. В основе алгоритма лежат следующие правила редактирования текста:

a) между словами ставится только один пробел;

b) перед знаком препинания пробел не ставится;

c) после знака препинания пробел обязательно ставится;

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

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

1 - автоматическое удаление переносов. При этом обнаруженные дефисы между словами сразу удаляются;

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

4. Составить программу печати документа книжкой. Для этого надо выполнить настройки параметров страницы таким образом, чтобы после распечатки документа листы можно было посередине сшить. Перед началом печати пользователем в диалоговом окне вводится желаемая ширина всех 4-х полей для одной стр., т.е. половины листа. Использовать вид элементов управления формы для ввода – поле увеличения-уменьшения (поле со счетчиком), предусмотреть значение полей по умолчанию.

Основа алгоритма печати следующая:

a) установить альбомную ориентацию страницы;

b) организовать 4 цикла печати. Для каждого цикла задаются свои размеры полей печати. В каждом цикле печатается 1/4 от общего количества страниц документа.

Например, в исходном файле 8 стр. Для распечатки его нужно 2 листа - по 2 стр. на лист с двух сторон. Длина листа формата А4 в альбомной ориентации - 297 мм, половина листа - 148 мм.

Если краевое поле каждой части стр. должно составлять 15 мм, а серединное - 30 мм, то ширина одной стр. текста - 148-30-15=103 мм.

 
 

1 цикл - печать страниц 1 и 3. Поля: левое-15 мм, правое - 297-103-15=179 мм (см. рис. 2)

Рисунок 2 - Левое и правое поля для 1 цикла печати

 

2 цикл - печать 6 и 8 стр. на тех же сторонах двух листов. Поля: левое - 148+15=163 мм, правое -30 мм (см. рис.3).

 
 

Рисунок 3 - Левое и правое поля для 2 цикла печати

 

Настройки 3 и 4 циклов аналогичны.

Если число страниц в документе не кратно 4, то в конец документа добавляются пустые страницы.

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

6.Составить программу изменения начертания слов в выделенном фрагменте документа, написанных латинскими буквами. Вид начертания выбирается пользователем в диалоговом окне в виде установки любого количества флажков (Ж, К, Ч).

7.Составить программу обработки текста, который был создан в другом текстовом редакторе, при этом в конце каждой строки остался символ с кодом 13, который в Word является признаком конца абзаца и мешает форматированию текста. Макрокоманда должна удалять из текста лишние признаки конца абзаца. Начало нового абзаца определяется по абзацному отступу в виде пробелов (>3) или табуляции.

 

Содержание отчета

1. Цель работы

2. Задание

3. Схема алгоритма

4. Текст программы

 

 

Контрольные вопросы

1. Что такое макрос?

2. Структура проекта VBA.

3. Область действия объектов в зависимости от типа проекта.

4. Иерархия объектов документа.

 

– Конец работы –

Используемые теги: Создание, макросов0.051

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

Что будем делать с полученным материалом:

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

Еще рефераты, курсовые, дипломные работы на эту тему:

Создание фигур и изменение их геометрии в приложении MS Visio. Создание и разработка планировок в приложении MS Visio. Графический редактор Adobe Photoshop. Изучение панели инструментов редактора. Создание и обработка графических изображений.
Лабораторная работа Создание фигур и изменение их геометрии в приложении... ЦЕЛЬ РАБОТЫ приобретение навыков создания фигур средствами MS Visio...

Сравнительный анализ Маастрихтского договора о создании ЕС и договора о создании СНГ
Следует заметить, что не все страны к 90-м годам имели одинаковые возможности, отдельные государства характеризовались наличием оппозиционно… Итак, начнем рассмотрение данной темы прежде всего с истории принятия… В первую очередь обратим внимание на реформу Европейских Сообществ - ЕОУС, ЕЭС и Евроатома, где прежний отрыв…

Практическая работа №13 Тема: Основы языка VBA. Создание макросов.
Задание... Выделение ячеек и диапазонов... Прежде чем произвести какие нибудь действия с ячейками их необходимо выделить Можно сделать это вручную а можно с...

Текстовый процессор Word. Работа с таблицами и диаграммами. Использование и создание графических объектов. Создание новых форм для ввода данных
Практическое занятие Текстовый процессор Word Работа с таблицами и диаграммами Использование и создание графических объектов Создание новых... Таблицы всегда были неотъемлемым атрибутом печатной научно технической документации Они используются для более...

История создания и развития вычислительной техники
Еще во времена древнейших культур человеку приходилось решать задачи, связанные с торговыми расчетами, с исчислением времени, с определением площади… Эти счеты представляли собой костяную, каменную или бронзовую доску с… Развитие приспособлений для счета шло в ногу с достижениями математики. Вскоре после открытия логарифмов в 1623 г.…

Создание технологической карты туристского путешествия
Для развития которого необходима устойчивая нормативно-правовая законодательная база. В 1997 году Украина утвердила межгосударственный стандарт в… Соответственно в данном случае образовалась коллизия в законодательной базе… Так как многие положения обновленного закона не соответствует положениям государственного стандарта. Кроме этого, в…

Основные стратегии создания рекламного текста
Реклама является важнейшим инструментом продвижения товара и услуг компании. Как известно, реклама — двигатель торговли. На россий¬ском рынке она… До сих пор не существует единого толкования: очень часто под такой… Оно считается эффективным, если действует в задуманном направлении и создает благоприятное отношение к товару – и…

Создание системы мотивации труда в сфере сервиса
А. Файоль имел во многом аналогичный с Тейлором подход, он стремился найти правила рациональной деятельности в условиях машинного производства. Особенностью учения А. Файоля явилось то, что он сделал попытку описать особый… Файоль разработал четырнадцать принципов управления: &#61692; разделение труда (повышает квалификацию и уровень…

СОЗДАНИЕ СИСТЕМЫ ПРИЗРЕНИЯ И ПОПЕЧЕНИЯ В ЮЖНОМ ЗАУРАЛЬЕ ХIX НАЧАЛА ХХ ВВ.
Курган в ХIХ в. был одним из крупнейших городов Тобольской губернии. В 1860 г. здесь было 77 занесенных в гильдию купцов. Г. Шадринск по количеству… Она была построена на деньги Троицкой церкви. Вероятно, деревянные дома… В день открытия 15 июля 1871 г. в богадельню поступило 20 человек, как и было предварительно рассчитано, но уже к 1…

Создание ажиотажного спроса
Вследствие огромного успеха «Титаника» в прокате Blockbuster увидел потенциальную возможность создать новую видеолегенду и побить предыдущие рекорды… Исследование также показало, что покупатели более охотно приобретают… Blockbuster определил 34 самых больших рынка в Соединенных Штатах для продажи и связи со СМИ в этих…

0.036
Хотите получать на электронную почту самые свежие новости?
Education Insider Sample
Подпишитесь на Нашу рассылку
Наша политика приватности обеспечивает 100% безопасность и анонимность Ваших E-Mail
Реклама
Соответствующий теме материал
  • Похожее
  • По категориям
  • По работам
  • Создание и использование больших векторно-растровых карт Структура ГИС для управления большими картами, включает четыре обязательные подсистемы: Ввода данных, обеспечивающую ввод и/или обработку… Под изданием, в данном случае, понимается получение твердой копии любым… Использование ГИС в картопостроении порождает как новые возможности, так и новые проблемы. Традиционный способ…
  • Инженерия извлечения знаний при создании базы знаний и интеллектуальных систем Длина этой команды зависит от размера адресуемой памяти); 2 – прямая регистровая (вместо адреса в команде хранится номер регистра, в котором… Наиболее быстрая.Наименее гибкая, т.к. адрес и данные имеют фиксированную… Смещение может быть представлено словом или двойным словом). Краткий перечень и описание элементов структурной схемы: …
  • Создание Самарской губернии. Губернская администрация. Константин Карлович Грот Чтобы в новом будущем не допустить ошибок прошлого.Целью данного реферата я ставлю рассмотрение создания Самарской губернии, рассмотрение ее жизни в… Исследованием данного вопроса занимались Г. И. Матвеева, Е. И. Медведев, Г. И.… Тем не менее актуальность выбранной темы в настоящий момент не вызывает сомнений. Глава 1. Создание Самарской…
  • Создание малого торгового предприятия Приведем пример сегментирования для товаров фирмы «Фасон». 2.3 Интерпретация полученных сегментов. На этом этапе фирма проводит корректировку… Где В –возраст потребителей, Д – уровень дохода потребителей. 2.5… Позиционирование товара проводится по «Бостонской матрице», которая имеет вид: Типы товаров: 1) «?» - это новые…
  • Проблема эффективного взаимодействия муниципальной власти и граждан через создание информационного пространства районными печатными изданиями Вышесказанное соответствует принципу современного социального демократического государства, в котором высшая ценность человек, его права и свободы»… Властные структуры, особенно на муниципальном уровне, не стремятся наладить… За счет этого можно будет получать прибыль, и продолжать создание информационного пространства, в котором будет жить…