Excel и NumberFormat

← →
fishka (2002-01-09 17:27) [0]

Программой Delphi создаю отчет в Excel. Необходимо отформатировать ячейку. Макрос Basic выглядит следующим образом:
Selection.NumberFormat = "#,##0.00_р_."
Подскажите, пожалуйста, как эта команда будет в Delphi?

← →
fishka (2002-01-10 15:31) [1]

Ну, очень хочется получить ответ. Неужели никто не делает отчеты в Excel и не форматирует ячейки?

← →
Mambet (2002-01-11 06:42) [2]

Я делаю так.

var Excel : Variant;
...
Excel := GetActiveOLEObject("Excel.Application");
Excel.ActiveSheet.cells[x,y].NumberFormat :=
"0"+DecimalSeparator+"0";

← →
fishka (2002-01-14 09:52) [3]

Спасибо за совет, но не получается.
Выдается ошибка:
БНельзя установить свойство NumberFormat класса Range.
Как правильно написать? x,y - это целые числа?

← →
Сергей Иванов (2002-01-14 12:45) [4]

x, y - это OleVariant

← →
MetallAdm (2002-01-14 13:21) [5]

var
XL, XArr: Variant;
i : Integer;
j : Integer;
fname,st1:String;
xf:String;
yf:String;
a,b,c:String;
tshor:String;
begin
XArr:=VarArrayCreate([1,10],varVariant);
XL:=CreateOLEObject("Excel.Application");
XL.WorkBooks.add;
XL.visible:=true;
j:=2;
XL.Range["C"+IntToStr(j),CHR(64+10)+IntToStrj)].Value := XArr; -- Пихаю текст в выделенный участок можно выделить и столбец

допустим у меня есть уже текст в ентом месте
я его выделяю
XL.Range["B"+IntToStr(j),CHR(64+10)+IntToStr(j)].Select;
XL.Selection.Font.Bold := True;
XL.Selection.Interior.ColorIndex := 16;
и макросом меняю цвет фона и делаю шрифт жирным
непонятно будет пиши на мыло :))

← →
MetallAdm (2002-01-14 13:28) [6]

Сорри забыл мыло указать
postmaster@ether.chelny.ru

← →
MetallAdm (2002-01-14 13:45) [7]

А если конкретней !

XL.Range["A1","B2"].Select;
Выделяется ента облась
и Выделенную область меняешь
XL.Selection.NumberFormat := "0.00"; если числовой 0.00;
XL.Selection.NumberFormat := "#,##0.00$"; если денежный 0.00р

я думаю что понятно и просто

← →
fishka (2002-01-14 13:57) [8]

to MetallAdm: Спасибо за советы. Если после выделения ячейки (столбца) написать так:
XL.Selection.NumberFormat := "0.00";
то выдается та же ошибка:
Нельзя установить свойство NumberFormat класса Range.
Причем, шрифт, ширину колонки можно изменить, и я это делаю так же, как предлагаете Вы.
В чем моя ошибка? Чего не хватает в программе?

Excel и NumberFormat Найти похожие ветки