Как я могу импортировать файл в MDB, выбрав файл в диалоговом окне «Файл»?

Question

Я новичок в vb / vba ..... не совсем знаю о них .....
Мой начальник попросил меня разработать MDB-доступ с некоторыми функциями, но сначала мне нужносоздайте некоторый интерфейс для пользователя, чтобы импортировать исходный файл для таблицы в MDB.

Я хотел бы, чтобы кнопка «Обзор», когда пользователь нажимает ее, появляется диалоговое окно файла и пользователь выбирает входной файл, затем программа использует этот входной файл и импортирует его данные в мойтаблица, Есть идеи?

Я использую MS Access 2000 и предполагаю, что пользователь использует MS Access 2000 тоже.

Спасибо.

Answer 1

См. эту ссылку для получения информации о том, как это сделать в Access 2003/2007 - в 2000 году она должна быть аналогичной, поскольку фактическая функциональность - это просто код VBA / API.

Answer 2

Посмотрите на объект FileDialog. Вам нужно будет добавить библиотеку объектов Microsoft Office к вашим ссылкам.

Dim Filename As String Dim df As FileDialog

Установить df = Application.FileDialog (msoFileDialogOpen)

С ДФ

.AllowMultiSelect = False .Filters.Clear .Filters.Add "Доступ к файлам", "* .mdb" .InitialFileName = "C: \" .Title = "Открыть файл"

Если .Show = True, то Имя файла = .SelectedItems (0)
Конец, если

Заканчивается на