|
|
#14
01-10-2021, 06:53 PM
|
||||
|
||||
Using the same principle, this appears to work but is a bit simpler than Greg's code.
Code:
Sub ScratchMacro() Dim oRng As Word.Range, lngS As Long Set oRng = Selection.Range lngS = oRng.Start oRng.PasteSpecial DataType:=wdPasteText oRng.Start = lngS oRng.Select End Sub
__________________
Andrew Lockton Chrysalis Design, Melbourne Australia 
|
| Tags |
| copy and paste, text selection |
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
| Macro to find text in between two characters and then format selected text? | qcom | Word | 5 | 02-19-2015 11:23 PM |
 Getting mult resps. selected in listbox to concatenate & paste at a bookmark in Word
|
marksm33 | Word VBA | 3 | 01-15-2015 05:59 PM |
|
Formatting affecting more than selected text
|
esteban | Word | 7 | 05-25-2012 04:34 AM |
|
Do NOT print selected text
|
Tracy | Word | 2 | 09-11-2011 07:25 AM |
| Selected text and logo in one macro | marijke | Word VBA | 0 | 08-24-2009 07:01 AM |
Windows 10 
Office 2016
Threaded Mode