Correct all Punctuation mistakes in blink of an eye using Word VBA | Data Entry Tips and Tricks

#youtubeismyteacher #wordvba #grammarly
English Grammar errors and mistakes will be covered by this Word VBA Macro. grammarly English mistakes such as double spaces blank paragraph marks punctuation can be corrected in milliseconds with just one click.

learn simple data entry and time saving Tips and Tricks. don't waste your time adjusting every entry manually just use VBA macros to your life easy.

Shortcut Keys:
Alt+F11 to open VBA Editor.
Alt+F8 to run saved Macros.

You can use the following MS Word VBA Macro to correct all punctuation mistakes in Microsoft Word file. This code will correct
double space
comma punctuation
full stop punctuation
exclamation mark punctuation
Sub PUNCTUATION()
Set ac = ActiveDocument.Range
With ac.Find
.ClearFormatting
.Replacement.ClearFormatting
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False

.Execute FindText:=" ", ReplaceWith:=" ", Replace:=wdReplaceAll
.Execute FindText:=" ", ReplaceWith:=" ", Replace:=wdReplaceAll
.Execute FindText:="^p ", ReplaceWith:="^p", Replace:=wdReplaceAll
.Execute FindText:=" ^p", ReplaceWith:="^p", Replace:=wdReplaceAll
.Execute FindText:="^p^p^p", ReplaceWith:="^p", Replace:=wdReplaceAll
.Execute FindText:="^p^p", ReplaceWith:="^p", Replace:=wdReplaceAll
.Execute FindText:="...", ReplaceWith:=".", Replace:=wdReplaceAll
.Execute FindText:="..", ReplaceWith:=".", Replace:=wdReplaceAll
.Execute FindText:=" .", ReplaceWith:=".", Replace:=wdReplaceAll
.Execute FindText:=" ,", ReplaceWith:=",", Replace:=wdReplaceAll
.Execute FindText:=" '", ReplaceWith:="'", Replace:=wdReplaceAll
.Execute FindText:=" :", ReplaceWith:=":", Replace:=wdReplaceAll
.Execute FindText:=" ;", ReplaceWith:=";", Replace:=wdReplaceAll
.Execute FindText:="( ", ReplaceWith:="(", Replace:=wdReplaceAll
.Execute FindText:=" )", ReplaceWith:=")", Replace:=wdReplaceAll
End With
End Sub
===============
== Follow me on==
===============
Facebook Pages...
DesignAbad: https://www.facebook.com/DesignAbad/
VBA – Make it Easy: https://www.facebook.com/VBA-Macros-for-Word-Excel-413537909418715/
=============
== CONNECT ==
=============
Youtube: https://www.youtube.com/channel/UCQxTp8di45tu5UYpxvAXqfg?sub_confirmation=1
Instagram: https://www.instagram.com/Ibn.e.Ashiq/
Facebook: https://www.facebook.com/Ibn.Ashiq/
Twitter: https://twitter.com/Ibn_e_Ashiq/

Видео Correct all Punctuation mistakes in blink of an eye using Word VBA | Data Entry Tips and Tricks канала VBA by MBA