Код VBA для выполнения запроса Access

Код VBA для выполнения запроса Access
Оглавление

Код VBA для выполнения запроса Access (с изображением)

Что это такое?

Этот код VBA поможет вам запустить Доступ запрос из любого инструмента, поддерживающего VBA, например MS Excel, Word и т.д.

Почему?

You can avoid the process of opening the DB and executing the query manually; this code will execute even from an Excel sheet without opening the Access DB manually.

Если вы используете функцию Импорт Результаты запросов доступа Код, рассмотренный в предыдущем посте, позволяет даже получить результаты запроса в Excel - все одним щелчком мыши.

Код VBA для импорта данных таблицы/запроса Access в Excel

Как использовать код VBA для выполнения запроса Access




(adsbygoogle = window.adsbygoogle || []).push({});

Шаг 1: Скопируйте и вставьте приведенный ниже код в свой модуль.
Dim myDB As Database
Set myDB = OpenDatabase("C:\MYDATABASE.mdb") 'Укажите путь к БД и замените 'MYDATABASE' на имя вашей БД Access.
myDB.Execute "myQuery"  'Замените 'myQuery на имя вашего запроса Access
myDB.close 'Используйте это, только если хотите закрыть DB
Шаг 2: Нажмите кнопку Выполнить или F5, чтобы выполнить запрос Access.

Код Vba для выполнения запроса Access

Энсон Энтони
Энсон Энтони
Энсон — соавтор и основатель компании www.askeygeek.com. Изучение чего-то нового всегда было его страстью, а ASKEYGEEK.com — результат его страсти к технологиям и бизнесу. Он имеет десятилетний разносторонний опыт в области аутсорсинга бизнес-процессов, финансов и бухгалтерского учета, информационных технологий, операционного совершенствования и бизнес-аналитики. За время своего пребывания в должности он работал в таких организациях, как Genpact, Hewlett Packard, M*Modal и Capgemini, занимая различные должности и обязанности. Помимо бизнеса и технологий, он любитель кино, который часами вместе смотрит и изучает кино, а также кинорежиссер!

Добавить комментарий

Ваш адрес email не будет опубликован. Обязательные поля помечены *

Поздравляем!
Ты сделал это,
Не закрывайтесь!

Вставай 60 000 Кредиты на персонажей UberTTS бесплатно!!!

Это всплывающее окно не покажет вам решать снова!!!

УберТТС
Share to...