Высокоуровневые методы информатики и программирования. Степанов А.Г. - 28 стр.

UptoLike

Составители: 

28
К_выдаче_Ведомость As Currency
End Type
Объявление переменной:
Dim Запись1 As Запись_Ведомости
Запись значений в элементы структуры с использованием оператора при-
сваивания:
Запись1.Фамилия_И_О = "Иванов В.Н."
Запись1.Начислено_Ведомость = 1234
Запись1.Налог_Ведомость = Запись1.Начислено_Ведомость * 0.12
Запись1.К_выдаче_Ведомость=Запись1.Начислено_Ведомость-Запись1.Налог_Ведомость
Здесь символом * обозначена операция умножения.
Объявление массива структур:
Dim Ведомость(1 To 4) As Запись_Ведомости
Соответствующие обращения к элементам массива и членам структуры бу-
дут иметь вид:
Ведомость(1).Фамилия_И_О = "Иванов В.Н."
Ведомость(1).Начислено_Ведомость = 1234
Ведомость(2).Фамилия_И_О = "Трофимова Л.А.
Ведомость(2).Начислено_Ведомость = 1234
Примечание. Интегрированная среда разработки VBA в окне редактора кодов пред-
лагает в качестве сервиса возможность конкретного выбора типа данных, определенных
пользователем, из автоматически раскрывающегося списка. Если структура данных ранее
была объявлена и выполнена компиляция проекта, после набора символа точки автомати-
чески открывается список возможных имен полей структуры. Этой возможностью удобно
пользоваться для избежания синтаксических ошибок при наборе текста программы.
Отдельную проблему представляет прямая и обратная передача данных из
таблицы Excel в ячейки памяти, объявленные в программе, написанной на VBA. Ав-
томатически созданный макрос непосредственно манипулирует с ячейками таблицы,
используя стили ссылки на ячейки в Excel: A1 и R1C1. Конечно, такой прием может
быть использован и в рабочей программе, однако в этом случае ее модификация и
использование существенно затруднены. Гораздо предпочтительнее использовать
свойство Cells() стандартного объекта Excel Range. Сам объект представляет собой
ячейку, столбец, строку или выделенный диапазон листа Excel. Свойство Cells() по-
зволяет непосредственно обратиться к объекту Excel по номеру строки и колонки.
Поскольку это свойство установлено по умолчанию для рабочего листа Excel, то его
можно использовать без дополнительных указаний.
Свойство Cells() позволяет обратиться к ячейке рабочего листа задав номер
строки и колонки. Если запись свойства стоит слева от символа равенства (оператор
присваивания), то производится запись данных в ячейку таблицы, если справа, то
считывание значения из ячейки таблицы. Кроме собственно записи данных свойство
Cells() в сочетании со свойствами других объектов (Font, Color и т.п.) позволяет зада-
вать параметры шрифта, его цвет, фон и так далее. Для изучения этих возможно-