Като всяка друга работа с офис продукт, работата се състои в следните стъпки:
1) Правиш макрос, който да ти свърши работата, например за Word:
Tools/Macro/Record New Macro...
2) Виждаш сорса на макроса, например:
Selection.Find.ClearFormatting
With Selection.Find
.Text = "asdasd"
.Replacement.Text = ""
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute
3) Използваш компонентите TWordApplication и TWordDocument за да изпълниш кода от съответния макрос. Пример за използването им има на http://delphi.about.com/od/kbcontrolole/l/aa032701c.htm
Ако не се справиш сам, питай пак. Успех!
P.S. Постарай се следващия път да пишеш на кирилица, моля.
чети и дишай по-леко