pspace or mspace using lisp

[Shneuph]

I've searched and seen a lot of discussion on this sort of topic but not exactly what I'm looking for.

I want to do the equivelant of the "ms" or "ps" command within a layout to switch between model and paper space through a viewport. 

I can't set "cvport" to 1 while in model space and can't set it to 2 or 3 while in paperspace.  Is there a way to do this w/o using (command "mspace") or (command "pspace")?

I don't want to use tilemode as this switches to the model tab.  I want to switch from within the layout.

-Thanks.

[Anonymous · Accepted solution]

You can use ActiveX.

(vla-put-MSpace (vla-get-Activedocument (vlax-get-Acad-Object)) :vlax-true)

This will make a viewport active, you can then switch by setting the cvport system variable.  Once you want to go back to paper space, just use ' :vlax-false ' instead.

[Shneuph]

Haven't tried it yet but I believe you!  Thanks for the help.