Author Topic: Copy data from Model Space to Paper Space  (Read 3504 times)

0 Members and 1 Guest are viewing this topic.

MSTG007

  • Gator
  • Posts: 2606
  • I can't remeber what I already asked! I need help!
Copy data from Model Space to Paper Space
« on: July 12, 2004, 12:44:15 PM »
Like the express tools change space... is there a way to change that to Copy the data rather than move it?
Civil3D 2020

SPDCad

  • Bull Frog
  • Posts: 453
Copy data from Model Space to Paper Space
« Reply #1 on: July 12, 2004, 01:50:39 PM »
Why use the express tools.  Just use copybase in paperspace, and paste to model space.

You could animate it to.

(Defun c:PS2Ms ()
   (setq CRT (getvar "Tilemode"))
   (setvar "Tilemode" 0)
   (prompt "\nSelect objects to copy to model space: ")
   (setq SS1 (ssget))
   (command "_.copybase" "0,0" SS1 "")
   (setvar "Tilemode" 1)
   (command "_.Pasteclip" "0,0")
   (setvar "tilemode" CRT);
);

Hope it helps!
 :D
AutoCAD 2010, w/ OpenDCL

visit: http://reachme.at/spd_designs

MSTG007

  • Gator
  • Posts: 2606
  • I can't remeber what I already asked! I need help!
Copy data from Model Space to Paper Space
« Reply #2 on: July 12, 2004, 02:06:15 PM »
is there a way to reverse this... as well. from MS to PS?
Civil3D 2020

SPDCad

  • Bull Frog
  • Posts: 453
Copy data from Model Space to Paper Space
« Reply #3 on: July 12, 2004, 03:20:19 PM »
Quote from: MSTG007
is there a way to reverse this... as well. from MS to PS?


Sure use copybase in modelspace, and paste to paper space.

or

(Defun c:Ms2Ps ()
(setq CRT (getvar "Tilemode"))
(setvar "Tilemode" 1)              ; Change to modelspace
(prompt "\nSelect objects to copy to model space: ")
(setq SS1 (ssget))
(command "_.copybase" "0,0" SS1 "")
(setvar "Tilemode" 0)              ;Change to paperspace
(command "_.Pasteclip" "0,0")
(setvar "tilemode" CRT);
);
AutoCAD 2010, w/ OpenDCL

visit: http://reachme.at/spd_designs