Thread: [Solved] Macro to delete ending period at the end of a single paragraph
View Single Post
 
Old Yesterday, 01:52 PM
macropod's Avatar
macropod macropod is offline Windows 10 Office 2016
Administrator
  
Join Date: Dec 2010
Location: Canberra, Australia
Posts: 22,511
macropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond repute
Default
Simple:
Code:
Sub DeleteEndingFullStop()
With Selection.Paragraphs.First.Range
  Do While .Characters.Last.Previous = "."
    .Characters.Last.Previous = vbNullString
  Loop
End With
End Sub
__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]
Reply With Quote