Bug when setting CanonicalMediaName to A2 sizes

Bug when setting CanonicalMediaName to A2 sizes

Rockit_for_Revit
Advocate Advocate
399 Views
1 Reply
Message 1 of 2

Bug when setting CanonicalMediaName to A2 sizes

Rockit_for_Revit
Advocate
Advocate

Hello,

For some reason in AutoCAD 2022, the following lisp does not work, I've tried all the A2 sizes but still no luck:

 

(vlax-for objLayout (vla-get-layouts (vla-get-activedocument (vlax-get-acad-object)))
  (if (= (vla-get-ModelType objLayout) :vlax-false)
    (progn
      (vlax-put-property objLayout 'ConfigName "DWG To PDF.pc3")
      (setq catchit (vl-catch-all-apply 'vlax-put-property (list objLayout 'CanonicalMediaName "ISO A2 (594.00 x 420.00 MM)")))
      (if (vl-catch-all-error-p catchit)
        (progn
          (princ (vl-catch-all-error-message catchit))
          nil
        )
        (princ "\nPage setup 'ISO A2 (594.00 x 420.00 MM)'")
      )
    )
  )
)

 

Any ideas?

 

0 Likes
Accepted solutions (1)
400 Views
1 Reply
Reply (1)
Message 2 of 2

pbejse
Mentor
Mentor
Accepted solution

(vlax-for objLayout (vla-get-layouts (vla-get-activedocument (vlax-get-acad-object)))
...
      (setq catchit (vl-catch-all-apply 'vlax-put-property (list objLayout 'CanonicalMediaName "ISO A2 (594.00 x 420.00 MM)")))
      ...
)

Any ideas?


Try

(list objLayout 'CanonicalMediaName "ISO_A2_(594.00_x_420.00_MM)")

 

0 Likes