Как заменить текст при помощи макроса в текстовом поле "Надпись" Excel

[Wihomie]

Имеется документ на А4, в котором много повторяющихся элементов, имена, фамилия, профессии и т.д. Для соблюдения табуляции и отступов в тексте использовал текстовое поле "Надпись".
Как при помощи макроса найти и заменить текст в "текстовой фигуре" - текстом из ячейки?

 

[Dragokas]

Здравствуйте!
Надпись - это одно, фигура - другое.
Приложите пример файлом.

 

[Wihomie]

Здравствуйте!
Надпись - это одно, фигура - другое.
Приложите пример файлом.

Добрый вечер, вот образец, для наглядности думаю будет понятно.

 

[Dragokas]

Worksheets(1).Shapes(1).TextFrame.Characters.Text = "текст"

TextFrame object (Excel)

Office VBA reference topic

docs.microsoft.com