View Single Post
 
Old 02-24-2023, 01:55 PM
alex100 alex100 is offline Windows 7 64bit Office 2016
Advanced Beginner
 
Join Date: May 2020
Posts: 79
alex100 is on a distinguished road
Default

Ok, problem solved, I changed the pattern with the one below and it works good now.

Code:
.Text = vbCr & "([A-Z ]{1,50}): "
.Replacement.Text = "> \1"
Alex
Reply With Quote