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

Вниз

Почему Excel не понимает формат даты?   Найти похожие ветки 

 
Aleksandr.   (2005-08-18 17:01) [0]

При экспорте таблицы в Excel, чтобы он не тупил с форматированием данных, для колонок устанавливаю свои форматы:

 F:=TDataSet(FDataSet).Fields[i];
 RangeStr:=TExcelLetters[i-j+1]+"2:"+TExcelLetters[i-j+1]+IntToStr(dCount);
 FmtRange:=Sheet.Range[RangeStr];
 if F.DataType=ftInteger then
   FmtRange.NumberFormat:="0"
 else if F.DataType=ftFloat then
   FmtRange.NumberFormat:="0"+DecimalSeparator+"00"
 else if F.DataType=ftDateTime then
   FmtRange.NumberFormat:="m/d/yyyy"
 else
   FmtRange.NumberFormat:="@"

Даты в полях ftDateTime являются целочисленными (без времени), и при отсутствии задания NumberFormat для них Excel целочисленные значения и пишет.
Какой нужен формат для даты, смотрелось при помощи записи макроса с самом Excel, но на практике после форматирования он в этих ячейках при указании такого формата выдает ошибку невозможности установить формат, а если присвоение заменить на "m"+DateSeparator+"d"+dateseparator+"yyyy", то так в ячейке и пишет: "m.d.yyyy".
Как ему правильно задать, что колонка является Датой?


 
Fay ©   (2005-08-18 17:06) [1]

ДД.ММ.ГГГГ


 
Aleksandr.   (2005-08-18 17:15) [2]

Это только для русского экселя, не так ли? А автоматический формат в зависимости от языка?


 
Fay ©   (2005-08-18 18:06) [3]

2 Aleksandr.   (18.08.05 17:15) [2]
Мне пока не понятно, как добиться такого эффекта  - "Excel целочисленные значения и пишет."


 
Aleksandr.   (2005-08-18 22:19) [4]

Fay © :
Очень просто - укажите NumberFormat "@". Когда его вообще не указываешь, все в целом нормально, но некоторые даты вообще косяк показывают. Поэтому и пришлось вручную проставлять форматы.



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

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

Наверх




Память: 0.45 MB
Время: 0.011 c
14-1124362119
kyn66
2005-08-18 14:48
2005.09.11
Программа для защиты CD от копирования и виртуализации


1-1124298130
Kyro
2005-08-17 21:02
2005.09.11
Удаление файла


14-1124044520
Е-клмн
2005-08-14 22:35
2005.09.11
Как на английский перевести слово «шняга»?


14-1124091116
Антон13
2005-08-15 11:31
2005.09.11
Специальные знаки


1-1124634052
OldNaum
2005-08-21 18:20
2005.09.11
Менеджмент сервиса





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский