Lisp that will apply script to all Layout Tab

[nichkherbsman]

I have use script to lunch mulitple command but sometimes I have dwg file that has more layout.
Is there a lisp that will call this script and apply to all layout tab.

Thank you.
Attached is sample script

[Sea-Haven]

Try this

(setq doc (vla-get-activedocument (vlax-get-acad-object)))
(vlax-for lay (vla-get-Layouts doc)
(setq tabname (vla-get-name lay))
 (if (/= tabname "Model")
    (progn
      (setvar "ctab" tabname)
(command "script" yourscript)
)))