слияние документов Ворд

[Ципихович Эндрю]

слияние документов Ворд в настоящее время делаю так имеются поля в документе типа: { REF Должность \*Charformat \*FirstCap } и к ней же закладка "Должность" их, поля обновляет прога, что удобно, что ключ Charformat следит за форматированием, какой у ключа формат, так и обновляет, а ключ FirstCap в случае надобности делает с большой строки. Плюс еще в том, что распечатку документов делает прога и она следит за тем чтобы в закладках всё было правильно. Решил обновлять не с закладок, а с формы, как бы сделать, чтобы функционал остался прежним?? Спасибо

Добавлено через 8 дней, 4 часа, 18 минут и 15 секунд:
функционал нашёл, остальное дело техники, может кто подправит?? что другое посоветует??

Код:

Обрабатываемое_поле_номер = 1
Код_обрабатываемого_поля = Trim$(ActiveDocument.Fields(Обрабатываемое_поле_номер).Code)
'обновление текста поля, следует поле обновить перед выяснением свойств его формата
ActiveDocument.Fields(Обрабатываемое_поле_номер).Update

If Mid(Код_обрабатываемого_поля, 1, 4) = "REF " Then
If Код_обрабатываемого_поля Like "*\*FirstCap*" Then FirstCap = True
With ActiveDocument.Fields(Обрабатываемое_поле_номер).Result.Font
  Название_шрифта_текста_в_поле = .Name
  Размер_шрифта_текста_в_поле = .Size
  '-1 - значит курсивный текст
  Курсивное_начертание_текста_в_поле = .Italic
  '-1 - значит полужирное начертание текста
  Полужирное_начертание_текста_в_поле = .Bold
  '1 - значит подчёркнутый текст
  Подчёркнутое_начертание_текста_в_поле = .Underline
  '255 - красный, 0 - Auto
  Цвет_текста_текста_в_поле = .Color
End With
End If