Replacing question mark plus wrong angle quotation mark

RobiNew · #1 11-17-2025, 02:10 AM

Hi! I need help to replace wrong "?«" with "?»", for the result is "«»". Here is the code:
Sub AngleQuotationMarks()
Options.AutoFormatAsYouTypeReplaceQuotes = False
For iType = 1 To 2
Set oRng = ActiveDocument.StoryRanges(iType)
With oRng.Find
.ClearFormatting
.Replacement.ClearFormatting

.Wrap = wdFindStop
.Format = False
.MatchWildcards = True
.Text = "\?" & "(^0171)" 'to find ?«
.Replacement.Text = "\1" & "^0187" 'to replace with ?»
.Execute Replace:=wdReplaceAll
End With
Next iType
End Sub

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Picking up trailing space before quotation mark	WJSwanepoel	Word	5	02-10-2025 01:31 PM
Trying to write a regular question mark with wildcards activated	frayfray96	Word	3	09-02-2023 08:21 AM
Symbol in heading showing as question mark using StyleRef	NU2word	Word	2	11-04-2022 10:12 AM
Em dash and closing curly quotation mark	lexsper	Word	3	04-07-2015 07:12 AM
Upside Down Question Mark?	dsfcom	Word	3	10-07-2011 05:57 AM