Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2005.02.27;
Скачать: [xml.tar.bz2];

Вниз

Ошибка при активизации последней ячейки   Найти похожие ветки 

 
Drakosha   (2005-02-02 12:50) [0]

Делаю так:

  XLApp  :=TExcelApplication.Create(self);
  XLApp.ConnectKind  :=ckNewInstance;
  XLApp.DisplayAlerts[0]  :=False;

  XLApp.Connect;
 wsFilePath  :="c:\a.xls";
XLApp.Workbooks.Open(wsFilePath,EmptyParam,EmptyParam,
EmptyParam,EmptyParam,EmptyParam,EmptyParam,
EmptyParam,EmptyParam,EmptyParam,
EmptyParam,EmptyParam,EmptyParam,0);
 try
   WorkBk  :=XLApp.Workbooks.Item[1];
   WorkSheet  :=WorkBk.Worksheets.get_Item(1) as _WorkSheet;

   WorkSheet.Cells.SpecialCells(xlLastCell,EmptyParam).Activate;

 except
   XLApp.Workbooks.Close(0);
   XLApp.Quit;
   XLApp.Disconnect;


При активации последней ячейки вылазит эксепшен(даже в тру-ексепт)
типа: невозможно выполнить метод активате обьекта ранж :(

Прога обрабатывает большое число экселевских файлов.Я даже не могу понять почему некоторые файлы не проходят. Открываю их смотрю вроде файл как вайл а фиг работает.
Может кто сталкивался с подобным. Помогите плиз.


 
Digitman ©   (2005-02-02 13:21) [1]


> невозможно выполнить метод активате обьекта ранж


да, чудес в Экселе хватает, эт точно


> вылазит эксепшен(даже в тру-ексепт)


а вот в это не верю.


 
Drakosha   (2005-02-02 13:25) [2]

век воли не видать!
ну тоесть ет не ексепшен в обычном понимании.
Я так понимаю что это сообщение выдаёт сам ексел. и поэтому делфа его не хватет. при этом прога виснет и тока через диспечер снимается :(


 
Digitman ©   (2005-02-02 13:38) [3]


> ну тоесть ет не ексепшен в обычном понимании


а что же это по-твоему ?
обычное исключение ... класса EOleSysError ...


 
Drakosha   (2005-02-02 13:41) [4]

блин...я те говорю что при дебаге и этой ошибке даже в эксепт не заходит.
Т.е. для экселя это ошибка и он отображает сообщение , и дальше не передаёт. тобишь делфа думает что всё Ок и виснет :)


 
КаПиБаРа ©   (2005-02-02 13:45) [5]

Drakosha   (02.02.05 13:41) [4]
Напиши в микрософт :)


 
Drakosha   (2005-02-02 13:55) [6]

оч смешно.
...а мне эти файлы приходится руками править и обрабатывать :(


 
КаПиБаРа ©   (2005-02-02 14:01) [7]

Drakosha   (02.02.05 12:50)
Ошибка происходит при определении SpecialCells(xlLastCell,EmptyParam) или при ее активации?
Разбей на 2 этапа
Cell := WorkSheet.Cells.SpecialCells(xlLastCell,EmptyParam)
Cell.Activate

Может данные в другую (хорошую) книгу скопировать надо.


 
Drakosha   (2005-02-02 18:17) [8]

вылетает на cell.activate


 
КаПиБаРа ©   (2005-02-04 07:57) [9]

Проверь номер строки/столбца ячейки


 
Digitman ©   (2005-02-04 08:06) [10]


> типа: невозможно выполнить метод активате обьекта ранж


приведи полное и точное сообщение об ошибке, а не "типа"..


 
Drakosha   (2005-02-09 11:07) [11]

2КаПиБаРа
Что значит "Проверь номер строки/столбца ячейки"?

2Digitman
"Невозможно выполнить метод Activate обьекта Range"


 
Drakosha   (2005-02-09 11:08) [12]

2КаПиБаРа
Что значит "Проверь номер строки/столбца ячейки"?

2Digitman
"Невозможно выполнить метод Activate обьекта Range"


 
КаПиБаРа ©   (2005-02-09 11:15) [13]

Drakosha   (09.02.05 11:07) [11]

Ячейка определяется номером столбца и строки.
Какие номера имеет Cell := WorkSheet.Cells.SpecialCells(xlLastCell,EmptyParam)?
Соответствуют они действительности?



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

Форум: "Основная";
Текущий архив: 2005.02.27;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.47 MB
Время: 0.036 c
14-1107492594
SnapIn
2005-02-04 07:49
2005.02.27
Помогите с сетью...


3-1107013435
neat
2005-01-29 18:43
2005.02.27
dbExpress. Ошибка в параметре запроса


14-1107745364
Думкин
2005-02-07 06:02
2005.02.27
С Днем рождения! 7 февраля


4-1105389394
niki
2005-01-10 23:36
2005.02.27
Выключение компьютера


3-1106822185
anat
2005-01-27 13:36
2005.02.27
ПЕРЕСЕЧЕНИЕ не СВЯЗАННЫХ ТАБЛИЦ





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский