Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Создание пользовательских п ÒÉÌÏÖÅÎÉÊ ÓÒÅÄÓÔÁÍ...doc
Скачиваний:
6
Добавлен:
18.11.2019
Размер:
2.02 Mб
Скачать

Раздел 6. Объекты ms Excel 101

Свойства объектов 101

Примеры часто используемых свойств различных объектов 102

Синтаксис операторов присваивания object.property=expression 102

Важно 103

Пример 103

Важно 103

Примеры 103

Методы объектов 104

Важно 104

Запомните 104

Модель объектов 105

Рис. 6.2. Фрагмент статьи, посвященной объекту Workbook 106

Коллекции объектов 106

Обращение к объекту 107

Контейнеры 107

Преимущества 107

Ссылка на объект 107

Важно 108

Оператор With 108

With Object 108

End With 108

Внимание 109

Пример 109

Использование объектных переменных 109

Преимущества 109

Объект Application 111

Примеры операторов 111

Активные объекты 111

Свойства, возвращающие активный или выделенный объект 111

Примеры 111

Свойства, влияющие на высвечивание на экране 112

Важно 112

Пример 112

Примеры 112

Важно 113

Пример 113

Пример 114

Другие свойства объекта Application 114

Методы 115

Синтаксис expression.Calculate 115

Примеры 116

Синтаксис expression.CheckSpelling(Word [,CustomDictionary][, IgnoreUppercase]) 116

Пример 116

Синтаксис OnTime(EarliestTime, Procedure[,LatestTime]) 116

Пример 116

Синтаксис expression.Wait(Time) 117

Пример 117

Коллекции объектов 117

Важно 117

Объекты Workbooks и Workbook 118

Некоторые свойства и методы объектов Workbooks и Workbook 118

Чтобы вставить событийную процедуру для объекта Workbook 119

Пример 120

Объекты Sheets, WorkSheets и WorkSheet 120

Некоторые свойства и методы объектов Sheets, WorkSheets и WorkSheet 120

Пример 121

Пример 122

Public Sub sheet_type() 122

Dim w(1 To 2) As Integer 122

Else 122

Пример 122

Public Sub worksheet_next() 123

Worksheets("Лист2").Activate 123

Пример 123

Public Sub Sheet_Visible () 123

Dim sh As Object, newSheet As Object 123

Set newSheet = Worksheets.Add 123

Внимание 124

Важно 124

Пример 124

Sub book_sheet() 124

Dim p As Long 124

Синтаксис expression.Move([Before] [,After]) 125

Синтаксис expression.Select([Replace]) 125

Замечание 125

Пример 125

Public Sub move_sheets() 125

Dim n As Integer, I As Integer 125

Next I 125

'объекта Window возвращает коллекцию Sheets, состоящую из выделенных листов 125

Чтобы вставить событийную процедуру для объекта WorkSheet 126

Пример 126

Объект Range 126

Свойства и методы, возвращающие объект Range 126

Свойства 127

Важно 127

Синтаксис object.Cells (RowIndex,ColumnIndex) 128

Замечание 129

Примеры записи свойства Cells 129

Синтаксис object.Offset([RowOffset][,ColumnOffset]) 129

Синтаксис Object.Union (arg1,arg2,...) 129

Синтаксис Object.Areas(index) 130

Примеры 130

Синтаксис Object.Columns(index) 131

Важно 131

Пример 131

Синтаксис Object.Rows(index) 132

Важно 132

Пример 132

Пример 133

Sub set_width() 133

Range("B1").Activate 133

Методы 133

Синтаксис object.Select(Replace) 133

Синтаксис object.Activate 134

Примеры 135

Пример 135

Цветовое оформление объекта Range 136

Пример 136

Замечание 137

Примеры 137