[Insect]

В VBA я хочу получить глобальную переменную Autocad.
Если написать просто

Код:

[Выделить все]

Sub Test()
Dim ACPath As String

ACPath = ThisDrawing.GetVariable("GBL_WD_BASEINSTALL")

MsgBox (ACPath)
End Sub

VBA ругается "Ошибка при получении системной переменной" (как я понял по переполнению)



Если сделать в Autocad через переменную USERS1

Код:

[Выделить все]

 (setq USERS1 GBL_WD_BASEINSTALL)

Судя по ответу Autocad то что мне нужно он в переменную записал



Но при выполнении кода

Код:

[Выделить все]

Sub Test()
Dim ACPath As String

ACPath = ThisDrawing.GetVariable("USERS1")

MsgBox (ACPath)
End Sub

В ответ мне шиш



Вроде простые функции, а что не так не понимаю. Помогите пожалуйста.

[Сергей812]

Попробуйте набрать в электрикал (надо уточнять - в чистом автокаде или вертикалке все таки работаете) "GBL_WD_BASEINSTALL"

[Insect]

Упс, да, работа в электрикале.
В командной строке Вы имеете ввиду набрать?
Неизвестная команда "GBL_WD_BASEINSTALL".

[Сергей812]

Сообщение от Insect Неизвестная команда "GBL_WD_BASEINSTALL".

И по быстрому нагуглил, что данная переменная фигурирует в текстовом конфигурационном файле e-acad. Вы уверены, что GBL_WD_BASEINSTALL является глобальной переменной (точнее, системной), и что к ней можно применить GetVariable ?

[Insect]

Вполне возможно что нельзя, поэтому я еще попробовал через USERS1.