Microsoft Office Forums

Go Back   Microsoft Office Forums > >

 
 
Thread Tools Display Modes
Prev Previous Post   Next Post Next
  #1  
Old 05-27-2021, 12:47 PM
Shelley Lou Shelley Lou is offline VBA semi colon at end of sentences Windows 10 VBA semi colon at end of sentences Office 2016
Expert
VBA semi colon at end of sentences
 
Join Date: Dec 2020
Posts: 259
Shelley Lou is on a distinguished road
Default VBA semi colon at end of sentences

Hi, I have got the macro below to insert semi-colons at the end of a sentence. I'm looking to exclude certain words at the end of sentence i.e 'and, but and or' as these belong to lists which already have a semi-colon before each of these words. How can I exclude these in the code. Thanks




Code:
Sub DPU_Test()
Application.ScreenUpdating = False
Dim Para As Paragraph
Dim oRng As Range
Set oRng = ActiveDocument.Range
  With oRng.Find
    .Text = ".^p"
    .Replacement.Text = "^p"
    .Execute Replace:=wdReplaceAll
    End With
On Error Resume Next
For Each Para In ActiveDocument.Paragraphs
With Para.Range
If Len(.Text) > 2 Then
If Not .Characters.Last.Previous Like "[.!?:;]" Then
.Characters.Last.InsertBefore ";"
End If
End If
End With
Next
Application.ScreenUpdating = True

End Sub
Reply With Quote
 



Similar Threads
Thread Thread Starter Forum Replies Last Post
VBA semi colon at end of sentences Image semi-disappearing behind text lines Ulodesk Drawing and Graphics 3 01-28-2019 12:50 PM
VBA semi colon at end of sentences Word is reverting my formatting semi-randomly after a third-party program removes sections Alsadius Word 4 11-27-2017 08:46 AM
VBA semi colon at end of sentences Work semi completed c991257 Project 11 05-11-2016 04:13 AM
aligning colon JRaul Word 4 07-07-2012 06:06 AM
Semi-flexible templates (couple of questions) mshanks Word 1 07-29-2009 06:35 AM

Other Forums: Access Forums

All times are GMT -7. The time now is 06:38 AM.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions Inc.
Search Engine Optimisation provided by DragonByte SEO (Lite) - vBulletin Mods & Addons Copyright © 2025 DragonByte Technologies Ltd.
MSOfficeForums.com is not affiliated with Microsoft