powered by simpleCommunicator - 2.0.55     © 2025 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Запрос из VBA
10 сообщений из 10, страница 1 из 1
Запрос из VBA
    #39171713
dormio
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Уважаемые форумчане!
Прошу вашей помощи! Недолго работаю в Access, умею создавать запросы, отчеты, формы. Недавно попробовала использовать VBA (ранее на VBA писала в Excel и Word).
Для меня оказалось проблемой в VBA вызвать запрос на выборку. Есть запрос в Access, созданный мастером запросов, в программном модуле нужно его запустить. Не могу найти материала для начинающего. Пошлите меня по нужному адресу))))
...
Рейтинг: 0 / 0
Запрос из VBA
    #39171747
Фотография ПЕНСИОНЕРКА
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
dormio,

лучше выложите базу --что бы показать на примере
...
Рейтинг: 0 / 0
Запрос из VBA
    #39171751
guest_rusimport
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
dormioУважаемые форумчане!
... Пошлите меня по нужному адресу))))
http://www.sql.ru/faq/faq_topic.aspx?fid=410
...
Рейтинг: 0 / 0
Запрос из VBA
    #39171759
guest_rusimport
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
dormio,
если это просто запрос на выборку и нужно посмотреть результат его выполнения , то DoCmd.OpenQuery вам в помощь
...
Рейтинг: 0 / 0
Запрос из VBA
    #39172281
dormio
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ПЕНСИОНЕРКАdormio,

лучше выложите базу --что бы показать на примере

Есть таблица - ТаблицаУчетРабот, в которой есть среди других поля НомерАкт и НеобхДоработки1(это поле логическое), при изменении значения в поле НеобхДоработки1 необходимо либо показать (когда true), либо скрыть (когда false) следующие за ним два столбца.
Для этого мне надо проанализировать все значения НеобхДоработки1 для для заданного НомерАкт(берется из формы).
Вот здесь мне и нужен запрос. Я попыталась создать его мастером запросов ЗапросПроба, но как запустить его и посмотреть значение из VBA - не знаю.
Может быть, лучше написать запрос прямо в VBA? Тоже не знаю, как это делать.
Базу прикладываю.
...
Рейтинг: 0 / 0
Запрос из VBA
    #39172298
Фотография ПЕНСИОНЕРКА
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
dormio,
я посмотрела базу --не ахти

когда я вижу имена полей дата1-дата2-дат3.... я сразу сомневаюсь в правильности схемы базы
проверок у вас может быть любое количество, а значит должна быть не одна таблица на учет работ, а две

1-я таб:наименование работы, дата начала, дата плановой сдачи
2-я таб: переписка по работе, любое количество этапом

может я что и не понимаю в вашей теме, но одно знаю точно -большинство задач основано на подобной парочке таблиц+справочники
...
Рейтинг: 0 / 0
Запрос из VBA
    #39172325
Фотография __Michelle
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
dormioПЕНСИОНЕРКАdormio,

лучше выложите базу --что бы показать на примере

Есть таблица - ТаблицаУчетРабот, в которой есть среди других поля НомерАкт и НеобхДоработки1(это поле логическое), при изменении значения в поле НеобхДоработки1 необходимо либо показать (когда true), либо скрыть (когда false) следующие за ним два столбца.
Для этого мне надо проанализировать все значения НеобхДоработки1 для для заданного НомерАкт(берется из формы).
Вот здесь мне и нужен запрос.
Я попыталась создать его мастером запросов ЗапросПроба, но как запустить его и посмотреть значение из VBA - не знаю.
Может быть, лучше написать запрос прямо в VBA? Тоже не знаю, как это делать.
Базу прикладываю.Не нужен Вам там запрос.
Проверяйте так
Код: vbnet
1.
2.
3.
4.
5.
If DCount("НеобхДоработки1", "ТаблицаУчетРабот", "НеобхДоработки1=True AND НомерАкт=" & НомерАкт_из формы) <> 0 THEN
....скрыть столбцы....
Else
...........................
End If

А еще короче так
Код: vbnet
1.
2.
Столбец1.Visible = DCount("НеобхДоработки1", "ТаблицаУчетРабот", "НеобхДоработки1=True AND НомерАкт=" & НомерАкт_из формы) = 0
Столбец2.Visible = Столбец1.Visible
...
Рейтинг: 0 / 0
Запрос из VBA
    #39172332
Фотография __Michelle
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
dormio,

Базу Вашу, кстати, не смотрела.
И особого смысла (для ответа на Ваш вопрос) смотреть ее не вижу (каламбур вышел...).
Все и так очевидно.
...
Рейтинг: 0 / 0
Запрос из VBA
    #39172405
dormio
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ПЕНСИОНЕРКАdormio,
я посмотрела базу --не ахти

когда я вижу имена полей дата1-дата2-дат3.... я сразу сомневаюсь в правильности схемы базы
проверок у вас может быть любое количество, а значит должна быть не одна таблица на учет работ, а две

1-я таб:наименование работы, дата начала, дата плановой сдачи
2-я таб: переписка по работе, любое количество этапом

может я что и не понимаю в вашей теме, но одно знаю точно -большинство задач основано на подобной парочке таблиц+справочники

Нет, количество проверок фиксировано - именно столько, сколько сейчас в таблице.
...
Рейтинг: 0 / 0
Запрос из VBA
    #39172412
dormio
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
__Michelledormioпропущено...


Есть таблица - ТаблицаУчетРабот, в которой есть среди других поля НомерАкт и НеобхДоработки1(это поле логическое), при изменении значения в поле НеобхДоработки1 необходимо либо показать (когда true), либо скрыть (когда false) следующие за ним два столбца.
Для этого мне надо проанализировать все значения НеобхДоработки1 для для заданного НомерАкт(берется из формы).
Вот здесь мне и нужен запрос.
Я попыталась создать его мастером запросов ЗапросПроба, но как запустить его и посмотреть значение из VBA - не знаю.
Может быть, лучше написать запрос прямо в VBA? Тоже не знаю, как это делать.
Базу прикладываю.Не нужен Вам там запрос.
Проверяйте так
Код: vbnet
1.
2.
3.
4.
5.
If DCount("НеобхДоработки1", "ТаблицаУчетРабот", "НеобхДоработки1=True AND НомерАкт=" & НомерАкт_из формы) <> 0 THEN
....скрыть столбцы....
Else
...........................
End If

А еще короче так
Код: vbnet
1.
2.
Столбец1.Visible = DCount("НеобхДоработки1", "ТаблицаУчетРабот", "НеобхДоработки1=True AND НомерАкт=" & НомерАкт_из формы) = 0
Столбец2.Visible = Столбец1.Visible



Спасибо большое! Сейчас буду пробовать.
Но думаю, что все равно придется столкнуться с запросом в VBA в дальнейшей работе.
А базу выложила, потому что просили.
...
Рейтинг: 0 / 0
10 сообщений из 10, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Запрос из VBA
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]