Importing Page Setups

[BrenBren]

This used to work. I added an additional pagesetup to my file "plottest.dwg", and now this doesn't work. I can't figure out why.

(defun C:PSU (/ O_cmdecho)

  (setq O_cmdecho (getvar "cmdecho"))
  (setvar "cmdecho" 0)
  (setq expert (getvar "EXPERT")) (setvar "EXPERT" 2) 


  ; delete all existing page setups
  
  (vl-load-com)
  (vlax-for ps
        (vla-get-plotconfigurations
          (vla-get-activedocument
        (vlax-get-acad-object)
        )
          )
    (vla-delete ps)
    )


  ; import all pagesetups from plottest
  
(command "._-PSETUPIN" "plottest.dwg" "*")




  (setvar "cmdecho" )_cmdecho
  (setvar "expert" expert)
  (princ)
  )

[Ed Jobe]

Please clarify what you mean by 'this doesn't work' and list any errors.

[Tom Beauford]

As best I can remember I've never been able to delete a page setup assigned to a layout or overwrite an existing page setup.
Since you don't include the path to "plottest.dwg" have you tried using that command at the command line instead to see if it works or not?
I've always used Lee Mac's Steal from Drawing code to import layouts and page setups with one lsp call.

^C^C^P(DelPageSetup "11×17*")(Steal (strcat (vl-filename-directory (getenv "QnewTemplate")) (chr 92) "AutoCAD Template" (chr 92) "Templates.dwt") (list (list "Page Setups" (list "11×17" "11×17 PDF"))(list "Layouts" (list "11×17")))) .regen

I have different macros for different sizes and for cover sheets as well.
This may help: https://forums.autodesk.com/t5/visua...450956#M343122

[BrenBren]

I will have to check this out.

I know this has worked in the past (I used it to update old drawings when we changed our plotter names).

In any case, I did use the command at the command line, and because it seems to default to the last place you importated a page setup from, it does work.

I will check out those links; thanks.

- - - Updated - - -

It's simply not changing anything. There is no error code, just doesn't change the pagesetups like it used to.

[Ed Jobe]

It's simply not changing anything. There is no error code, just doesn't change the pagesetups like it used to.

I have a NET solution for page setups. It creates two commands. One configures your preferences for the second command. A single click on the second command does the imports. Let me package it for you.

[Tom Beauford]

You probably already have a page setup with the same name assigned to a layout. You cannot override an existing page setup with lisp, as far as I know but you can import a different page setup and assign it to those layouts with lisp, delete the page setup then save and try your code again.

Have you tried it on a drawing that doesn't have that page setup already?

[Ed Jobe]

I have a NET solution for page setups. It creates two commands. One configures your preferences for the second command. A single click on the second command does the imports. Let me package it for you.

Hi Brenda, here is a bundle of my solution. Just right click on the zip and select Properties, then UNBLOCK. Now extract it and move that folder to %APPDATA%/Autodesk/ApplicationPlugins

[BlackBox]

FWIW -

https://forums.augi.com/showthread.p...46#post1219546