Диалог выбора файла access

Обновлено: 03.07.2024


Во время работы могут быть некоторые сценарии, когда нам нужно открывать некоторые другие рабочие книги или любые другие файлы либо для импорта данных, либо для получения ссылки. Есть один способ указать путь к файлу в нашем коде в VBA, который откроет нам файл или папку. Но что, если мы не помним путь, как мы можем открыть файл. Возможно, нам придется сначала найти путь, а затем снова указать путь. VBA поставляется с решением, которое называется FileDialog.

FileDialog - это свойство в VBA, которое позволяет нам открывать файл или папку по пути. Используя это свойство, пользователю не нужно указывать путь к папке, вместо этого пользователь может выбрать путь. Кроме того, FileDialog имеет четыре свойства. Они также известны как константы для этого свойства. Они заключаются в следующем:

  1. msoFileDialogFilePicker : это позволяет пользователю выбрать файл.
  2. msoFileDialogFolderPicker : это позволяет пользователю выбрать папку.
  3. msoFileDialogOpen : это позволяет пользователю открыть файл.
  4. msoFileDialogSaveAs: позволяет пользователю сохранить файл.

Способ использования этого объекта в VBA заключается в следующем.

Application.FIledialog (тип Filedialog)

Тип FileDialog может быть любым из четырех указанных выше типов. Теперь давайте использовать этот объект в примерах, чтобы более подробно узнать об этом свойстве объекта.

Как использовать Excel VBA FileDialog?

Ниже приведены различные примеры использования FileDialog в Excel с использованием кода VBA.

Вы можете скачать этот шаблон VBA FileDialog Excel здесь - Шаблон VBA FileDialog Excel

Excel VBA FileDialog - Пример № 1

Во-первых, давайте поможем пользователю выбрать файл из пункта назначения. В этом примере пользователь выберет файл из папки, и мы отобразим путь для выбранного файла.

Для использования Excel VBA FileDialog выполните следующие действия:

Шаг 1. Перейдите на вкладку « Разработчики » и нажмите на Visual Basic.


Шаг 2: Откройте модуль из меню «Вставка», как показано ниже.


Шаг 3: Запустите подпроцедуру, чтобы начать работать над примером.

Код:


Шаг 4: Объявите переменную как Filedialog, как показано ниже.

Код:


Шаг 5: Теперь давайте используем этот объект из метода Application.Filedialog следующим образом.


Шаг 6: Как только мы откроем скобки, мы увидим опцию для четырех типов FileDialog, как показано на рисунке ниже.


Шаг 7: выберите опцию типа Filedialog как msoFileDialogFilePicker

Код:


Шаг 8: Теперь нам нужно сделать диалоговое окно для этого примера, давайте использовать With Statement следующим образом.

Код:


Шаг 9: Если есть какие-либо фильтры, нам нужно очистить фильтры, поставить оператор точки и написать оператор, как показано ниже.

Код:


Шаг 10: Теперь мы хотим, чтобы пользователь выбрал несколько файлов одновременно или один файл? Для этого примера давайте придерживаться одного файла за раз, поэтому используйте .Allowmultiselect как false.

Код:


Шаг 11: Теперь, чтобы показать диалоговое окно, мы можем написать .show, чтобы показать диалоговое окно следующим образом.

Код:


Шаг 12: Как только мы выполним приведенный выше код, мы увидим диалоговое окно следующим образом.


Шаг 13: Поскольку нам нужно отобразить выбранный путь пользователя, объявите другую переменную в виде строки в коде.

Код:


Шаг 14: Мы будем использовать оператор selecteditems, чтобы найти путь к файлу выбранного пользователя и сохранить его в нашей переменной следующим образом.

Код:


Шаг 15: После оператора With используйте функцию msgbox, чтобы отобразить адрес выбранного файла.

Код:


Шаг 16. Запустите приведенный выше код, выберите файл и нажмите ОК, чтобы увидеть путь следующим образом.


Excel VBA FileDialog - Пример № 2

Теперь давайте посмотрим на другую опцию объекта VBA FileDialog, которая называется msoFileDialogSaveAs. Это свойство используется для сохранения файла по любому пути. Выполните следующие шаги, чтобы использовать Excel VBA FileDialog.

Шаг 1: В том же модуле напишем еще одну подпроцедуру для сохранения файла следующим образом.

Код:


Шаг 2: Теперь объявите две переменные, одну как строку, а другую как целое число.

Код:


Шаг 3: Теперь давайте сделаем диалоговое окно видимым для пользователя, используя свойство show следующим образом.

Код:


Шаг 4: Теперь используйте оператор IF, чтобы определить выбор пользователя следующим образом.

Код:


Шаг 5: Теперь давайте получим путь, выбранный пользователем в нашей переменной пути, следующим образом.

Код:


Шаг 6: Теперь давайте отобразим результат с помощью функции msgbox и завершим цикл IF.

Код:


Шаг 7: Теперь выполните приведенный выше код и увидите результат, откроется диалоговое окно для сохранения файла.


Шаг 8: дайте имя файла и нажмите «Сохранить», чтобы получить путь к файлу следующим образом.


То, что нужно запомнить

  • FileDialog является свойством объекта VBA.
  • Нам не нужно указывать путь к коду, используя этот объект.
  • Используя оператор точки, мы можем видеть и использовать свойства объекта IntelliSense.

Рекомендуемые статьи

Это руководство по VBA FileDialog. Здесь мы обсудим, как использовать объект FileDialog в Excel, используя код VBA, а также некоторые практические примеры и загружаемый шаблон Excel. Вы также можете просмотреть наши другие предлагаемые статьи -

Читайте также: