Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

проблма с формулой в Excel


evg00 ©   (2005-07-12 14:46:00) 

Я заношу в ячейку Excel формулу:
f:='=ЕСЛИ(C'+IntToStr(i+2)+'>B'+IntToStr(i+2)+';0;B'+IntToStr(i+2)+'*C'+IntToStr(i+2)+')';
wrksheet.Cells.Item[i+2,4].Formila:=f;
почему то при выполнении вылетает ошибка: OLE ERROR 800A03EC, хотя если заносить простые формулы типа '=С3*B3' то все нормально работает. Как можно обойти эту проблему?


dimaBA72488   (2005-08-03 17:34:00) [1]

Вот это будет работать:
f:='=IF(C'+IntToStr(i+2)+'>B'+IntToStr(i+2)+',0,B'+IntToStr(i+2)+'*C'+IntToStr(i+2)+')';
Обрати внимание, что я заменил ЕСЛИ на IF и ";"  на ","


Fly   (2005-07-14 12:53:00) [2]

evg00 ты неправильно в ячейку Ехелевскую записываешь

Попробуй так wrksheet.Range[Здесь надо указать ячейку в формате 'A1'].Formula:=f;

Это точно сработает, а при обращении Cells.item тоже ошибку выдавал.

Еще можно попробовать wrksheet.UsedRange.Cells.Item[i+2,4].Formula:=f;
Дельфи под рукой нет, проверить не могу.


evg00   (2005-07-12 15:32:00) [3]

Я пробовал IF все равно такая же хрень


Drakosha   (2005-07-12 15:27:00) [4]

имхо "ЕСЛИ" не отработает, используй английские названия функций.


palva   (2005-07-12 14:53:00) [5]

Вижу ошибку: Formila


Наверх

Титульная страница Поиск, карта сайта Написать письмо