Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2010.08.27;
Скачать: CL | DM;

Вниз

Ошибки при экспорте в Excel_1   Найти похожие ветки 

 
NGPOL   (2010-04-18 21:24) [0]

1. Создал книгу, перевел туда данные, какие нужно, но при показе листа Excel оакзывается, что числовые данные представлены в текстовом виде, о чем мне говорят зеленые "галочки" в ячейках. При попытке выполнить этот код:

Worksheet.Range["B" + IntToStr(1),"B" + IntToStr(C+1)].NumberFormat:= "#,##0.00";

Выпадает ошибка:
"Нельзя установить свойство NumberFormat класса Range".
Что ж делать?


 
Игорь Шевченко ©   (2010-04-18 22:07) [1]


> Что ж делать?


подсказка: свойство NumberFormat можно установить у Selection


 
NGPOL   (2010-04-18 22:46) [2]

Не получается...
Selection есть у Application. Ну т.е. у Excel.
строка
XLApp.Selection.NumberFormat:= "#,##0.00";
вызывает недовольство.
В всплывающей подсказке есть Selection[lcid:integer], но у него нет NumberFormat...


 
Игорь Шевченко ©   (2010-04-18 23:41) [3]


> XLApp.Selection.NumberFormat
> вызывает недовольство.


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


 
NGPOL   (2010-04-19 09:43) [4]

Спасибо! То, что нужно!


 
NGPOL   (2010-04-20 07:19) [5]

Оказывается, не все так просто! Я включил в состав программы модуль TDispCall, как написано в статье, и Delphi перестал "спотыкаться" на строчке с NumberFormat, но в указанном диапазоне ничего не происходит! Значения из запроса передаются, как текст. И, видимо, NUMBERformat, с ними работать не хочет. И не форматирует...
Вот это хоть как-то поправило положение:

for i := 0 to (C - 1) do
       if not VarIsEmpty(MainQuery.Fields[i].Value) then TabGrid[i, 1] := Format("%4.2f", [MainQuery.Fields[i].AsFloat]);

Спасибо всем!


 
Демо ©   (2010-04-20 10:17) [6]

.Cells[i,1].NumberFormat := AnsiString("@");



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

Текущий архив: 2010.08.27;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.061 c
15-1266870707
Pavia
2010-02-22 23:31
2010.08.27
Поисковые алгоритмы.


15-1268039734
Vovka
2010-03-08 12:15
2010.08.27
Виртуальная клавиатура и генератор паролей


6-1218209472
Vikindos
2008-08-08 19:31
2010.08.27
как закачать файл на сервер?


2-1274175056
namco
2010-05-18 13:30
2010.08.27
odbc c delphi


15-1275405572
AKE
2010-06-01 19:19
2010.08.27
Кто-нибудь пользовал браузер Fine Browser?