Delete Character on Single Line Only

Tye30 · #9 04-20-2017, 08:40 PM

Ha ha...Yeah, I got a little excited and was already starting to incorporate your code into my other macros and I ended up posting the wrong one. Thank you again macropod, I am new to VBA so I appreciate you helping me!

Code:

 
Sub LINE_REVISE()
'
'
Dim StrTmp As String
With Selection
  .Start = .Paragraphs.First.Range.Start
  .End = .Paragraphs.First.Range.End - 1
  StrTmp = Trim(Replace(Replace(.Text, "|Z| ", "ZR"), "|", ""))
  .Text = StrTmp
End With
    Selection.MoveDown Unit:=wdLine, Count:=1
    Selection.HomeKey Unit:=wdLine
End Sub

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Every page indents first line one character	glennhardy	Word	6	02-05-2016 04:05 PM
Use character instead of line for table border	dlowrey	Word Tables	6	03-09-2015 11:29 AM
macro to add brackets to each line and add single quotes to each word in the line	bracketandquotes	Word VBA	17	02-16-2015 03:51 PM
first character NOT Alpha numeric or Tilde (~) delete.	ksridh	Word VBA	5	03-17-2014 12:45 AM
Change single character in PPT to another font macro	rtwwpad	PowerPoint	1	01-19-2013 05:08 PM