Появление окна выбора файла

[Экзегет]

Здравствуйте уважаемое сообщество.
Прошу Вас подсказать как правильно написать процедуру появления окна выбора файла и
 записать имя выбранного файла в переменную. Делаю так как делал в SolidWorks:

Код - Visual Basic [Выбрать]

1. Public Sub PVF()
2.         Set AC = Application.ActiveDocument
3.         Filter = "DAT файлы (*.dat)|*.dat"
4.         fileName = AC.GetOpenFileName("Файл открытия", "", Filter, fileOptions, fileConfig, fileDispName)
5.        
6.         Debug.Print fileName
7.         Debug.Print Filter
8.     End Sub

Но Автокад не понимает GetOpenFileName.
СпасиБО.

[Александр Ривилис]

https://adn-cis.org/forum/index.php?topic=10014.0

[Экзегет]

Александр спасиБО но ничего не понял. Прошу Вас ответить мне более лаконично. С Уважением.

[Александр Ривилис]

Экзегет,
В AutoCAD VBA нет такого встроенного метода. По ссылке, которую я давал выше, как можно этот метод сделать самому, используя Windows API.

[Экзегет]

Хорошо спасиБО Александр. С Уважением.