как в ворде между каждой буквой вставить определенную букву?

[andrey1010]

как в ворде между каждой буквой вставить определенную букву??
например слово погулять п1о1г1у1л1я1т1ь



в поиск и замена в ворде не нашел этой функции или если она даже есть помогите как это сделать

[shanemac51]

не знаю, так ли я поняло условие

между двумя буквами кириллицы вставить кавычку

`р`р`р`р`р`р`р`р`р`р`р`р`р`р`р`р`р` р
IdMaterial
MaterialName
IdCourse111 В э`т`о`м р`а`з`д`е`л`е о`б`с`у`ж`д`а`е`т`с`я и`с`п`о`л`ь`з`о`в`а`н`и`е д`и`а`л`о`г`о`в`о`г`о о`к`н`а П`о`и`с`к и з`а`м`е`н`а д`л`я п`о`и`с`к`а и (п`р`и н`е`о`б`х`о`д`и`м`о`с`т`и) и`з`м`е`н`е`н`и`я д`а`н`н`ы`х в б`а`з`е 002 д`а`н`н`ы`х Microsoft Access.
Д`о`п`о`л`н`и`т`е`л`ь`н`ы`е с`в`е`д`е`н`и`я о д`р`у`г`и`х с`п`о`с`о`б`а`х о`б`н`о`в`л`е`н`и`я д`а`н`н`ы`х, н`а`п`р`и`м`е`р с п`о`м`о`щ`ь`ю з`а`п`р`о`с`о`в н`а о`б`н`о`в`л`е`н`и`е и д`о`п`о`л`н`е`н`и`е, с`м. в с`т`а`т`ь`е «О`б`н`о`в`л`е`н`и`е д`а`н`н`ы`х в б`а`з`е д`а`н`н`ы`х».

[Sasha_Smirnov]

Моё поняло, что нужна мужская рука:

Сообщение от andrey1010

РЕБЯТА…

Sub Макрос1()
' Макрос записан 10.06.2014 Hataly
'
Const Буква = "ё" 'буква, которой нужно нашпиговать слова документа Word

    With Selection.Find         'работа с окном замены (Ctrl+h)
        .Text = "^$"            'ищем любую букву
        .Replacement.Text = "^&" & Буква    'добавляем к ней константу (букву)
        .MatchWildcards = False         'опция "Подстановочные знаки" отключена
        .Execute Replace:=wdReplaceAll  'соотв. кнопке "Заменить все"
        
        .Text = "?>"                    'означает любой сивол в конце слов
        .Replacement.Text = ""          'меняем на нулевую строку
        .MatchWildcards = True          'опция "Подстановочные знаки" вкл.
        .Execute Replace:=wdReplaceAll  'соотв. кнопке "Заменить все"
        
        'Теперь сбросим установки диалога поиска-замены к первоначальным:
        .Text = ""
        .MatchWildcards = False
        .Execute                        'соотв. кнопке "Заменить"
    End With

End Sub