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

Вниз

Как определить конец таблицы в MSWord?   Найти похожие ветки 

 
Алексей Петухов   (2003-09-09 14:44) [0]

Уважаемые мастера, здавствуйте.
Мне нужно организовать обход таблиц в MS Word.
Для обхода текущей таблици использую такую процедуру:

procedure ScanTable(CurrentTable:Variant);
Var
MSWTCell: Variant;
begin
MSWTCell:=CurrentTable.Cell(1,1);
while (not VarIsNull(MSWTCell))and(not VarIsEmpty(MSWTCell)) do
begin
ShowMessage("строка: "+inttostr(MSWTCell.RowIndex)+#10+#13+"столбец: "+inttostr(MSWTCell.ColumnIndex));

MSWTCell:=MSWTCell.Next;
end;
end;


Но при окончании ячеек в таблице возникает ошибка.
Т.е. не правильно определяется конец таблицы. По идее VarIsNull(MSWTCell) должно сработать, но неработает.
Подскажите, как правильно определить конец таблицы.
Заранее благодарен, Алексей.


 
KSergey ©   (2003-09-09 15:08) [1]

А нет ли у таблицы свойств Rows.Count и Columns.Count? Судя по VBA справке - есть



Страницы: 1 вся ветка

Текущий архив: 2003.09.22;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.029 c
1-71699
Olegka
2003-09-10 11:08
2003.09.22
Новое окно клиента


14-71859
Anatoly Podgoretsky
2003-08-31 00:43
2003.09.22
Инструкция к


14-71844
fox_19
2003-09-01 00:06
2003.09.22
Врезка кода в файл


8-71767
landy
2003-05-22 13:59
2003.09.22
text-to-speech engine


14-71842
Sergey13
2003-09-01 11:25
2003.09.22
Как у вас с урожаем 2003?