D
dbuchanan
Here is my attempt at transposing the current paragraph with the one
above.
What my code does in stead is replace the paragraph above with the
current paragraph.
How should I do this?
Sub MoveUp()
Selection.Paragraphs(1).Range.Select
Selection.Cut
Selection.Previous(Unit:=wdParagraph, Count:=1).Select
Selection.Paste
End Sub
Thank you,
word vba newbie
above.
What my code does in stead is replace the paragraph above with the
current paragraph.
How should I do this?
Sub MoveUp()
Selection.Paragraphs(1).Range.Select
Selection.Cut
Selection.Previous(Unit:=wdParagraph, Count:=1).Select
Selection.Paste
End Sub
Thank you,
word vba newbie