Topic: How to change the Name of the Layout Tab ????

[Krushert]

I can find a bunch of post about reading the name of the CTAB variable, but I can not find one on how to change the name via code.
Can someone point me in the right direction?
Thanks.

[Jeff_M]

Try here:

http://www.theswamp.org/index.php?topic=1466.0

[Krushert]

Try here:

Thank you I will try to look at tomorrow.  Have to go home to a sick child.

[KewlToyZ]

Something like:

Code: [Select]

(defun c:MyLayout()
(command "expert" "2")
(setq shtnm (getstring "\nEnter new paper space layout description: (Example: 30x42-YourTitle) :"))
(command "layout" "t" "MyTemplate.dwt")
(command "MyLayoutTabName")
(command "layout" "rename" "MyLayoutTabName" shtnm)
(command "layout" "s" shtnm)
(princ "\nLayout renamed.")  
(princ)
)

[Krushert]

Something like:

(defun c:MyLayout()
   (command "expert" "2")
   (setq shtnm (getstring "\nEnter new paper space layout description: (Example: 30x42-YourTitle) :"))
   (command "layout" "t" "MyTemplate.dwt")
   (command "MyLayoutTabName")
   (command "layout" "rename" "MyLayoutTabName" shtnm)
   (command "layout" "s" shtnm)
   (princ "\nLayout renamed.") 
   (princ)
)

Thank you KewlToyZ. 
I suspected there would be a way to command line it, but I could not find it.
I will post back what I out together

[KewlToyZ]

Usually lisp will run through without the dialog box, but in case it pops up try "-layout" just in case.

[DEVITG]

A VL way

Code: [Select]

(vl-load-com)
  (setq adoc
(vla-get-activedocument
   (vlax-get-acad-object)
)
  )

(setq layout-col (vla-get-layouts adoc));_all layouts

(vlax-for layuot layout-col

  (print (vla-get-name layuot))
  )

(setq old-layout-name "Layout2")
(setq new-layout-name "30x42-YourTitle")

(vla-put-name (vla-item   layout-col   old-layout-name ) new-layout-name)


[KewlToyZ]

Nice! Gonna have to ask if I can steal that bit of poetry

[DEVITG]

Beware nobody see you.

[KewlToyZ]

My posture leads me to beleive I am invisible  :ugly: