;;; Set a named page setup as current on current layout by avoiding command usage http://jtbworld.com/autocad-pagesetup-lsp
;;; (SetCurrentPageSetup <AcadDocument> <PageSetupName>)
;;; (SetCurrentPageSetup (vla-get-activedocument (vlax-get-acad-object)) "Setup2")
(defun SetCurrentPageSetup
(doc pcname
/ layout PlotConfig
) doc
)
pcname
)
)
)
)
)