Want Macro to join lines and delete numbers

macropod · #7 04-29-2020, 05:13 PM

Even the macro recorder would give you a useable macro if you plugged the Find/Replace into it. That said, try:

Code:

Sub Demo()
Application.ScreenUpdating = False
With ActiveDocument.Range
  With .Find
    .ClearFormatting
    .Replacement.ClearFormatting
    .Text = "([0-9])^13"
    .Replacement.Text = "\1^t"
    .Forward = True
    .Format = False
    .Wrap = wdFindContinue
    .MatchWildcards = True
    .Execute Replace:=wdReplaceAll
  End With
End With
Application.ScreenUpdating = True
End Sub

For PC macro installation & usage instructions, see: Installing Macros
For Mac macro installation & usage instructions, see: Word:mac - Install a Macro

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Delete lines with just a number on them - use macro or find & replace?	enso	Word	2	05-20-2019 02:58 AM
Select and Delete 2 lines after each blank line	Ziad El Hachem	Word VBA	4	03-21-2017 06:55 PM
delete axis lines	jhatter	PowerPoint	2	06-04-2015 07:14 AM
How can I delete spaces & lines in a table cell	mrayncrental	Word VBA	3	10-20-2014 07:09 PM
cannot delete these lines!	userman	Word	4	05-02-2012 12:34 AM