Реферат: Access і Visual basic for Application. Excel VBA: прийоми програмування

Loop

Різновидом циклу Do є Until-цикл, який виконується, поки умовний вираз помилковий:

Do Until Счетчик=10

Print

Счетчик=Счетчик+1

Loop

6. Excel VBA: Прийоми програмування

Як визначити останній запис в таблиці Excel?

Необхідно знайти останній запис в електронній таблиці. Це можна було б організувати функцією Application. SpecialCells (xlLastCell)

Як відмінити виділення діапазону осередків?

ActiveSheet. Cells. Select

Після припинення роботи макросу діапазон залишається виділеним. Як це виділення прибрати?

Selection. Cells (1). Select Фокус введення потрапить після цього на перший осередок раніше виділеного діапазону.

Як з макросу Excel програмно створити таблицю Access?

Ось фрагмент коду, який створює таблицю "BalanceShifr" базі даних MS Access:

Не забудьте виставити в Excel посилання на об'єкти DAO!

[VBA] Tools/References/Available References/ [x] MicroSoft DAO?.? Library ' Function CreateTable ' Create temporary table "BalanceShifr" into temporary database

Public Function CreateTable (ByVal dbTemp As Database) As Boolean

Dim tdfTemр As TableDef

Dim idx As Index

Dim fld As Field

On Error GoTo errhandle

CreateTable = True

' CREATE TABLE "BalanceShifr"

Set tdfTemp = dbTemp. CreateTableDef ("BalanceShifr")

Set fld = tdfTemp. CreateField ("ConditionId", dbLong)

fld. Required = True

tdfTemp. Fields. Append fld

Set fld = tdfTemp. CreateField ("Account", dbText,

4)

К-во Просмотров: 401
Бесплатно скачать Реферат: Access і Visual basic for Application. Excel VBA: прийоми програмування