Главная › Тарифы › Команды visual basic в word. Создание приложений на языке VBA для MS WORD. Встроенные диалоговые окна

Команды visual basic в word. Создание приложений на языке VBA для MS WORD. Встроенные диалоговые окна

Его свойства и методы

Объект Word.Document, программная работа со свойствами и методами документа в VBA

После того, как мы при помощи объекта Application запустили Word, при помощи коллекции Documents создали (или открыли, или нашли среди уже открытых) - в общем, получили ссылку на нужный нам документ, можно выполнять с этим документом различные действия, реализованные при помощи свойств, методов и событий объекта Document. У этого объекта десятки свойств и методов, и здесь мы рассмотрим только наиболее важные и часто используемые из них. Для самостоятельного рассмотрения будут оставлены очевидные и редкоиспользуемые свойства.

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

работать с документом как с элементов коллекции Documents. Формате обращения может выглядеть, например, так: Documents.Item(1);
использовать специальное ключевое слово ThisDocument. При помощи него можно получить ссылку на объект документа, которому принадлежит исполняемый программный модуль, например:

MsgBox ThisDocument.Name

использовать свойство объекта Application ActiveDocument. Это свойство возвращает нам объект активного документа:

MsgBox Application.ActiveDocument.Name

или просто

MsgBox ActiveDocument.Name

Самые важные свойства объекта Document представлены ниже:

ActiveWritingStyle - текущий активный стиль (заголовок определенного уровня, обычный текст, гиперссылка и т.п.). Рекомендуется проверить перед вводом текста.
AttachedTemplate - возможность подключить шаблон (со всеми макросами, стилями, записями автотекста и т.п.) или проверить, какой шаблон подключен (вручную это можно сделать через меню Сервис -> Шаблоны и надстройки).
Background - возвращает объект Shape, представляющий фоновый рисунок (фоновые рисунки видны только в режиме Web-документ);
BuiltInDocumentProperties - возможность получить ссылку на коллекцию DocumentProperties с одноименными объектами, представляющими встроенные свойства документа (название, автор, категория, комментарии и т.п.);
Characters - возвращает коллекцию объектов Range, каждый из которых представляет один символ. Это свойство есть не только у объектов Document, но и у объектов Selection и Range. Может использоваться, например, для выполнения операция поиска и замены или статистических подсчетов (например, для если переводчику платят за количество символов);
Content - свойство, возвращающее объект Range, представляющий главную цепочку документа (main document story). Если говорить проще - просто текст документа, без колонтитулов, сносок, комментариев и т.п.
CustomDocumentsProperty - свойство, возвращающее коллекцию объектов DocumentProperties, представляющих пользовательские свойства документа. Можно использовать для сохранения вместе с документом любых значений переменных. Очень удобно, например, для подсчета количества открытий документов, флажков печатался/не печатался, сколько раз вызывалась та или иная функция, на каких компьютерах и каким пользователем открывался и т.п.
DefaultTabStop - определить отступ по умолчанию при использовании символа табуляции. По умолчанию - 35 пунктов, что примерно равно 1,25 см;
DisableFeatures - отключить возможности, которые понимают только последние версии Word (для совместимости с пользователями, у которых на компьютерах стоят старые версии). Обычно само свойство DisableFeatures просто включает этот режим, а конкретный уровень совместимости задается при помощи свойства DisableFeaturesIntroducedAfter.
DoNotEmbedSystemFonts - не вставлять в документ системные шрифты (по умолчанию для русского, японского и т.п. вставляются). Позволяет сократить размер документа - но тогда пользователи в системе, где не стоит русский язык, не смогут прочесть этот документ.
EmbedTrueTypeFonts - очень полезное свойство, если вы работаете с документом в месте, где используются экзотические шрифты (например, в издательстве). Вставка true-type шрифтов гарантирует, что получатели документа будут видеть его точно таким же, как и создатель.
Envelope - позволяет получить ссылку на специальный объект Envelope, который используется для создания почтовых конвертов.
Fields - возможность получить ссылку на коллекцию Fields одноименных объектов. Очень полезна при работе с полями.
Footnotes - возможность получить коллекцию сносок.
свойства Formatting… - что показывать в списке стилей в панели инструментов Форматирование .
FormFields - аналогично Fields, но в этом случае мы получаем ссылку на поля в формах.
FulName - полное имя объекта (вместе с путем к нему в файловой системе или Web). Доступно, конечно, только для чтения.
GrammarChecked - пометить весь документ, как проверенный с точки зрения грамматики (фактически отключить проверку грамматики для данного документа). Такое же свойство существует и у объекта Range. Коллекцию ошибок, выловленных при проверке грамматики, можно получить при помощи свойства GrammaticalErrors, а выделить ошибки зеленым волнистым подчеркиванием (если они еще не выделены) - при помощи свойства ShowGrammaticalErrors. Для орфографических ошибок существует аналогичные свойства SpellingChecked, SpellingErrors и ShowSpellingErrors.
HasPassword - проверить, назначен ли пароль для указанного документа. Password - назначить пароль. По причине крайней слабости парольной защиты пароли в Word, Excel и Access использовать не рекомендуется.
Indexes - возвращает коллекцию индексов (то есть предметных указателей) для документа.
Name - возвращает имя документа (без пути к нему).
OpenEncoding - возвращает кодовую страницу, которая использовалась для открытия документа. Для русского языка по умолчанию, конечно, 1251.
PageSetup - позволяет получить ссылку на одноименный объект. Используется, конечно, в основном при реализации печати.
Paragraphs - возвращает ссылку на коллекцию абзацев в данном документе.
Path - возвращает путь к документу в файловой системе (без имени). Может пригодиться, чтобы создать еще один файл по тому же пути.
Permission - возможность получить доступ к объекту Permission, который позволяет управлять системой внутренних разрешений документа Word (не разрешений файловой системы).
PrintRevisions - печатать или нет пометки редактора (исправления) вместе с документом. По умолчанию - печатать.
ProtectionType - проверить защиту данного документа (разрешено все, или только комментарии, чтение, изменения в полях форм и т.п.). Сама защита устанавливается при помощи метода Protec()t.
ReadOnly - здесь объяснений не требуется. Это свойство доступно только на чтение (поскольку соответствующий атрибут устанавливается в файловой системе).
RemoveDateAndTime и RemovePersonalInformation - удалить информацию о дате и времени произведенных изменений и всю информацию о пользователе из документа (включая свойства документа). Может быть полезным при создании файла-образца.
Saved - очень важное свойство. Позволяет определить, изменялся ли документ со времени последнего изменения.
SaveEncoding - позволяет явно указать (или получить) кодировку, которая будет использоваться при сохранении документа.
SaveFormat - позволяет получить информацию о формате документа (DOC, RTF, TXT, HTML и т.п.). Доступно только для чтения.
Sections - возвращает коллекцию разделов документа. Sentences - то же самое для предложений. Аналогично работают свойства Shapes , Styles , Subdocuments , Tables , Windows и Words .
Type - возвращает тип документа (обычный, шаблон или Web-страница с фреймами).
Variables - еще одно очень удобное свойство. Можно использовать для сохранения своих служебных данных вместе с документом, как и пользовательские атрибуты (custom attributes), но в отличие от пользовательских атрибутов документа, пользователям эти свойства не видны.

Теперь - о самых важных методах объекта Document:

Activate() - этот метод позволяет сделать указанный вами документ активным (например, для ввода текста).
AddToFavorities() - добавить ссылку на документ в каталог "Избранное". Может быть полезным, если пользователь будет работать с ним постоянно.
CheckSpelling() и CheckGrammar() - запустить проверку орфографии и грамматики соответственно.
Close() - закрыть документ. Можно закрыть с сохранением (по умолчанию), а можно - без (если указать соответствующий параметр).
Compare() - сравнить документ с другим и сгенерировать редакторские пометки в местах, где обнаружены различия.
DataForm() - возможность редактирования форм данных - то есть данных, которые в документе разделены разделителями полей и строк. Вообще говоря, формы данных в Word рекомендуется использовать только в случае крайней необходимости - гораздо больше дл работы с упорядоченными данными приспособлены Excel и Access.
DetectLanguage() - определить язык текста. Проверка производится по предложениям, на основе сверки слов в них со встроенными словарями. Такая проверка производится автоматически во время ввода текста или открытия нового документа. Чтобы заново провести проверку языков, свойство LanguageDetected нужно перевести в False.
FitToPages() - очень интересный метод. Размер шрифта автоматически меняется таким образом, чтобы текст стал занимать на одну страницу меньше. Можно использовать для устранения "висячих страниц" и других проблем верстки.
FollowHyperlink() - открыть указанный вами документ в соответствующем приложений (если HTML, то в Internet Explorer).
GoTo() - очень мощный метод, существует для объектов Document, Range и Selection. В первых двух случаях он возвращает объект Range, в третьем - просто перемещает указатель ввода текста на нужное место. Умеет переходить на начало страницы, строки, закладки, комментария, таблицы, секции, поля, ссылки, формулы и т.п. Может на определенный номер этого объекта, первый, последний, следующий и т.п. Очень удобно использовать для установки указателя в нужное место для автоматического ввода текста.
Merge() - возможность произвести слияние двух документов. Метод очень сложный и мощный, основывается на применении редакторских пометок.
PresentIt() - открывает данный документ Word в PowerPoint.
PrintOut() - очень сложный метод, который позволяет вывести на печать весь документ или его часть. Принимает два десятка параметров (все - необязательные). Может использоваться для объектов Application, Document и Window.
PrintPreview() - перевести документ в режим предпросмотра.
Protect() - возможность ограничить внесения изменений в документ при помощи пароля или IRM.
Range() - очень важный метод. Возвращает объект Range (он будет рассмотрен ниже), принимает в качестве параметров номер начального символа диапазона и номер конечного символа.
Redo() - повторить последнее действие. В качестве параметра принимает количество последних действий, возвращает True, если повтор был произведен успешно.
Repaginate() - переразбить документ на страницы. Обычно используется, если автоматическая разбивка была ранее отключена.
Save() - смысл этого метода очевиден. Если документ еще не сохранялся, открывается диалоговое окно Save As .
SaveAs() - очень мощный и сложный метод. Можно определить путь для сохраняемого документа, его формат, кодировку, пароли на открытие и изменение документа, вставку шрифтов и многое другое. Очень полезный метод, например, для автоматической конвертации документов.
Select() - позволяет просто выделить весь документ. Этот метод существует для очень большого количества объектов, в том числе Selection и Range.
TransformDocument() - исключительно мощный метод, но только для программистов, которые хорошо разбираются в XML и XSLT. Позволяет применить к документу таблицу преобразований стилей (Extensible Stylesheet Language Transformation, XSLT), при помощи которой можно поменять все, что угодно.
Undo() - отменить определенное количество последних действий. По синтаксису и принципам работы - полный аналог Redo() .
UndoClear() - очистить буфер отмены изменений, чтобы пользователь не смог откатить произведенные действия.
UnProtect() - снять защиту с документа (определенную методом Protect() или на графическом интерфейсе). Может быть очень полезным перед программным внесением изменений в защищенный документ.

Часто используемых событий у объекта Document всего три - New() (можно определить только для шаблона, срабатывает, когда на основе этого шаблона создается новый документ), Open() и Close(). Все эти свойства очевидны и изначально доступны в окне редактора кода Visual Basic.

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

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

Книга:

Работа с текстом в Word VBA

Объекты Range и Selection являются отправными точками для практически любых операций, которые вы сможете выполнять с текстом с помощью Word VBA. Некоторые из этих действий можно применять к документам в целом, но в общем случае вам необходим диапазон или выделенная область, прежде чем вносить изменения.

У объектов Range и Selection достаточно много общего, но есть и несколько ключевых отличий. Оба объекта представляют непрерывные последовательности символов, над которыми вы сможете выполнять различные операции. Оба объекта имеют много общих свойств и методов. Однако некоторые свойства и методы уникальны для выделенных областей, а другие - для диапазонов. Значительные различия состоят и в том, что объект Selection соответствует выделению в области окна: тексту, графическому изображению или любому другому объекту, в то время как объекты Range существуют независимо от выделенной области и всегда содержат текст.

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

Несмотря на их различия, объекты Selection и Range можно создавать один из другого. Эта возможность оказывается чрезвычайно важной, так как многие функции редактирования работают только с диапазонами. В противоположность этому, единственный способ отобразить содержимое диапазона пользователю- выделить его. Используйте следующие простые приемы.

* Для выделения диапазона используется его метод Select. Например, для объекта RangeR команда имеет вид RangeR. Select.

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

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

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

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

Для добавления к выделенной области слова, которое будет следовать сразу за ней, используйте такую инструкцию:

Selection.Expand(wdWord)

Вы можете использовать любую из следующих констант для расширения объекта; wdCharct er, wdWord, wdSent ence, wdParagraph, wdSection, wdStory, wdCell, wdColumn, wdRow, wdTable и (только для объектов Selection) wdLine. По умолчанию используется константа wdWord.

Теперь нам следует остановиться на одном щекотливом моменте: объекты Selection (но не диапазоны) также содержат метод Expand. Этот метод включает соответствующее средство Word, которое позволяет расширять выделенную область при перемещении указателя мыши. Каждый раз, когда программа вызывает метод Extend, выделенная область увеличивается на блок текста, который следует сразу за точкой вставки: текущее слово, предложение, абзац, выделенный фрагмент пли целый документ. Если вы указали аргумент в виде одного символа, например, Selection.Expand ("С"). выделенная область будет расширена вплоть до первого встретившегося указанного символа.

Word VBA позволяет вам повторно определять начало и конец диапазона или выделенной области. Только имейте в виду, что методы, в имени которых присутствует слово Move, изменяют расположение диапазона или выделенной области: они не перемещают текст, который содержится в указанном объекте.

Метод Move изменяет диапазон или выделенную область, начиная с их сжатия, отмечая их расположение, а в них уже нет никакого текста. Расположение совпадает с началом исходного объекта. После этого метод Move перемещает "сжатый" объект в соответствии с вашими инструкциями. По окончании перемещения вы можете использовать методы Expand и Mover,nd для наполнения объекта текстом.

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

"Расширение диапазонов и выделенных областей" раньше в этой главе). Аргумент Count представляет собой целое положительное число, если вы хотите перемешать объект вперед по документу (т.е. к его концу), или отрицательное, если вы хотите перемещать объект назад по документу. В приведенном ниже примере аргументы не заключены в скобки, поскольку возвращенное методом значение (количество перемещенных элементов) здесь не используется:

oTheRange .Move Unit: = waParagraph, Count, : = -2

Методы MoveStart. и MoveEnd работают практически так же, как и метод Move, только они изменяют начальную или конечную точку диапазона или выделенной области соответственно. Приведенная ниже инструкция перемешает начало выделенной области на три слова ближе к концу документа:

Select-on.KoveStart Unit: = wdWord, Count:= 3

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

Еще одна пара методов, Start Of или EndOf, перемешает или расширяет начало или конец диапазона или выделенной области. Метод Start Of перемещает начало объекта обратно к началу текущего блока, в то время как метод EndOt перемешает конец объекта вперед к концу текущего блока.

Вы можете использовать аргумент Extend с любым методом для контроля над действиями Word. Если перемешаемая сторона объекта уже находится с того края, к которому вы пытаетесь ее переместить, ничею не происходит. Используйте константу wdMove для сжимания объекта или константу wdExtend для перемещения только указанной стороны. Ниже приведен соответствующий пример:

Selection. Start Of Unit:= wdSentence, Extend:= wdMove

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

Используйте метод Collapse для сжатия диапазона или выделенной области. Вы можете сжать объект к его начальной или конечной точке, используя необязательный аргумент Direction. Приведенная ниже инструкция сжимает выделенную область к ее начальной точке:

Selection.Collapse

А этот пример сжимает выделенную область к ее конечной точке:

Selection.Collapse(Direction:=wdCollapseEnd)

Если вы сожмете диапазон, который заканчивается знаком абзаца, к его конечной точке (используя константу wdCollapseEnd), Word разместит сжатый диапазон после знака абзаца (это означает, что сжатый диапазон будет находиться в следующем абзаце). Если же вы хотите разместить что-то перед знаком абзаца исходного диапазона, вы должны сначала переместить диапазон обратно с помощью метода MoveEnd, используя инструкцию, подобную этой:

Диапазон.MoveEnd Unit:= wdCharacter, Count:= -1

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

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

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

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

With ActiveDocument.Bookmarks("TheBookmark")

ActiveDocument.Range(Start:=.Start, End=.Start)

RangeY.Text = Selection.Text

Для передачи вместе с текстом и его форматирования просто замените свойство Text свойством FormattedText.

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

Range2.Text = "Эй, эй! А ведь дома-то никого нет!"

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

Используйте методы Insert Before или Insert After объектов Range или Selection для вставки текста в определенном месте документа, не затрагивая при этом существующий текст. Эти методы позволяют вставить новый текст непосредственно перед или после указанного объекта соответственно. Word включает вставленный текст в выделенную область или диапазон.

При использовании любого из методов единственным аргументом является текст, который вы хотите вставить. Приведенный ниже фрагмент кода вставляет новый абзац, содержащий слова Dairy Entry в начало выделенной области (обратите внимание на использование такой константы VBA, как vbCr, для добавления знака абзаца). После этого в конец добавляется новый абзац, который начинается с текущей даты. Если вы выделили целый абзац до выполнения этого кода, абзац, содержащий текущую дату, появится после знака абзаца в выделенной области.

9.3. Редактор Visual Basic

После записи рассмотренного выше макроса к шаблону Normal добавился следующий текст макроса:

Sub Arial_10_bold()

“ Arial_10_bold Macro

“ Arial 10 Полужирный

With Selection.Font

Underline = wdUnderlineNone

UnderlineColor = wdColorAutomatic

StrikeThrough = False

DoubleStrikeThrough = False

Outline = False

SmallCaps = False

AllCaps = False

Color = wdColorAutomatic

Engrave = False

Superscript = False

Subscript = False

Animation = wdAnimationNone

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

Для записи макросов, как и для других команд, в Microsoft Word используется язык Visual Basic for Applications (VBA, Visual Basic для приложений). Макрос представляет собой набор команд и операторов на VBA. Каждая команда и действие в Microsoft Word представлены в виде строк формата VBA, процесс записи макроса тоже представляет собой формирование таких строк. Таким образом, пользователь имеет возможность изменить или создать макрос без повторного выполнения всей процедуры. Хотя макрос VBA можно создать в любом текстовом редакторе, не стоит пренебрегать возможностью записи макроса в Word. Макросу, созданному при помощи Microsoft Word, можно добавлять новые команды и функции, а также на таких макросах можно изучать язык VBA.

Макросы можно редактировать, используя специальную утилиту, которая входит в поставку Microsoft Office, – редактор Visual Basic (рис. 9.10).

Рис. 9.10. Окно редактора Visual Basic

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

Окно редактора Visual Basic можно открыть несколькими способами, например нажав кнопку Visual Basic на панели Разработчик.

Из книги Программирование автора Козлова Ирина Сергеевна

3. Переменные Visual Basic В Visual Basic переменные накапливают информацию (значения). При их применении Visual Basic занимают область в памяти компьютера, которая предназначена для сохранения этой информации. Имена переменных, составленные из символов, могут иметь длину в 255 символов.

Из книги Реестр Windows автора Климов Александр

Visual Basic Регистрация dll- и ocx-файловДанная заметка будет полезна разработчикам. Если вам часто приходится работать с ocx-файлами (а также с dll-файлами), которые требуют регистрации в реестре с помощью REGSVR.EXE, то будет гораздо удобнее внести соответствующую запись в реестр, чем

Из книги Язык программирования С# 2005 и платформа.NET 2.0. автора Троелсен Эндрю

Подход Visual Basic 6.0 Благодаря искреннему желанию насладиться более простой жизнью, многие программисты ушли от "мира каркасов" приложений на базе C(++) к более дружественным языкам, таким, как, например, Visual Basic 6.0 (VB6). Язык VB6 стал популярным благодаря тому, что он дает

Из книги Реестр Windows автора Климов А

Из книги BPwin и Erwin. CASE-средства для разработки информационных систем автора Маклаков Сергей Владимирович

Visual Basic 6.0 В Visual Basic 6.0 в отличие от пятой версии окна Code и Object появляются в нормальном, не в раскрытом виде. И приходится при каждом запуске VB6 раскрывать эти окна. Можно заставить автоматически раскрывать эти окна при каждом запуске. Создайте в соответствующем разделе

Из книги VBA для чайников автора Каммингс Стив

2.4.2. Генерация кода в Visual Basic ERwin поддерживает генерацию кода для MS Visual Basic версий 4.0 и 5.0. В качестве источника информации при генерации форм служит модель ERwin. Использование ERwin позволяет одновременно описывать как клиентскую часть (объекты, отображающие данные на экране),

Из книги Программирование для карманных компьютеров автора Волков Владимир Борисович

Что визуального в Visual Basic для приложений? К счастью, VBA во многом избавляет от необходимости нудного печатания программного кода. В одних случаях вы записываете команды, которые нужны в приложении, и используете их в качестве отправной точки при создании новой программы.В

Из книги Виртуальная библиотека Delphi автора

VBA против Visual Basic Помимо того, что VBA не позволяет вам создавать отдельные приложения, одно из основных отличий состоит в том, что программы, написанные на VBA, работают медленнее, чем программы, написанные на Visual

Из книги автора

Различия между VBA и Visual Basic VBA имеет очень много общего с Visual Basic, своим старшим братом, предназначенным для создания независимых приложений. А раз языки похожи, вы можете перенести большую часть своих навыков в программировании на VBA в Visual Basic. Однако вам следует помнить о

Из книги автора

Вызов редактора Visual Basic Редактор Visual Basic служит командным центром для работы в VBA. В нем вы должны находиться при разработке VBA-форм, создании VBA-кода, тестировании и отладке VBA программ. Экспертом по использованию редактора Visual Basic вы станете после прочтения главы 5, а пока

Из книги автора

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

Из книги автора

Глава 5. Редактор Visual Basic к вашим услугам. В этой главе...~ Поиск команд в системе меню редактора Visual Basic~ Отображение, перемещение и настройка панелей инструментов~ Понимание и использование закрепления панелей инструментов и окон~ Сражение с толпами окон редактора Visual Basic~

Из книги автора

Пользовательский интерфейс редактора Visual Basic Редактор Visual Basic является стандартным блюдом Microsoft- меню, панели инструментов и комбинации клавиш выглядят и работают очень похоже на Microsoft Office. Вы будете чувствовать себя как дома, если используете VBA с приложениями из Office.С

Из книги автора

Среда разработки eMbedded Visual Basic 3.0 Для краткости в этой главе для обозначения среды eMbedded Visual Basic 3.0 будет использовано сокращение eVB.Запустить eVB можно либо при помощи команды меню Пуск (Пуск? Программы? Microsoft eMbedded Visual Tools ? eMbedded Visual Basic 3.0), либо найти в папке установки

Из книги автора

Отличия eVB и Visual Basic для. NET В основном отличия VB.NET от eVB связаны с интеграцией языка VB с Compact Framework и определяются именно внутренней структурой самой CF.Типы данныхВ eVB был один-единственный тип данных на все случаи жизни, Variant, который достался eVB по наследству от VB Script. Visual

Из книги автора

Delphi и Visual Basic 1. Есть ли в Delphi эквивалент массива элементов управления из Visual Basic? Hет. Компоненты Delphi не имеют свойства Index, подобное VB. Однако, имеются три основные причины, почему вы хотите использовать их в VB, и для каждой из них есть решение в Delphi. Причина 1. Вы хотите

Модуль поиска не установлен.

VBA Word, как это делается

(Окончание. Начало в №7)

События

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

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

Можно по-разному запрограммировать реакцию на щелчок мышью по полю Формы и по Командной кнопке в этой форме, процедуры обработки, казалось бы, одного события будут разными, т.к. будут принадлежать разным объектам. Также существует очередность возникновения событий, которую надо учитывать при их программировании. Например, событию Щелчок мыши (Click), предшествуют событие Нажатие клавиши мыши (MouseDown) и событие Отпускание клавиши мыши (MouseUp). Но надо заметить, что совсем не обязательно учитывать все события при написании вашей программы, нужно лишь выбрать те, которые вам действительно необходимы для работы. Обойтись без программирования обработки событий можно, но лишь только вы задумаете писать программу, где присутствуют пользовательские формы, вы сразу столкнетесь с необходимостью программирования процедур обработки событий.

Классы объектов

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

Объект, который создается на основе класса, называют экземпляром класса.

Модель объектов приложения

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

Окно просмотра объектов выводится следующим образом:

1. Активизируйте окно Редактор Visual Basic.

2. Выберите команду Вид\Просмотр объектов (или нажмите клавишу F2).

На экране появится окно Просмотр объектов (рис. 1).

3. Выберите требуемую библиотеку в списке библиотек, расположенном в левом верхнем углу.

В окне Классы появится список всех классов в выбранной библиотеке.

4. Выделите в списке Классы требуемый класс.

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

5. Выделите в списке компонент нужную строку.

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

Если нужна развернутая информация по компоненту класса, щелкните по значку "вопросительный знак" на панели инструментов.

ПРОГРАММИРОВАНИЕ В WORD.
Модель объектов Word

В приложении Word нам предстоит работать с его объектами. Поэтому рассмотрим их подробнее.

На рис. 2 приведена полная модель объектов Word. Главным объектом, стоящим на вершине иерархической пирамиды объектов, является сам Word, рассматриваемый как приложение (Application), на следующем уровне представлены наборы объектов (Documents, Dialogs, Windows и др.) и одиночные объекты (н-р, Selection). Каждый из них также содержит большое число объектов, свойств и методов. Например, объект Documents включает в себя объекты, которые связаны с ним, такие, как Words (слова), Paragraphs (абзацы), Bookmarks (закладки), Characters (символы), Document (документ) и т.д. Эти объекты в свою очередь содержат в себе еще объекты, свойства и методы. Те объекты, которые включают в себя схожие объекты, называют наборами или коллекциями (Collection), они отличаются именем, записанным в множественном числе (например, Documents, Windows, Words). С помощью свойств и методов, присущих объекту Коллекция, можно выделить из него один конкретный объект для обработки. Разные коллекции могут включать в себя одинаковые объекты, например, объект Words (Слова) принадлежит коллекции Documents (Документы), связан с объектом Selection (Выбор) и с объектом Range (Диапазон). Объект Words сам, в свою очередь, является коллекцией объектов. То, что объект принадлежит какой-то коллекции, не означает, что он рассматривается как часть чего-то общего.

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

В окне редактора Visual Basic нажмите кнопку Просмотр объектов, в всплывающем меню списка Выбор библиотеки выберите Word. В правой части окна под заголовком Классы будут перечислены все наборы объектов Word, а слева - все свойства и методы выбранного объекта.

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

Объект Application

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

Например, свойство ActiveDocument возвращает объект Document, а свойство с названием Application используется для возвращения объекта Application. Следующий пример показывает имя пользователя для Word. Это имя записывается в меню Сервис/Параметры во вкладке Пользователь. Инструкция MsgBox является функцией VBA, выводящей на экран диалоговое окно с сообщением MsgBox Application.UserName (рис. 3).

Многие из свойств и методов, которые возвращают наиболее общие объекты интерфейса пользователя - такие, как активный документ (свойство ActiveDocument) - могут использоваться без спецификатора объекта Application.

Например, вместо записи Application.ActiveDocument.PrintOut вы можете записывать просто ActiveDocument.PrintOut. Свойства и методы, которые могут использоваться без спецификатора объекта Application, рассматриваются как "глобальные". Чтобы увидеть глобальные свойства и методы в окне Просмотр Объектов, щелкните по строке <глобальные> наверху списка в блоке Классы.

Объект Application имеет более 80 свойств, отражающих все настройки приложения. Перечислим некоторые из них (табл. 1).

Как можно изменять свойства объекта Application в программе во время выполнения каких-либо действий? Существует несколько специальных процедур, с помощью которых можно это сделать. Эти процедуры имеют специальные имена и выполняются автоматически, во время некоторых операций (табл. 3).

Вставляя строки с инструкциями VBA в эти макросы, можно воздействовать на объекты, например, при создании нового документа убрать с экрана полосы прокрутки и строку состояния, записав следующий макрос в модуль Normal:

Public Sub AutoNew()

Application.DisplayScrollBars = False

Application.DisplayStatusBar = False

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

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

Событий у объекта Application немного (табл. 4).

Чтобы запрограммировать отклик на события объекта Application, необходимо предварительно выполнить ряд действий:

1. Объявить объектную переменную в модуле класса.

2. Записать процедуры обработки события.

3. Инициализировать объявленный объект из другого модуля.

Как объявить Объектную переменную

Для этого необходимо создать новый модуль класса и объявить объект типа Application с событиями. Для этого выберите в меню Вставка строку Модуль класса, в окне Программа нового модуля класса введите следующий код (рис. 4):

Public WithEvents App As Word.Application

Вызовите окно свойства и измените свойство Name с Класс1 на EventClassModule.

Описание Процедур Событий

После того как новый объект был объявлен с событиями, он появится в окне Программа в раскрывающемся списке Объекты, и можно писать процедуры событий для нового объекта. (Когда вы выбираете новый объект в списке Объектов, допустимые события для него перечислены в раскрывающемся списке Процедуры.) Выбирают событие из раскрывающегося списка Процедуры, и пустая процедура добавляется к модулю класса (рис.5). Можно записывать необходимый код для обработки события.

Инициализация объявленного Объекта

До того как процедура будет выполнена, необходимо подключить объявленный в модуле класса объект (у нас он называется App) к объекту Application. Это делается следующим кодом из любого модуля.

Dim X As New EventClassModule

Sub Регистрация()

Set X.App = Word.Application

Теперь остается только выполнить процедуру Регистрация. Можно запустить ее из меню или вызвать из другой процедуры модуля. После этого объект App в модуле класса будет указывать на объект Word Application, и процедуры обработки события в модуле класса будут выполняться при возникновении событий.

Коллекция объектов Documents

Documents - это набор всех объектов Document, которые являются в настоящее время открытыми в Word.

Этому набору присущи свои свойства, методы и события.

Свойств у набора Documents немного (табл. 5).

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

For Each aDoc In Documents

aName = aName & aDoc.Name & vbCr "vbCr - это константа, определяющая символ возврата каретки (код 13)

Методов у набора Documents несколько больше (табл. 6).

Метод Add используется для создания нового пустого документа и добавления его к набору Documents. Следующий пример создает новый документ, основанный на шаблоне Normal.dot.

Синтаксис метода Add:

выражение.Add(Template, NewTemplate)

выражение - выражение, возвращающее объект Documents.

Template - необязательный параметр. Содержит имя шаблона, который будет использован для нового документа. Если параметр опущен, используется Normal.dot.

NewTemplate - необязательный параметр. Если параметр равен True, документ открывается как шаблон. По умолчанию значение False.

Метод Item используется для выбора конкретного элемента из набора. Элемент может быть определен по имени или по его номеру в наборе.

Синтаксис метода:

выражение.Item(Индекс)

Выражение - выражение, которое возвращает объект Documents.

Индекс - имя или индексный номер элемента набора.

Метод Item является заданным по умолчанию методом для наборов. Поэтому следующие две строки кода эквивалентны.

Application.Documents(1)

Application.Documents.Item(1)

Так же эквивалентны и следующие строки:

Application.Documents("Report.doc")

Application.Documents.Item("Report.doc")

Открывают файлы документов с помощью метода Open.

Синтаксис метода Open следующий:

выражение.Open(FileName, ConfirmConversions, ReadOnly, AddToRecentFiles, PasswordDocument, PasswordTemplate, Revert, WritePasswordDocument, WritePasswordTemplate, Format)

выражение - это выражение, возвращающее объект Documents.

FileName - обязательный параметр "имя файла". Этим параметром указывается путь к документу. Можно записать несколько файлов, отделяя имена файлов пробелами.

ConfirmConversions - необязательный параметр, может принимать значения True, если необходимо отобразить диалоговое окно Convert File, если файл записан не в формате Word.

ReadOnly - необязательный параметр. Равен True, если файл открывается только для чтения.

AddToRecentFiles - необязательный параметр, если равен True, то файл добавляется к списку файлов внизу меню Файл.

PasswordDocument - необязательный параметр. Содержит пароль для открытия документа.

PasswordTemplate - необязательный параметр. Содержит пароль для открытия шаблона.

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

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

WritePasswordTemplate - необязательный параметр. Содержит пароль для сохранения изменений шаблона.

Format - необязательный параметр. Содержит конвертер для преобразования файла. Может быть записан одной из констант: wdOpenFormatAuto, wdOpenFormatDocument, wdOpenFormatRTF, wdOpenFormatTemplate, wdOpenFormatText, или wdOpenFormatUnicodeText. Значение по умолчанию - wdOpenFormatAuto.

Для определения внешнего формата файла применяется свойство OpenFormat объекта FileConverter, которое возвращает значение, записываемое в этот параметр.

Следующий код открывает файл Sales.doc. Имя файла указывается в кавычках.

Documents.Open FileName:="C:\Мои документы\Sales.doc" " открывается документ "Sales.doc"

В следующем примере документы из набора Documents перебираются, чтобы найти в наборе документ, названный "Report.doc". Если этот документ имеется в коллекции Documents, он активизируется, если нет, то документ открывается.

For Each doc In Documents

If doc.Name = "Report.doc" Then found = True

If found <> True Then

Documents.Open FileName:="C:\Documents\Report.doc"

Documents("Report.doc").Activate

Метод Close используется для закрытия документов и имеет синтаксис:

выражение.Close(SaveChanges, OriginalFormat, RouteDocument)

выражение - выражение, которое возвращает объект Document или Documents.

SaveChanges - необязательный параметр. Определяет действие при сохранении документа. Может быть одна из следующих WdSaveOptions констант:

WdDoNotSaveChanges (не сохранять изменения);

WdPromptToSaveChanges (выдавать диалоговое окно с запросом на сохранение изменений);

WdSaveChanges (сохранять без запросов).

OriginalFormat - необязательный параметр. Определяет формат для сохранения документа. Может быть одна из следующих wdOriginalFormat констант: wdOriginalDocumentFormat, wdPromptUser, wdWordDocument.

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

Следующая строка кода закрывает документ, названный "Report.doc", без сохранения изменения. В ней указывается параметр SaveChanges, которому константой присвоено значение "не сохранять изменения".

Documents("Report.doc").Close SaveChanges: = wdDoNotSaveChanges

Метод Save применяется для сохранения одного или всех документов. Метод имеет несколько видов записи, в зависимости от ожидаемого результата.

1. Выражение.Save.

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

Здесь выражение - выражение, возвращающее объект Document или Template.

2. Выражение.Save(NoPrompt, OriginalFormat).

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

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

Параметр OriginalFormat определяет путь для сохранения документов. Может быть равен одной из следующих wdOriginalFormat констант: wdOriginalDocumentFormat, wdPromptUser, или wdWordDocument.

3. Выражение.Save(Comment)

Эта запись сохранит версию указанного документа с комментариями.

Следующий пример сохраняет активный документ.

ActiveDocument.Save

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

Documents.Save NoPrompt:=True, OriginalFormat:=wdOriginalDocumentFormat

Если файл Sales.doc открыт, то следующий код сохраняет версию фйла с добавленными к нему комментариями.

For Each doc in Documents

If Instr(1, doc.Name, "Sales.doc", 1) > 0 Then

doc.Versions.Save Comment:="незначительные изменения"

Объект Document

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

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

Следующий пример использует Activate-метод, чтобы инициировать документ, названный "Document 1." Пример также устанавливает горизонтальную ориентацию страницы и печатает документ.

Documents("Document 1").Activate

ActiveDocument.PageSetup.Orientation = wdOrientLandscape

ActiveDocument.PrintOut

Свойство Bookmarks возвращает набор Bookmarks, содержащий все закладки в документе.

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

With ActiveDocument.Bookmarks(1)

BookStart = .Start

Свойство Characters возвращает набор Characters, содержащий все символы в документе.

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

char = Selection.Characters(1).Text

MsgBox "первый символ - ... " & char

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

numchars = ActiveDocument.Sentences(1).Characters.Count

О событиях и методах объекта Document читайте в следующей статье.

Малышев С.А.

10. Программирование в Word

10.1 Зачем программировать в Word

Создание приложений VBA в Word, типичные ситуации

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

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

Автору приходилось создавать приложения с отчетами, разработанными в самых разных программных продуктах - Microsoft Access, Crystal Reports, Microsoft Reporting Services и т.п. Если ваше приложение генерирует отчеты к базам данных в Microsoft Word, то, скорее всего, такие отчеты будут не самыми быстрыми с точки зрения их формирования и не самыми простыми с точки зрения программирования. Зато совершенно точно они будут самыми дружелюбными по отношению к конечному пользователю. Почему?

Очень часто на предприятии возникает необходимость исправить в форме отчета всего пару строк - например, вместо "Директор" поставить "И.О. Директора". Если отчет создан в Crystal Reports или Microsoft Reporting Services, придется срочно обращаться к разработчику. А через какое-то время И.О. утвердят в должности директора, и разработчику придется править отчет снова.

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

У изготовления отчетов в Word есть и другие преимущества. Как правило, при изготовлении отчетов в Word значения из базы данных подставляются в шаблон отчета, который хранится в базе данных или файловой системе (в файле *.dot). Если формат отчета сложный, с большим количеством специфического оформления (пример - объявление на взнос наличными), то намного проще подготовить его шаблон в Word, чем, к примеру, в Crystal Reports или Reporting Services.

Еще одно программное применение Word - работа с разными форматами документов. Word умеет работать с документами самых разных форматов. Эти его возможности вполне можно применить для массовой обработки документов.

Случай из практики: в каталоге на диске у нас собралось несколько сотен "разнокалиберных" документов разных пользователей. Часть из них создана в Word разных версий, часть - просто текстовые файлы, некоторые документы в - форматах HTML, XML или EML (сообщения электронной почты). На предприятии внедрена система документооборота на основе SharePoint Portal Server и нам необходимо привести все эти документы к единому формату (Word 2003) и загрузить их на SharePoint Portal Server. Конечно же, без автоматизации в такой ситуации возиться придется очень долго.

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