Информационный сайт

 

Реклама
bulletinsite.net -> Книги на сайте -> Программисту -> Васильев А. -> "VBA в Office 2000 учебный курс" -> 84

VBA в Office 2000 учебный курс - Васильев А.

Васильев А., Андреев А. VBA в Office 2000 учебный курс — Спб.: Питер, 2001. — 432 c.
ISBN 5-8046-0193-8
Скачать (прямая ссылка): vbauchebniykurs2001.djvu
Предыдущая << 1 .. 78 79 80 81 82 83 < 84 > 85 86 87 88 89 90 .. 154 >> Следующая

TypeText Тех1:="Таблица . "
MoveLeft Unit:=wdCharacter. Count:=l MoveLeft Unit:=wdCharacter. Count:=9,_
Extend:=wdExtend Range.Style = "tabl_nomer"
EndKey Unit:=wdLine
Range.Style = "Основной шрифт абзаца”
End With
'Добавляем таблицу с помощью метода Add Set InsTable = _
Acti veDocument.Tables.Add(Range:=Selecti on.Range, NumRows:=TableRow. NumColumns:=TableColumn)
'Для каждой строки таблицы устанавливаем стиль For i = TableRow То 1 Step -1
For Each TableCell In InsTable.Rows(i).Cells TableCell.Range.Style = "tabl body”
Next TableCell
Next i
'Добавляем еще одну строку с помощью метода Add 'коллекции Rows для шапки таблицы Selection.Rows.Add Befoi‘eRow:=Selection.Rows(l)
'И устанавливаем для нее стиль
For Each TableCell In InsTable.Rows(l).Cells
8 Зак. 69
226
Урок 8. Создоние приложений для MS Word
TableCell .Range.Style = "tabl_golovka”
Next TableCell
’Задаем границы таблицы с помощью соответствующих 'свойств
'InsideLineStyle задает внутренние границы 'OutsideLineStyle задает внешние границы InsTable.Borders.InsideLineStyle = wdLineStyleNone InsTable.Borders.OutsideLineStyle = wdLineStyleNone Selection.MoveLeft Unit:=wdCharacter, Count:=l Selection.Style = "tablnazv”
End If End With End Sub
В качестве примера еще одного макроса рассмотрим макрос, который задает атрибуты для выделенного участка текста.
Sub FormatTextO With Selection
'Устанавливаем написание полужирным шрифтом Font.Bold = True
'Устанавливаем написание курсивом Font.Italic = True 'Задаем шрифт Tahoma Font. Name = ''Tahoma''
'Размер шрифта 10 Font.Size = 10 End With
VPOK Создание приложений ----- для MS PowerPoint
Приложение MS PowerPoint, входящее в состав MS Office, предназначено для создания и показа презентаций. Презентации представляют собой набор слайдов и раздаточного материала, которые могут использоваться, например,'лектором для подачи материала слушателям.
Хотя по сравнению с MS Word или MS Excel это приложение в нашей стране используется реже, мы коснемся основ его программирования, поскольку способ изложения материала с помощью мела и доски постепенно уходит со сцены из-за низкой эффективности.
Для данного приложения создание панелей инструментов и меню, использование встроенных меню диалога, а также работа с формами и элементами управления не отличаются от ранее рассмотренных приложений MS Office.
Так же как и другие приложения MS Office, программа MS PowerPoint имеет разветвленную иерархию объектов (рис. 9.1), часть из которых является общими для всех приложений MS Office.
В вершине иерархии, как обычно, находится объект Application, являющийся собственно приложением PowerPoint.
Управление приложением PowerPoint
Чтобы управлять приложением PowerPoint, мы можем использовать свойства и методы объекта Application. Например, с помощью метода Quit мы можем закончить работу с приложением.
228
Урок 9. Создание приложений для MS PowerPoint
[ Application^
-| Addins (Addin) | —| FileSearch |
-j AnswerWizard | —| LanguageSettings |
-j Assistant | —| Presentations (Presentation) |
-1 COMAddlns —| SlideShowWindows (SlideShowWindow) |
-| CommandBars (CommandBar) | -| Presentation |
-| OefaultWebOptions | Ц SlideShowWindow |
-| DocumentWindows (DocumentWindow)| H VBE |
—j Panes(Репе)
—| Presentation |
—[selection |
ч ShapeRange (Shape) |
Ц Teble |
-| Columns (Column) 1
L[ CellRange (Cell) ]
—j Borders (LineFormat)
I—j Shape |
L|~Rqws (Row) |
L| CellRange (Cell) ~|
—1 Borders (LineFormat) I
—| Shape |
—fsiideRange (Slide) |
—I TextRenge |
-j View ]
Рис. 9.1. Иерархия объектов верхнего уровня
Объект Application
Как уже отмечалось, объект Application представляет собой приложение PowerPoint.
Методы объекта Application
Объект Application имеет всего четыре метода:
О Метод Activate активизирует приложение.
О Метод Help позволяет вызвать справочную систему приложения.
О Метод Quit завершает работу с приложением PowerPoint. Действие этого метода эквивалентно действию команды Файл > Выход. Если сделанные в процессе редактирования презентации изменения не были сохранены, то перед выходом из приложения будет выдан запрос на сохранение изменений.
О Метод Run запускает на исполнение процедуру VB.
Работа с презентациями
229
Работа с презентациями
Как и в предыдущих уроках, посвященных MS Word и MS Excel, мы сначала коснемся общей структуры объектов MS PowerPoint, а затем рассмотрим эти объекты, их свойства и методы подробнее.
Для получения доступа к любой презентации, открытой в MS PowerPoint, можно использовать коллекцию Presentations, элементами которой являются объекты Presentation, каждый из которых представляет собой презентацию (рис. 9.2). Выбор соответствующего свойства этого объекта позволяет реализовать определенный режим работы с презентацией.
| Presentations (Presentation)
—| ColorSchemes (ColorScheme)
—I DocumentProperties (DocumentProperty)
—| ExtraColors
—| Fonts (Font)
—| Master"
¦q
RGBColor
ColorScheme
HeaderFooters
¦4
HeaderFooter
-| Shapes (Footer)
Предыдущая << 1 .. 78 79 80 81 82 83 < 84 > 85 86 87 88 89 90 .. 154 >> Следующая
Реклама
Авторские права © 2009 AdsNet. Все права защищены.
Rambler's Top100