Студопедия
Случайная страница | ТОМ-1 | ТОМ-2 | ТОМ-3
АрхитектураБиологияГеографияДругоеИностранные языки
ИнформатикаИсторияКультураЛитератураМатематика
МедицинаМеханикаОбразованиеОхрана трудаПедагогика
ПолитикаПравоПрограммированиеПсихологияРелигия
СоциологияСпортСтроительствоФизикаФилософия
ФинансыХимияЭкологияЭкономикаЭлектроника

Тема 3. Использование языка Visual Basic For applications для реализации математических моделей и численных методов (6 часов) 2 страница



Методы объекта Application

Методы

Выполняемые действия

Calculate

Вызывает принудительное вычисление во всех открытых рабочих книгах. Например:

Application.Calculate

Run

Запускает на выполнение подпрограмму или макрос. Синтаксис:

Run (Macro, Argl, Arg2,...)

- Macro — строка с именем макроса

- Argl, Arg2,... — аргументы передаваемые макросу Например:

Application.Run Macro:= "Расчет" — запускает макрос Расчет

Volatile

Вызывает перевычисление функции пользователя при изменении значений параметров. Например, функция Квадрат будет автоматически пересчитывать результат на рабочем листе при изменении значения аргумента:

Function Квадрат(х)

Application.Volatile

Квадрат = х^2

End Function

Wait

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

Синтаксис:

Wait(Time)

- Time — время, в которое предполагается возобновить работу приложения

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

Application.Wait "17:00:00"

OnKey

Устанавливает выполнение специфицированной процедуры при нажатии заданной комбинации клавиш.

Синтаксис:

OnKey(Key, Procedure)

- Procedure — имя выполняемой подпрограммы при нажатии клавиш

- Key — строка, определяющая комбинацию клавиш, которая должна быть нажата. В этой строке можно также указывать специальные клавиши, используя следующие коды:

• <Backspace>—{backspace} или {BS}

• <Break>— (BREAK)

• <CapsLock>— {Capslock}

• <Delete> или <Del> — {DELETE} или (DEL)

• <↓>— {DOWN}

• <End> — {END}

• <Enter> (цифровая клавиатура) — {enter}

• <ESC>- {ESCAPE} ИДИ {ESC}

• <Home> — {home}

• <Ins> или <Insert> — {INSERT}

• <←> — {LEFT}

• <Num Lock> — {numlock}

• <Page Down> — { pgdn }

• <Page Up> — {PGUP}

• <Return> — {RETURN}

• <→> - {RIGHT}

• <Scroll Lock> — {scrolllock}

• <Tab>— {tab}

• <↑>- {UP}

• от <F1> до <F15> - от {F1} до {F15}

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

• <Shift> - +

• <Ctrl> - -

• <Alt> - %

В примере процедуре Амортизация назначена комбинация клавиш <Ctrl>+<+>, а процедуре ПроцентнаяСтавка — <Shift>+<Ctrl>+<->>:

Application.OnKey "Л{+}", "Амортизация"

Application.OnKey "+"{RIGHT}", "ПроцентнаяСтавка"

OnRepeat и

OnUndo

Определяет процедуру, выполняемую при выборе команды Правка, Повторить (Edit, Repeat) и Правка, Отменить (Edit, Undo) соответственно.

Синтаксис:

OnRepeat(Text, Procedure)

OnUndo(Text, Procedure)

- Text — строка, задающая текст команды Правка, Повторить (Edit, Repeat)



- Procedure — имя подпрограммы, выполняемой при выборе команды Правка, Повторить (Edit, Repeat)

OnTime

Назначает выполнение процедуры на определенное время. Синтаксис:

OnTime(EarliestTime, Procedure, LatestTime, Schedule)

- EarliestTime — момент запуска процедуры

- Procedure — имя процедуры

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

- Schedule — допустимые значения: True (выполнение процедуры откладывается на сутки) и False (во всех остальных случаях)

В следующем примере демонстрируется, как запустить процедуру Очистка на выполнение через 15 секунд от текущего времени:

Application.OnTime Now + TimeValue("00:00:15"), "Очистка"

Quit

Закрывает приложение. Например:

Application.Quit

 

События объекта Application

 

Событие

Когда возникает событие

NewWorkbook

При создании новой рабочей книги

WorkbookActivate

При активизации рабочей книги

WorkbookBeforeclose

Перед закрытием рабочей книги

WorkbookBeforePrint

Перед печатью рабочей книги

WorkbookBeforeSave

Перед сохранением рабочей книги

WorkbookDeactivate

Когда активная книга теряет фокус

WorkbookNewSheet

При добавлении нового листа в рабочую книгу

WorkbookOpen

При открытии рабочей книги

 

ОБЪЕКТ WORKBOOK И СЕМЕЙСТВО WORKBOOKS

 

В иерархии Excel объект workbook (рабочая книга) идет сразу после объекта Application и представляет файл рабочей книги. Рабочая книга хранится либо в файлах формата XLS (стандартная рабочая книга) или XLA (полностью откомпилированное приложение). Свойства и методы рабочей книги позволяют работать с файлами.

 

Свойства объекта Workbook и семейства Workbooks

 

Свойства

Выполняемые действия и допустимые значения

ActiveSheet

Возвращает активный лист книги. Например:

MsgBox "Имя активного листа " & ActiveSheet.Name — выводит в диалоговом окне имя активного рабочего листа

ActiveDialog

Возвращает активное диалоговое окно

ActiveChart

Возвращает активную диаграмму

Sheets

Возвращает семейство всех листов книги

Worksheets

Возвращает семейство всех рабочих листов книги

Charts

Возвращает семейство всех диаграмм книги (которые не внедрены в рабочие листы)

Count

Возвращает число объектов семейства workbooks

HasPassword

Допустимые значения: True (если у документа имеется пароль защиты), False (в противном случае)

Saved

Допустимые значения: True (если не производились изменения в документе со времени его последнего сохранения), False (в противном случае)

MailSystem

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

О xlNoMailSystem (не установлена система электронной почты) □ xlMAPI (установлена система Microsoft Mail)

□ xlPowerTalk (установлена система Apple PowerTalk Mail, на компьютерах Macintosh).

В следующем примере проверяется, инсталлирована ли электронная почта. Если электронная почта не установлена, то отображается соответствующее сообщение:

If Application.MailSystem <> xlMAPI Then MsgBox "Microsoft Mail неинсталлирован" End If

WriteReserved

Допустимые значения: True (если документ закрыт для записи), False (в противном случае)

 

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

 

Методы

Выполняемые действия

Activate

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

Например:

Workbook.Activate

Add

Создает новый объект для семейства Workbook!5. Синтаксис:

Add(Template)

- Template — задает шаблон, на основе которого создается новая рабочая книга. Допустимые значения:

xlWBATChart, xlWBATExcel4IntlMacroSheet, xlWBATExcel4MacroSheet или xlWBATWorksheet.

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

SheetsInNewWorkbook

Protect

Защищает рабочую книгу от внесения в нее изменений. Синтаксис:

Protect(Password, Structure, Windows)

- Password — строка, используемая в качестве пароля для защиты книги

- structure— допустимые значения True (защищена структура книги, т. е. взаимное расположение листов) и False (не защищена)

- windows — допустимые значения True (защищено окно книги) и False (не защищено)

В следующем примере устанавливается защита для активной рабочей книги:

ActiveWorkbook.Protect Password:= "ВинниПух"

Unprotect

Снятие защиты с рабочей книги.

Синтаксис:

Unprotect(Password)

- Password — строка, используемая в качестве пароля для защиты листа

В следующем примере снимается защита с активной рабочей книги:

ActiveWorkbook.Unprotect Password:= "ВинниПух "

Close

Закрытие рабочей книги

Open

Открытие существующей рабочей книги

OpenText

Открытие текстового файла, содержащего таблицу данных

Save

Сохранение рабочей книги

SaveAs

Сохранение рабочей книги в другом файле.

Синтаксис:

SaveAs(Filename) \

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

В следующем примере активная рабочая книга сохраняется в файле с именем НоваяВерсия:

ActiveBook.SaveAs Filename:= "НоваяВерсия"

SaveAsCopy

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

Синтаксис:

SaveAs(Filename, FileFormat)

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

В следующем примере активная рабочая книга сохраняется в файле с именем ЗапаснаяВерсия:

ActiveBook.SaveAsCopy Filename:= "ЗапаснаяВерсия"

PrintPrevie

Предварительный просмотр

Printout

Печать содержимого рабочей книги

SendMail

Отсылка почты используя встроенные средства Microsoft Mail (MAPI).

Синтаксис:

SendMail(Recipients, Subject, ReturnReceipt)

- Recipients — строка или массив строк, перечисляющих получателей

- Subject — строка, специфицирующая тему сообщения Optional Variant.

- ReturnReceipt — допустимые значения True (требуется уведомление о получении сообщения) и False (в противном случае)

В следующем примере рабочая книга отсылается по электронной почте получателю Порфирию Заковыркину:

ThisWorkbook.SendMail recipients:= " Порфирий Заковыркин"

 

События объекта Workbook и семейства Workbooks

 

Событие

Когда возникает событие

BeforeClose

При закрытии рабочей книги

BeforePrint

Перед печатью рабочей книги '

BeforeSave

Перед сохранением рабочей книги |

Deactivate

Когда рабочая книга теряет фокус

NewSheet

При добавлении нового листа

Open

При открытии рабочей книги

SheetActivate

При активизации любого рабочего листа

SheetDeactivate

Когда рабочий лист теряет фокус

 

ОБЪЕКТ WORKSHEET И СЕМЕЙСТВО WORKSHEETS

 

В иерархии Excel объект worksheet идет сразу после объекта workbook и представляет рабочий лист.

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

 

Свойства объекта Worksheet и семейства Worksheets

 

Свойства

Выполняемые действия

Name

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

Worksheets(1). Visible = "Итоги за декабрь"

Visible

Допустимые значения: True (рабочий лист выводится на экран), False (рабочий лист не видим, т. е. скрыт, но его можно отобразить на экране с помощью команды Формат, Лист, Отобразить (Format, Sheet, Show)) и xlveryHidden (рабочий лист скрыт, и его можно отобразить на экране только программно).

В следующем примере первый рабочий лист активной книги делается видимым:

Worksheets(1). Visible = False

UsedRange

Возвращает диапазон, т. е. объект Range, который содержит данные.

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

Worksheets(I). UsedRange. Clear

StandardHeigl" ActiveCell Intersect

it Возвращает стандартную высоту всех строк рабочего листа Возвращает активную ячейку активного рабочего листа

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

Синтаксис:

Intersect(rangel, range2,...)

В следующем примере выбирается пересечение диапазонов

Al: D3 и СЗ: D4, т. е. диапазон СЗ: D3:

Intersect(Range("Al:D3"), Range("C3:D4")).Select

Union

Возвращает диапазон, являющийся объединением нескольких диапазонов.

Синтаксис:

Union(rangel, range2,...)

В следующем примере выбирается объединение двух диапазонов А1:В2 и C3:D4:

Union(Range("A1:B2"), Range ("C3:D4")).Select

 

Методы объекта Worksheet и семейства Worksheets

 

Методы

Выполняемые действия

Activate

Активизирует указанный рабочий лист. Например:

Worksheets(I). Activate

Add

Создает новый рабочий лист.

Синтаксис:

Add(Before, After, Count, Type)

- Before — указывает лист, перед которым будет размещен новый рабочий лист

- After — указывает лист, после которого будет размещен новый рабочий. Если аргументы Before и After опущены, то новый лист размещается перед активным листом

- Count — число добавляемых листов, по умолчанию имеет значение 1

- Туре — указывает тип добавляемого листа. Допустимые значения: xiworksheet (по умолчанию), xlExcel4MacroSheet и xlExcel4IntlMacroSheet.

Например:

ActiveWorkbook.Worksheets.Add

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

Delete

Удаляет рабочий лист. Например:

Worksheets(I). Delete — удаляется первый рабочий лист из активной рабочей книги

Protect

Защищает рабочий лист от внесения в него изменений. Синтаксис:

Protect(Password, DrawingCbjects, Contents, Scenarios, UserlnterfaceQnly)

- Password — строка, используемая в качестве пароля для защиты листа

- DrawingObjects —допустимые значения: True (графические объекты защищены) и False (графические объекты не защищены). По умолчанию используется значение False

□ Contents — допустимые значения: True (ячейки защищены) и False (ячейки не защищены). По умолчанию используется значение True

- Scenarios—допустимые значения: True (сценарии защищены) и False (сценарии не защищены). По умолчанию используется значение True

- UserlnterfaceOnly — допустимые значения: True (лист защищен от изменений со стороны пользователя, но не подпрограммы VBA) и False (лист защищен от изменений со стороны как пользователя, так и подпрограммы VBA). По умолчанию используется значение False

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

ActiveSheet.Protect Password:="Секрет", DrawingObjects:=True, Contents:=True, Scenarios:=True

Unprotect

Снятие защиты с рабочего листа.

Синтаксис:

Unprotect(Password)

- Password — строка, используемая в качестве пароля для защиты листа

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

ActiveSheet.Protect Password:="Секрет"

Copy

Копирование рабочего листа в другое место рабочей книги. Синтаксис:

Copy(Before, After)

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

- After — рабочий лист, после которого вставляется данный

Одновременно допустимо использование только одного из аргументов.

В следующем примере Лист1 активной рабочей книги копируется после Лист3 той же рабочей книги:

Worksheets("Лист1").Сору

after:=Worksheets("Лист3")

Move

Перемещение рабочего листа в другое место рабочей книги.

Синтаксис:

Move(Before, After)

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

- After — лист, после которого вставляется данный

Одновременно допустимо использование только одного из аргументов.

В примере Лист1 активной рабочей книги перемещается перед Лист3 той же рабочей книги:

Worksheets("Лист1").Move Before:=Worksheets ("Лист3")

Evaluate

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

В следующем примере в поле ввода первого появившегося диалогового окна вводится ссылка на ячейку, например А1, процедура считывает значение из этой ячейки и отображает его в диалоговом окне. После этого в поле ввода следующего диалогового окна надо ввести какое-нибудь арифметическое выражение, например sin(1)^2. Процедура вычислит значение этого выражения и отобразит в диалоговом окне:

Sub ДваПримераДляEvaluate()

' Ввод адреса ячейки

Ячейка = InputBox("Введите имя ячейки")

' Считывание значения из ячейки с указанным адресом

Значение = Evaluate(Ячейка).Value

' Вывод считанного значения в диалоговое окно

MsgBox CStr(Значение)

' Ввод в диалоговое окно формулы, например, sin(1)^ 2

Функция = InputBox("Введите функцию")

' Вычисление значения по введенной формуле

Значение = Evaluate(Функция)

' Вывод найденного значения в диалоговом окне

MsgBox CStr(Значение)

End Sub

 

События объекта Worksheet

 

Событие

Когда возникает событие

BeforeClose

При закрытии рабочей книги

BeforePrint

Перед печатью рабочей книги

BeforeSave

Перед сохранением рабочей книги

Deactivate

Когда рабочая книга теряет фокус

NewSheet

При добавлении нового листа

Open

При открытии рабочей книги

SheetActivate

При активизации любого рабочего листа

SheetDeactivate

Когда рабочий лист теряет фокус

 

ОБЪЕКТЫ RANGE И SELECTION

 

В иерархии Excel объект Range (диапазон) идет сразу после объекта Worksheet. Объект Range является одним из ключевых объектов VBA. Объект selection (выбор) возникает в VBA двояко — либо как результат работы метода select, либо при вызове свойства selection. Тип получаемого объекта зависит от типа выделенного объекта. Чаще всего объект selection принадлежит классу Range и при работе с ним можно использовать свойства и методы объекта Range. Интересной особенностью объектов Range и selection является то, что они не являются элементами никакого семейства объектов.

 

Адресация ячеек

 

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

Относительная адресация:

Формат А1

Имя ячейки состоит из имени столбца (их 256 — А, В,..., Z, АВ,..., HZ, IA,..., IV) и номера (1,...., 16384). Например, А1, С2

Формат R1C1

Адресация задается индексом строки и индексом столбца. Например, R1C1, R2C3

 

Абсолютная адресация:

Формат А1

Признаком абсолютной адресации является знак "$", предшествующий имени строки (абсолютной адресации на строку) или столбца (абсолютной адресации на столбец). Например, $А10, А$10 и $А$10 задают абсолютную адресацию на столбец А, строку 10 и ячейку А10 соответственно

Формат R1C1

Указывается смещение по отношению к активной ячейке. Смещение приводится в квадратных скобках, причем знак указывает на направление смещения. Например, если активной ячейкой является R2C3, то R[1]C[-1] дает ссылку на ячейку R3C2

 

Адресация ячейки рабочего листа является лишь частью полного адреса ячейки, который в общем случае включает имя рабочего листа и адрес книги. При задании полного адреса за именем листа следует знак "!", а адрес книги заключается в скобки. Например,

А1

Лист2!А1

[МояКнига.xls]Лист2!А1

В первой строке данного примера дана относительная ссылка на ячейку ai активного рабочего листа, во второй — на ячейку A1 рабочего листа Лист2 активной книги, а в третьей на ячейку A1 рабочего листа лист2 книги МояКнига.xls текущего рабочего каталога.

 

Задание групп строк и столбцов с помощью объекта Range

 

Если в диапазоне указываются только имена столбцов или строк, то объект Range задает диапазон, состоящий из указанных столбцов или строк. Например, Range ("A:C") задает диапазон, состоящий из столбцов A, B и C, а Range ("2: 2") — из второй строки. Другим способом работы со строками и столбцами являются методы Rows (строки) и Columns (столбцы), возвращающие коллекции строк и столбцов. Например, столбцом A является Columns (1), а второй строкой — Rows (2).

 

Связь объекта Range и свойства Cells

 

Так как ячейка является частным случаем диапазона, состоящим только из единственной ячейки, объект Range также позволяет работать с ней. Объект Cells (ячейки) — это альтернативный способ работы с ячейкой. Например, ячейка А2 как объект описывается Range ("A2") или ceils (1,2). В свою очередь объект cells, вкладываясь в Range, также позволяет записывать диапазон в альтернативном виде, который иногда удобен для работы, а именно.

Range("А2:СЗ") И Range(Cells(I,2), Cells(3,3)) определяют один и тот же диапазон.

 

Свойства и методы объекта Range

 

Объект Range позволяет сочетать гибкость VBA и мощь рабочего листа Excel. Более 400 встроенных функций рабочего листа существенно упрощают и делают более наглядным программирование на VBA.

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

Перечислим основные свойства объекта Range.

 

Value

Возвращает значение из ячейки или в ячейки диапазона. В данном примере переменной х присваивается значение из ячейки С1:

х = Range("C1").Value

В следующем примере в диапазон А1: В2 введена 1;

Range("A1:B2").Value =1

Name

Возвращает имя диапазона. В данном примере диапазону А1:В2 Присваивается имя Итоги:

Range("А1:В2").Name = "Итоги"

Count

Возвращает число объектов в наборе. В данном примере переменной х присваивается значение, равное числу строк диапазона А1: В2:;

х = Range("A1:B2").Rows.Count

CurrentRegion

Возвращает число строк текущего диапазона. Текущим является диапазон, ограниченный пустыми строками и столбцами и содержащий данный элемент. В следующем примере переменной у присваивается значение, равное числу строк в текущем диапазоне, содержащем ячейку А1:

у = Range("A1").CurrentRegion.Rows.Count

WrapText

Позволяет переносить текст при вводе в диапазон. Допустимые значения True и False. В следующем примере

в ячейку В2 вводится текст «Длинный текст» и в этой ячейке устанавливается режим ввода текста с переносом:

With Range("B2")

.Value = "Длинный текст"

.WrapText = True

End With

SntireColumn, EntireRow

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

ActiveCell.EntireRow.Clear

ActiveCell.EntireColumn.Select

ColumnWidth, RowHeight

Возвращает ширину столбцов и высоту строк диапазона I соответственно

Comment

Возвращает объект comment (примечание), который связан с левым верхним углом диапазона при отображении на экране. Объект comment является элементом семейства Соmments. Метод Addcomment, примененный к диапазону, создает новое примечание.

Среди методов объекта Comment отметим только метод Text, который задает текст, выводимый в примечании.

Синтаксис:

Text(Text, Start, Overwrite)

- Text — строка, выводимая в качестве примечания

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

-Overwrite — допустимые значения: True (вводимый текст записывается поверх уже существующего) и False (вводимый текст вставляется в уже существующий)

Среди свойств объекта comment отметим только свойство visible, устанавливающее отображение примечания при активизации диапазона, имеющего определенное примечание. В качестве примера рассмотрим следующие инструкции, которые создают и отображают примечание ячейки В3, поясняющее запланированное событие (рис. 3.1):

With Range("B3").AddComment

.Text Text:= _

"Чрезвычайно важно!" & Chr(10) &_

"Про это никак нельзя забыть!"

.Visible = True

End With

Рис. 2.1. Пример отображения примечания на рабочем листе

 

Font

Возвращает объект Font (шрифт)

Объект Font имеет следующие свойства:

- Name — строка, указывающая имя шрифта, например "Arial Cyr"

- FontStyle — стиль, возможен Regular (обычный), Bold (полужирный), Italic (курсив), Bold italic (полужирный курсив)

- size — размер

- strikethrough — допустимы два значения: True (буквы имеют линию по центру, как будто они перечеркнуты) и False (не имеют линии по центру)

– Superscript — допустимы два значения: True (текст используется как верхний индекс) и False (не используется как верхний индекс)

- Subscript — допустимы два значения: True; (текст используется как нижний индекс) и False (не используется как нижний индекс)

- underline — устанавливает тип подчеркивания, допустимыми являются значения:

• xlNone (нет подчеркивания);

• xlSingle (одинарное, по значению)

• xlDouble (двойное, по значению)

• xlSingleAccounting (одинарное, по ячейке)

• Accounting (двойное, по ячейке)

Например, в следующем примере устанавливается для диапазона A1:В2 полужирный шрифт, красного цвета и с высотой символов 14:

With Range("Al:B2").Font

.Size = 14

.FontStyle = Bold

.Colorlndex = 3

End With

Formula

Возвращает формулу в формате Al. Например, следующая инструкция вводит в ячейку С2 формулу =$A$4+$A$10

Range("C2").Formula = "=$А$4+$А$10"

FormulaArray

Возвращает формулу диапазона в формате Al. В отличие от обыкновенной формулы рабочего листа, формула диапазона вводится на рабочем листе не посредством нажатия на клавишу <Enter>, а с помощью комбинации клавиш <Ctrl>+<Shift>+<Enter>. Следующая инструкция вводит в диапазон E1:E3 формулу {=Sum(Al:A3*Bl:B3)}:

Range("El:E3").FormulaArray = "=Sum(Al:A3*Bl:B3)"

FormulaHidden

Допустимые значения: True (формула спрятана, если рабочий лист или книга защищены) и False (в противном случае). Например, следующая инструкция скрывает формулы в столбце A:

Columns("A").FormulaHidden = True

FormulaLocal

Возвращает неанглоязычные (местные) формулы в формате А1. Например, следующая инструкция вводит в Ячейку В2 формулу =СУММ(С1:С4):

Range("B2"). FormulaLocal = "=СУММ(С1:С4)"

FormulaRlCl

Возвращает формулу в формате R1C1. Например,

Range("Bl").FormulaRlCl = "=SQRT(R3C2)"

FormulaRlClLocal

Возвращает неанглоязычные формулы в формате R1C1

Text

Возвращает содержание диапазона в текстовом формате

HorizontalAlignment

Горизонтальное выравнивание. Допустимые значения:

- xlGeneral (обычное выравнивание, зависящее от типа вводимых значений)

- xlCenter (выравнивание по центру)

- xlRight (выравнивание по правому краю)

- xlLeft (выравнивание по левому краю)

- xlJustify (выравнивание по ширине)

- xlCenterAcrossSelection (выравнивание по центру в выделенном диапазоне)

- xlFill (выравнивание по ширине)

VerticalAlignitient

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

- xlBottom (выравнивание по нижнему краю),

- xlCenter (выравнивание по центру),

- xlJustify (выравнивание по высоте),

- xlTop (выравнивание по верхнему краю)

Orientation

Ориентация. Допускается либо угол поворота текста в градусах от —90° до 90°, либо одно из допустимых значений:

- xlDownward (выравнивание по левому краю сверху вниз, соответствует углу —90°)

- xlHorizontal (выравнивание по горизонтали, соответствует нулевому углу)

- xlUpward (выравнивание по правому краю снизу вверх, соответствует углу 90°)

- xlVertical (выравнивание по вертикали, нет соответствия в градусах)

ShrinkToFit

Допустимые значения: True (автоматическое изменение шрифта так, чтобы текст помещался в ячейку) и False (в противном случае)

 


Дата добавления: 2015-11-04; просмотров: 16 | Нарушение авторских прав







mybiblioteka.su - 2015-2024 год. (0.088 сек.)







<== предыдущая лекция | следующая лекция ==>