Remove End Periods from List using VBA
Sub Remove_Periods_From_List()
Dim oTR As TextRange
If Not ActiveWindow.Selection.TextRange Is Nothing Then
oTR = ActiveWindow.Selection.TextRange
MsgBox(Len(oTR))
End If
oTR.RemovePeriods()
End Sub
oTR.RemovePeriods() removes the period at the end of each paragraph in the specified text
No comments:
Post a Comment