Как заменить переменную в колонинтитулах через Com объект?
Обычными методами не помогает.

как попасть в колонтитул?

про запись макросов в офисе слышал?

ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader

или
ActiveWindow.ActivePane.View.SeekView = 9

А дальше замену делать?

смотря что тебе  надо - то и делай: заменяй, удаляй, добавляй и т.д.

см.Ошибку пишет. Не знает ActivePane

           Шаблон = MSWord.Application.Documents(1);
           Шаблон.Activate();
           Шаблон.ActivePane.View.SeekView = 9;
//этот номер в колонтитулах
           Замена = Шаблон.Content.Find;
           Замена.Execute("[Номер1]", Ложь, Истина, Ложь, , , Истина, , Ложь, "№ "+Номер);

//это вне колонтитулов

           Замена = Шаблон.Content.Find;
           Замена.Execute("[Номер]", Ложь, Истина, Ложь, , , Истина, , Ложь, "№ "+Номер);

Колонтитулы в Word

//прописываем верхний колонтитул
       WordApplication.ActiveDocument.Sections(1).Headers(1).Range.Text=?(Защищать,"типовой "+Параметры.НомерДок,"нетиповой "+Параметры.НомерДок);
       WordApplication.ActiveDocument.Sections(1).Headers(1).Range.Font.Italic = 9999998;
       WordApplication.ActiveDocument.Sections(1).Headers(1).Range.Font.Underline = 1;
               
       //прописываем нижний колонтитул
       Текст = WordApplication.ActiveDocument.Sections(1).Footers(1).Range.Text;
       Текст = СтрЗаменить(Текст,"{КраткоеФизическоеЛицоПерваяСторона}",Параметры.КраткоеФизическоеЛицоПерваяСторона);
       Текст = СтрЗаменить(Текст,"{КраткоеФизическоеЛицоВтораяСторона}",Параметры.КраткоеФизическоеЛицоВтораяСторона);
       
   
       WordApplication.ActiveDocument.Sections(1).Footers(1).Range.Text=Текст;
       WordApplication.ActiveDocument.Sections(1).Footers(1).PageNumbers.Add(2, Истина);

так попробуй:
Шаблон.ActiveWindow.ActivePane.View.SeekView = 9

(10) пусть пробует как в 9.
Через SeekView - это для ламеров

(11) :)

+(9)
MSWord = ПолучитьCOMОбъект("","Word.Application");
MSWord.Documents.Open(ИмяВремФайлаШаблонаДоговора);
WordApplication = MSWord.Application;

стоп. но кроме заменяемого текста у меня есть рисунок и статика. они исчезнут?

(14) а ты попробуй как в (9), ниче не должно исчезнуть )