Макрос MS Word для удаления символов ударения - VB

Формулировка задачи:

Есть документ Microsoft Word, где в словах проставлены ударения. Возникла необходимость убрать эти символы. Написал простой макрос для замены (русская буква "а" с ударением заменяется на обычную букву "а"), но не знаю, как задать букву с ударением в строке поиска. Когда копируешь такую букву в документе и вставляешь в текст макроса, получается "а?".

With ActiveDocument.Content.Find
    .ClearFormatting
    .Text = "а?"
    .Replacement.ClearFormatting
    .Replacement.Text = "а"
    .Execute Replace:=wdReplaceAll, Forward:=True, Wrap:=wdFindContinue, MatchCase:=True
End With

Подскажите, что необходимо написать в строке .Text?
Вставка символа ударения осуществлялась так: при редактировании документа MS Word печаталась буква "a", затем "301", и нажималась комбинация ALT+X. Над буквой "а" появлялся символ ударения.

Решение задачи: «Макрос MS Word для удаления символов ударения»

textual
                            Листинг программы 
                        

                            Selection.Find.ClearFormatting
    Selection.Find.Replacement.ClearFormatting
    With Selection.Find
        .Text = "(?)" + ChrW(769)
        .Replacement.Text = "\1"
        .Forward = True
        .Wrap = wdFindContinue
        .Format = False
        .MatchCase = False
        .MatchWholeWord = False
        .MatchAllWordForms = False
        .MatchSoundsLike = False
        .MatchWildcards = True
    End With
    Selection.Find.Execute Replace:=wdReplaceAll

                        