Current PlotConfiguration

How can I get the name of the current PlotConfiguration (i.e., the current
Page Setup)?

Thank you.

John

 

I havn't found that vba exposes that info, its just the current layout's
settings. I use the attached lisp to return it to vba. You can then return
it to vba from lisp with the following code. Note that vlax refers to a
class file that should be available as a download if you search this forum.

Public Function GetCurrentPlotConfig(LayoutName As String)
'Returns the name of the current PlotConfig for the specified layout
'Must do this though lisp because vba does not expose this property.
'
Dim vl As VLAX
Dim strPC As String
Set vl = New VLAX
'make sure lisp function (CurrentPlotConfig) is loaded
vl.EvalLispExpression ("(if (null CurrentPlotConfig)(load
""CurrentPlotConfig.lsp""))")
strPC = "(CurrentPlotConfig """ & LayoutName & """)"
strPC = vl.EvalLispExpression(strPC)
Set vl = Nothing
GetCurrentPlotConfig = strPC
End Function

 

oops forgot to attach the lisp.

--
----
Ed
----

 

Thank you for your reply.

One thing I have tried, unsuccessfully, is to set the USERS1 system variable
from within AutoLISP to the name of the current configuration, then extract
it in VBA with AcadDocument.GetVariable("USERS1"). I can't seem to get it to
work. It always returns an empty string.

Thank you.

John

 

I don't know what I was doing wrong, but it is working now. I use the
SendCommand method to run an AutoLISP function that sets the USERS1 system
variable to the current plot configuration name, then I use the GetVariable
method to retrieve its value.

Thank you.

John