View Single Post
 
Old 01-08-2021, 01:56 AM
davidswb davidswb is offline Windows 10 Office 2019
Novice
 
Join Date: Jan 2021
Posts: 2
davidswb is on a distinguished road
Default

Quote:
Originally Posted by gmaxey View Post
If you don't need special paste features you might use a simple macro:

Code:
Sub ScratchMacro()
'A basic Word macro coded by Greg Maxey
  Dim oRng As Word.Range
  Set oRng = Selection.Range
  oRng.Paste
  oRng.Select
End Sub
Hi Greg,
For the macro belwo you once posted is there a way to do the same thing using PasteSpecial (unformated text) with the Select at the end? I've been trying and have not any success.

Sub ScratchMacro()
'A basic Word macro coded by Greg Maxey
Dim oRng As Word.Range
Set oRng = Selection.Range
oRng.Paste
oRng.Select
End Sub

Many thanks
David
Reply With Quote