Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2015.11.29;
Скачать: CL | DM;

Вниз

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;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.005 c
15-1428701404
Юрий
2015-04-11 00:30
2015.11.29
С днем рождения ! 11 апреля 2015 суббота


15-1427565401
Pavia
2015-03-28 20:56
2015.11.29
AffineMask


2-1402536512
Sakipiel
2014-06-12 05:28
2015.11.29
программное создание ClientDataSet что еще я упустил?


1-1334302310
TNK
2012-04-13 11:31
2015.11.29
Word - работа с таблицей


2-1402491436
Sakipiel
2014-06-11 16:57
2015.11.29
Фильтр ClientDataset не работает