Модераторы: Poseidon, Snowy, bems, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Excel и ошибка invalid variant operation 
V
    Опции темы
offline
Дата 21.2.2017, 14:05 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 474
Регистрация: 7.2.2005

Репутация: нет
Всего: 7



Добрый день! Перешел с Delphi 7 на Delphi XE4-
Открыл свой старый проект по работе с Excel файлом.
В Delphi 7 все работало, а вот в Delphi XE4 при работе с файлом выдает ошибку - invalid variant operation

Уже битый час сижу извращаюсь над котом, а все в пустую. подскажите, как быть.
Нужно подключит файл Экселя, прочитать значение из ячейки В2 если оно не занято, то вставить туда текст, если оно занято, то проверить В3 и т.д.
Код нажимаешь на кнопку 1 раз, программа находит пустую ячейку и вставляет туда текст, а вот когда нажимаешь на кнопку второй раз выдает ошибку.
подскажите, что не так или в Delphi XE4 нужно по другому работать?



Код

var
  excelFail:Variant;
  line : string;
begin
if PaneExcel.Tag=0
then begin
  excelFail := CreateOleObject('Excel.Application');
  excelFail.Workbooks.Open(MainPath + 'kniga.xls');
  excelFail.Visible := True;
  PaneExcel.Tag:=1;
end;
line:='2';
While (trim(excelFail.Range['B'+line])<>'') do
    line := IntToStr(StrToInt(line)+1);
excelFail.Range['B'+line]:='kykyky';


ВСЕМ СПАСИБО!!! ВОПРОС СНЯТ, ПОТЕРЯЛ ГЛОБАЛЬНУЮ ПЕРЕМЕННУЮ smile

Это сообщение отредактировал(а) offline - 21.2.2017, 14:59
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Общие вопросы"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Общие вопросы | Следующая тема »


 




[ Время генерации скрипта: 0.1027 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.