Andrew,
Of course! Always helps when some like you looks at the problem with a fresh set of eyes. Makes one rethink:
Code:
Sub ScratchMacroII()
Dim oRng As Word.Range
Set oRng = Selection.Range.Duplicate
Selection.PasteSpecial DataType:=wdPasteText
Selection.Start = oRng.Start
End Sub