Обработка текста (Regex'ы)

[bdfy]

Есть вот такой вот текст (вообще говоря достаточно части приходиться работать с таким вот текстом). см. вложение. 6 Записка.doc
задача его нормально оформить. сейчас это фактически делает руками специальная девочка. хочу этот труд ускорить, автоматизировать.
больше всего проблем доставляют формулы.
Стремлюсь я к красивому варианту с табами ( ты когда то и давал пример) и нумерацией вида <пункт>.<номер в пункте>
в конце файла ТЗ.doc есть примеры

Алгоритм :
найти номер формулы в тексте.обычно как то криво но однозначно в записке присутствует - в виде (1) в конце строки как в данном случае.

  Set objRegExp = CreateObject("VBScript.RegExp")
    objRegExp.Global = True 'Производим поиск по всему тексту
    
    text1 = Selection.Text

    objRegExp.Pattern = "(    )+\([0-9]([\.\-0-9]+)?\)" 'Шаблон поиска
    Set objSubMatches = objRegExp.Execute(text1)
                  
                  
                  
            For j = objSubMatches.Count - 1 To 0 Step -1
                     Set objSubMatch = objSubMatches(j)
                    Debug.Print "текст """ & objSubMatch.Value _
                                  & """ начинается с " & objSubMatch.FirstIndex & " символа" & _
                                  " длиной " & objSubMatch.Length & " символов"
            Next j

шаблон в зависимости от документа можно и подправить.
дальше надо из строки потереть этот самый найденный элемент и все пробелы и табы. то что осталось (формула, причем иногда набранная простым текстом) вставить корректно. для этого функции есть NumberEquation. спасибо viter_alex -здесь неоднократно выкладывались.

Вот собственно на обработке строки я и завис (( может кто помочь ? если кто полностью решит задачу - согласен и заплатить.

[bdfy]

по идее moveuntil должен бы помочь. но знак обрыва строки он не обрабатывает (
Set rng1 = oDoc.Range(Start:=oRng.Start + objSubMatch.FirstIndex, End:=oRng.Start + objSubMatch.FirstIndex + objSubMatch.Length)

rng1.MoveStartUntil Cset:=Chr(10), Count:=wdBackward
rng1.Select
как поступить ? как строку выделить ?

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

см. вложение. 6 Записка.doc
ГДЕ?

[bdfy]

вот например.