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

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

Не могу округлить значение поля в EXCEL. [D5, D7, Win95/98, WinME, Win2k, WinXP]


denmin ©   (2006-06-20 09:08:00) 

Здравствуйте.
Пишу значения БД в EXCEL. Надо чтобы поле округлялось в самом EXCEL. Пишу так
Sheet.Cells[row, 11].formula:='=ROUND((G'+inttostr(row)+'*I'+inttostr(row)+'/1000);2)';
но ругается на OLE ошибку. Если пишу
Sheet.Cells[row, 11].formula:='(G'+inttostr(row)+'*I'+inttostr(row)+'/1000)';
то все нормально, т.е. без округления. пробовал писать ОКРУГЛ вместо ROUND, не помогает. Можно конечно в свойствах ячейки прописать что она числовая с двумя знаками после запятой, но я не знаю как. Последний вариант лучше всего. Буду благодарен любому ответу, а еще больше за фак по работе с EXCEL в Дельфи.
Заранее благодарен.


umbra   (2006-06-20 18:05:00) [1]

примерно так

var
 mybook: variant;
{..................................................}
mybook := XLApp.Workbooks.Item[1];
mybook.Worksheets.Item[1].Range('A1').NumberFormatLocal = '0,000';
{...................................................}
 mybook := Unassigned;


denmin   (2006-06-20 16:34:00) [2]

-> umbra ©

а как?


umbra   (2006-06-20 14:54:00) [3]

можно задать числовой формат ячейки с нужным количеством знаков


Сергей М.   (2006-06-20 14:42:00) [4]


> благодарен ..за фак


fuck

FormulaLocal vs Formula


Kray   (2006-06-20 14:26:00) [5]

http://www.delphikingdom.com/asp/viewitem.asp?catalogid=1270


evvcom   (2006-06-20 09:17:00) [6]

Магнитофон (запись макроса) тебе в помощники. В экселе поищи, на закладке VB


Наверх

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