![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
MS Word 2000 - Работа с копированием текста. [D7, 2000]
Kostas © (2009-11-10 06:05:00)Здравствуйте, уважаемые мастера.
Опишу свою проблему - есть 2 MS Word документа. Один шаблон (WA1), другой с информацией для выборки (WA2) . Каким образом можно выбрать текст по определенному условию (есть начальный и конечный тег в тексте) из WA2 и скопировать его в WA1? Возможно ли это, используя метод selection или какой-либо другой метод? На данный момент эту задачу я решил через цикл побуквенным сравнением, но это очень громоздко и медленно, текста в WA2 много. Если есть идеи - напишите, буду очень благодарен.
Kostas (2009-11-11 09:57:00) [1]Анна, благодарю за ваше внимание, но то что вы написали очень просто и совсем не то что надо. Задачи поиска и замены нет, нужно выделить область в тексте (как-будто бы мы выделили мышкой текст), скопировать его и вставить в другой документ.
Анна (2009-11-11 09:29:00) [2]ExportSource:=CreateOleObject('Word.Application');
ExportSource.Documents.Add(path_dot+'\aaa.dot');
ExportSource.Selection.Find.Text:=trim(Q_marker.FieldByName('name_marker').Asstr ing);
ExportSource.Selection.Find.Replacement.Text:=trim(Q_dot.FieldByName(trim(Q_mark er.FieldByName('pole_table').Asstring)).Asstring);
ExportSource.Selection.Find.Execute(Replace:=2);
Находит и заменяет быстро и на больших документах.
Kostas (2009-11-11 04:07:00) [3]На выходе должен быть обязательно текстовый файл, не Excel.
С выходом проблем нет, самая большая проблема именно с входным файлом, выборка определенных строк по условию. Хотя бы скажите возможно ли это вообще с помощью метода selection.
KilkennyCat (2009-11-10 14:57:00) [4]Я имел ввиду наличее тех же ограничений на выход, они есть?
KilkennyCat (2009-11-10 14:56:00) [5]А уходит в каком?
Kostas (2009-11-10 10:19:00) [6]Уважаемый, KilkennyCat - не получиться. Документ приходит ко мне в word формате. С отчетами в Excel проблем никаких нет, но тут все сложнее.
KilkennyCat (2009-11-10 09:57:00) [7]отказаться от вордовского формата.