Форум вопросов и ответов

Форум вопросов и ответов (https://www.otvetnemail.ru/)
-   Новый архив 3 (https://www.otvetnemail.ru/novyj-arhiv-3-813/)
-   -   Найти последнюю ячейку с данными (uno:GoToEndOfData) не срабатывает (https://www.otvetnemail.ru/novyj-arhiv-3-813/najti-poslednyuyu-yachejku-s-dannymi-uno-gotoendofdata-ne-srabatyvaet-308811/)

Guest 30.09.2011 00:12

Найти последнюю ячейку с данными (uno:GoToEndOfData) не срабатывает
 
Есть такая функция (написано на FoxPro, но суть не меняется) находит посленюю колонку с данными (аналогично последнюю строку) FUNCTION LastColumn LPARAMETERS loDocument,loSheet loDocument.getCurrentController().setAct iveSheet(loSheet) LOCAL laArgs(1) laArgs(1)=OOoMakePropertyValue("Sel",.F. ,1) goOOoDispatcher.executeDispatch(loDocume nt.CurrentController.Frame,"uno:GoToEndO fData",'',0,@laArgs) loCell=loDocument.getCurrentSelection() loDocument.CurrentController.Select(loCe ll) lnColumns=loCell.getCellAddress.COLUMN+1 RETURN lnColumns ENDFUNCне работает хоть убей, выдает на выходе ту ячейку, куда был поставлен курсор в открытом документе. т.е.Select(loCell) не хочет срабатывать Может быть есть еще способы найти эту ячейку?


Часовой пояс GMT, время: 19:24.


© www.otvetnemail.ru - Форум вопросов и ответов.