Главная страница
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.031 c
14-71891
TGrigory
2003-08-18 20:09
2003.09.22
На игле


3-71563
Galka
2003-08-29 09:31
2003.09.22
Cannot modify a read-only dataset


1-71650
AVK2
2003-09-06 04:04
2003.09.22
2 варианта прерывания вложенного цикла. Какой правильнее?


14-71847
Прохожий
2003-08-25 11:03
2003.09.22
Сколько потоков ??


1-71735
WeCom.WS
2003-09-09 19:40
2003.09.22
проблема с Тулбарами MS Word а в OleContainer е