Can someone that is running 2004 tell me if this works:
(setq ActiveDoc (vla-get-activedocument (vlax-get-acad-object)))
(setq ActiveLayout (vla-get-ActiveLayout ActiveDoc))
(setq PlotStyleTables
(vlax-safearray->list
(vlax-variant-value
(vla-getplotstyletablenames
ActiveLayout
)
)
)
)
Any help would be appreciated.