Сообщество программистов Autodesk в СНГ

ADN Club => VBA => Тема начата: Экзегет от 01-03-2023, 13:23:46

Название: Появление окна выбора файла
Отправлено: Экзегет от 01-03-2023, 13:23:46

Здравствуйте уважаемое сообщество.
Прошу Вас подсказать как правильно написать процедуру появления окна выбора файла и
 записать имя выбранного файла в переменную. Делаю так как делал в 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.
СпасиБО.

Название: Re: Появление окна выбора файла
Отправлено: Александр Ривилис от 01-03-2023, 16:47:11

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

Название: Re: Появление окна выбора файла
Отправлено: Экзегет от 02-03-2023, 08:26:08

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

Название: Re: Появление окна выбора файла
Отправлено: Александр Ривилис от 02-03-2023, 13:03:51

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

Название: Re: Появление окна выбора файла
Отправлено: Экзегет от 02-03-2023, 15:32:36

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