Quote Originally Posted by Dreamboat
Great. Word doesn't need all those FALSE thingees, so we'll chop them right out:


Sub ReplaceRetsCopy()
 Selection.Tables(1).Select
 Selection.Find.ClearFormatting
 Selection.Find.Replacement.ClearFormatting
  With Selection.Find
    .Text = "^p"
    .Replacement.Text = "||"
    .Forward = True
    .Wrap = wdFindStop
  End With
 Selection.Find.Execute Replace:=wdReplaceAll
 Selection.Copy 
End Sub


Just curious on the highlighted lines. Is VBA in Word like in Excel? So we can shorten the code from:

Selection.Tables(1).Select
 Selection.Find.ClearFormatting
to:

Selection.Tables(1).Find.ClearFormatting