Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Access
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 25.10.2012, 10:49   #1
Roberto182
Пользователь
 
Регистрация: 17.09.2012
Сообщений: 10
Радость Макрос не работает в форме навигации

Всем доброго дня, уважаемые форумчане!
Столкнулся с такой проблемой.
Существует две таблицы, в одной отображены данные о продукте - его название и цена, во второй ведется учет по произведенному продукту.
Смысл был такой, что когда вы заполняете форму по учету производства при выборе продукта цена берется так же из таблицы с продуктами и подставляется в таблицу по учету. Поле цена продукта фактически дублируется в двух таблицах, но это вызвано тем, что цены часто меняются, а для анализа производства нужно иметь именно ту цену, которая была.
Мне подсказали достаточно простой выход из этой ситуации в виде макроса такого вида:
Элемент = [Формы]![База]![Цена_1кг]
Выражение = DLookUp("Цена_1кг";"Продукты";"Код= " & [Формы]![База]![НазваниеПродукта])
НО в 2010 офисе существует такая удобная форма как форма навигации, в которой этот макрос почему-то перестает функционировать и выдается ошибка, что Access не удаетcя найти указанную форму.
Можно ли ее решить как-то посредством того же макроса или надо уже погружаться в VBA? Если нужно использовать VBA подскажите с чего начать не большой знаток.
Макет базы прикрепил - офис 2010
Заранее всех благодарю за помощь и потраченное время!
Вложения
Тип файла: zip test11.zip (37.8 Кб, 11 просмотров)
Roberto182 вне форума Ответить с цитированием
Старый 25.10.2012, 13:01   #2
Roberto182
Пользователь
 
Регистрация: 17.09.2012
Сообщений: 10
По умолчанию

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

В свойствах поля НазванияПродукта в разделе после обновления надо было открыть редактор VBA и написать одну строчку

Me.Цена_1кг = DLookUp("Цена_1кг","Продукты","Код= " & Me.НазваниеПродукта)

И все начинает работать.)))) Ура!
Roberto182 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Периодически неправильно работает TAB на форме koljan_ded Microsoft Office Excel 8 19.03.2014 18:41
Не работает удаление нескольких записей в форме Swatch Microsoft Office Access 3 09.07.2012 10:20
Не работает padding-right ни в какой форме alxcube HTML и CSS 4 05.04.2012 08:50
Как привязать событие или макрос к динамическому объекту (commandbutton) в форме? ekesar Microsoft Office Excel 7 09.12.2008 09:13
Фильтр в форме не работает. Access'07 Talia Microsoft Office Access 7 15.01.2008 13:54