I can't replace some bullet points (chr 183)

alex100 · #3 02-21-2023, 12:30 AM

> record the find/replace as a macro

Thank you for your suggestion! I recorded a macro and the bullet code is different than the one that was shown in the 'Insert > Symbol' menu. That was 'Chr(183)' and the new one is 'ChrW(61623)'.

It is working great now! Below you can see the recorded script.

Alex

Code:

Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
    .Text = ChrW(61623)
    .Replacement.Text = "-"
    .Forward = True
    .Wrap = wdFindAsk
    .Format = False
    .MatchCase = False
    .MatchWholeWord = False
    .MatchAllWordForms = False
    .MatchSoundsLike = False
    .MatchWildcards = True
End With
Selection.Find.Execute Replace:=wdReplaceAll

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Bullet-points Spacing's	France6	Word	5	02-07-2017 06:08 PM
Trouble using bullet points / sub bullet points within Word 2013	Mr Davo	Word	2	04-18-2016 04:31 PM
Bullet points with text?	jjmclell	Word	2	03-01-2013 11:42 AM
Advanced search and replace for bullet points	TishyMouse	Word	5	02-17-2012 06:32 AM
Bullet points shortcut	OfficeAppentice	Word	1	04-30-2010 04:13 PM