Работа в Delphi с XLS

[cherry25]

Подскажите, пожалуйста, как программно задать общий формат одной ячейки, если весь столбец - числового формата

[FaTaL]

Как то так Selection.NumberFormat = "General"

[cherry25]

Сообщение от FaTaL

Как то так Selection.NumberFormat = "General"

XLApp.WorkBooks[1].WorkSheets[1].Range['N'+IntToStr(k)+':N'+IntToStr(k)].Select;
XLApp.Selection.NumberFormat:='Gene ral';

Выдает ошибку - нельзя установить NumberFormat класса Range

[Аватар]

Не?

XLApp.WorkBooks[1].WorkSheets[1].Cells[Row,Col].NumberFormat:=...

[cherry25]

Сообщение от Аватар

Не?

XLApp.WorkBooks[1].WorkSheets[1].Cells[Row,Col].NumberFormat:=...

та же ошибка.

пробую такой код уже для диапазона ячеек:

XLApp.WorkBooks[1].WorkSheets[1].Range['A'+IntToStr(k)+':O'+IntToStr(k)].Select;
Sheet.Range['A'+IntToStr(k),'O'+IntToStr(k)].Selection.NumberFormat:= 'General';

ошибка:Method Selection не поддерживается объектом

[superedward]

Сообщение от Аватар

Не?

XLApp.WorkBooks[1].WorkSheets[1].Cells[Row,Col].NumberFormat:=...

Я использовал такой же код для XLS. Но сейчас перешёл на XLSX

[cherry25]

Сообщение от superedward

Я использовал такой же код для XLS. Но сейчас перешёл на XLSX

у меня 2003 офис, так что должно было подойти.

[Аватар]

А точно индексы для WorkBooks и WorkSheets 1? Может 0. Или что нибудь типа ActiveSheet

[FaTaL]

Сообщение от cherry25

у меня 2003 офис, так что должно было подойти.

Я это проверял на 2007, глянь как в 2003 это делается через VBA.

[cherry25]

Сообщение от FaTaL

Я это проверял на 2007, глянь как в 2003 это делается через VBA.

все, спасибо, получилось преобразовать в текстовый формат, мне подходит.
Этот код отработал корректно:

XLApp.Range['A'+IntToStr(k), XLApp.Cells.Item[k,14]].NumberFormat:='@';