How do i move text in word 2010 in a macro without copying and pasting?

im using macros generate reports old dos laboratory program. have switched word 2010 , not recognize move text function of old macros (f2 enter) there anyway move text in macro without copying , pasting? (it messes clipboard , slows whole process down lot).
any appreciated!!

something should give idea of how can done without using clipboard.

  sub moveformattedtext()      dim doc as word.document      dim srng as word.range      dim irng as word.range            set doc = word.activedocument      set irng = doc.content      irng.collapse word.wdcollapsedirection.wdcollapsestart            set srng = word.selection.range      irng.formattedtext = srng.formattedtext      srng.delete  end sub    

 

---

kind regards, rich ... http://greatcirclelearning.com

Microsoft Office  >  Word IT Pro Discussions