Форум: "Основная";
Текущий архив: 2015.11.29;
Скачать: [xml.tar.bz2];
ВнизWord - работа с таблицей Найти похожие ветки
← →
TNK (2012-04-13 11:31) [0]Здравствуйте !
Есть документ 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) [1]никак. Не предусмотрено в Ворде.
копируй в Эксель
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2015.11.29;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.002 c