Самоучитель Microsoft Access 2013



Download 16,15 Mb.
Pdf ko'rish
bet122/146
Sana15.11.2022
Hajmi16,15 Mb.
#866071
1   ...   118   119   120   121   122   123   124   125   ...   146
Bog'liq
Юрий Бекаревич, Нина Пушкина - Самоучитель Microsoft Access 2013 (2014)


Глава 9 
Переименовать или удалить макрос 
(Rename/Delete Macro), т. е.
просмотреть все 
таблицы и содержащиеся в них макросы и переименовать или удалить их. 
Первый именованный макрос по умолчанию имеет имя 
МакросДанных1
. При об-
ращении к нему оно дополняется именем таблицы, в которой он был создан, и за-
писывается, например, так: 
ТОВАР.МакросДанных1

Запуск именованного макроса выполняется макрокомандой 
ЗапускМакросаДан-
ных 
(RunDataMacro), доступной как из макроса данных, так и из любых других 
макросов приложения. Например, работая в форме, можно не выполнять вычисле-
ния через обращения к полям формы, а вызвать именованный макрос данных, ко-
торый выполнит вычисления непосредственно в таблицах. Изменения в таблицах 
тут же отобразятся форме. 
Командой 
Переименовать или удалить макрос
(Rename/Delete Macro) открывает-
ся окно диспетчера макросов данных, представленное на рис. 9.25. В нем перечис-
лены все таблицы базы, содержащие макросы данных. Именованные макросы так-
же отображаются в окне диспетчера макросов данных. 
Рис. 9.25. 
Список таблиц открытой базы, содержащих макросы данных 
Использование макросов для решения задач 
При разработке практических приложений часто необходимо при изменениях в од-
них документах решать задачи, позволяющие актуализировать текущие данные 
в других. Рассмотрим примеры таких задач. 
Задача 1 
Рассмотрим создание макроса данных для таблицы ТОВАР, в котором после об-
новления записи проверяется изменение цены товара и выполняется перерасчет 
стоимости отгруженного товара в таблице ОТГРУЗКА.
1.
Откройте таблицу ТОВАР и на вкладке ленты 
Работа с таблицами | Таблица
(Table Tools | Table) щелкните на кнопке 
После обновления
(AfterUpdate). В от-


Разработка приложений с использованием макросов 
393 
крывшееся окно макроса данных введите макрокоманды, выбирая их в каталоге 
и заполняя аргументы, как показано на рис. 9.26. 
2.
В блоке 
Если
в логическом выражении условия с помощью функции 
Updated 
("имя поля") 
проверяется, изменялось ли значение в поле 
ЦЕНА
. При истинном 
значении выражения макрокомандой 
Для каждой записи в
(ForEachRecord) ор-
ганизуется цикл, в котором для каждой записи таблицы ОТГРУЗКА, содержащей 
значение кода товара, равное значению из обновленной записи таблицы ТОВАР, 
макрокомандой 
ИзменитьЗапись
(EditRecord) рассчитывается новое значение
в поле 
СУММА_ОТГР
. Обратите внимание 
— макрокоманда 
ИзменитьЗапись
должна быть вложена в макрокоманду 
Для каждой записи в
, иначе не будет 
найден псевдоним текущей записи цикла. Макрокоманда 
ЗадатьПоле
(SetField), 
в свою очередь, должна быть вложена в макрокоманду
ИзменитьЗапись

Рис. 9.26. 
Макрос данных для обновления поля в записях таблицы ОТГРУЗКА 
3.
Далее создайте именованный макрос, в котором сведения об обновлениях цены 
в таблице ТОВАР будут сохраняться в некоторой таблице, например, 
Изменен-
ныеЗаписи

4.
Создайте таблицу 
ИзмененныеЗаписи
, содержащую поля Код товара, Старая 
цена, Новая цена и ключ с типом данных 
Счетчик
(AutoNumber). Использова-
ние такого ключа позволит включать в таблицу неоднократные изменения запи-
си с одним и тем же кодом товара. 
5.
При открытой таблице ТОВАР создайте именованный макрос, выбрав соответ-
ствующую команду на вкладке 
Работа с таблицами | Таблица 
(Table Tools | 
Table). В макросе для получения из вызывающего макроса значений кода товара 
и его старой и новой цены создайте соответствующие параметры (рис. 9.27). Да-


394 
Download 16,15 Mb.

Do'stlaringiz bilan baham:
1   ...   118   119   120   121   122   123   124   125   ...   146




Ma'lumotlar bazasi mualliflik huquqi bilan himoyalangan ©hozir.org 2024
ma'muriyatiga murojaat qiling

kiriting | ro'yxatdan o'tish
    Bosh sahifa
юртда тантана
Боғда битган
Бугун юртда
Эшитганлар жилманглар
Эшитмадим деманглар
битган бодомлар
Yangiariq tumani
qitish marakazi
Raqamli texnologiyalar
ilishida muhokamadan
tasdiqqa tavsiya
tavsiya etilgan
iqtisodiyot kafedrasi
steiermarkischen landesregierung
asarlaringizni yuboring
o'zingizning asarlaringizni
Iltimos faqat
faqat o'zingizning
steierm rkischen
landesregierung fachabteilung
rkischen landesregierung
hamshira loyihasi
loyihasi mavsum
faolyatining oqibatlari
asosiy adabiyotlar
fakulteti ahborot
ahborot havfsizligi
havfsizligi kafedrasi
fanidan bo’yicha
fakulteti iqtisodiyot
boshqaruv fakulteti
chiqarishda boshqaruv
ishlab chiqarishda
iqtisodiyot fakultet
multiservis tarmoqlari
fanidan asosiy
Uzbek fanidan
mavzulari potok
asosidagi multiservis
'aliyyil a'ziym
billahil 'aliyyil
illaa billahil
quvvata illaa
falah' deganida
Kompyuter savodxonligi
bo’yicha mustaqil
'alal falah'
Hayya 'alal
'alas soloh
Hayya 'alas
mavsum boyicha


yuklab olish