Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Word - работа с таблицей [D7, WinXP]

TNK © (2012-04-13 11:31:00)
Здравствуйте !
Есть документ WORD , таблица . В таблице надо найти текст , затем необходимо прочитать текст из каждой ячейки . Вопрос - как узнать номер строки .

var OldStr:OleVariant;

OldStr := 'Номер';

WordApplication1.Selection.Find.Execute(OldStr,EmptyParam,EmptyParam,EmptyParam,
EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,
EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam);

S2 := WordApplication1.Selection.FormattedText; - строка найдена
if not VarisEmpty(S2) then begin
S2 := StringReplace(S2, '#0$D','', [rfReplaceAll]); // Remove Tabs
S2 := StringReplace(S2, '#0$7','', [rfReplaceAll]); // Remove linebreaks
end;

Cobalt (2012-04-13 12:41:00) [1]
никак. Не предусмотрено в Ворде.
копируй в Эксель

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »