Скрыты символы форматирования

[DolgopolovaOlga]

Подскажите, пожалуйста.
Я читаю текст, и в строке попадаются символы форматирования, которые не читаются нормально, а только в виде квадратиков. При редактировании они пропадают и ломается таблица в колонтитуле. Подскажите как правильно считывать эту строку.
Код прикладываю:

For Each sec In obook.Sections
For Each kolontitul In sec.Headers
        For Each shp In kolontitul.Shapes
        
            If shp.TextFrame.HasText = True Then

                str = shp.TextFrame.TextRange.Text

[All_Ex]

Из справки:

Некоторые формы не поддерживают прилагаемый текст (линии, изображения, и объекты OLE, например).
Если Вы пытаетесь возвращать или устанавливать свойства, которые управляют текстом в текстовом фрейме для таких объектов, то происходит ошибка.
Используйте собственность HasText, чтобы определять содержит ли текстовый фрейм текст, как показано в следующем примере.
For Each s In ActiveDocument.Shapes
With s.TextFrame
If .HasText Then
srt=ActiveDocument.Shapes(1).TextFr ame.TextRange.Text
End With
Next
Возможно это причина появления символов форматирования?
В формате Text они будут в виде квадратов.
Если хотите увидеть их цифровой код:
Number=Asc(Символ)

[Казанский]

DolgopolovaOlga,
таблица в колонтитуле находится в Надписи (это сделано для того, чтобы текст документа мог располагаться поверх таблицы).
Надпись является шейпом, поэтому при таком подходе Вы получаете весь текст таблицы.
Как Вы редактируете текст? Не нужно заменять текст целиком, типа
shp.TextFrame.TextRange.Text = MyString
Используйте методы .TypeText, .InsertAfter и т.д.