Excel

← →
snake1977 (2003-06-27 11:35) [0]

Здравствуйте! мне нужно сделать отчет в своем приложении в Excel.
Вот кусок исходника
procedure TForm1.Button1Click(Sender: TObject);
Var XL,Sheet:Variant;
i:Integer;
Caption,Account,AccountName,Vid:String;
Begin
try
XL:=GetActiveOLEObject("Excel.Application");
except
XL:=CreateOleObject("Excel.Application");
end;
XL.WorkBooks.Add;
XL.WorkBooks[XL.WorkBooks.Count].WorkSheets[1].Name:="sh1";
Sheet:=XL.WorkBooks[XL.WorkBooks.Count].WorkSheets["sh1"];
XL.Visible:=true;
Sheet.Cells[1,1] := "fff";
.....

подскажите, где можно взять описание этих классов, WorkBooks,Sheets,Cells

Пробовал поставить например
Sheet.Selection.Borders(xlEdgeBottom).Weight := xlThin;
неработает, ругается на то что Selection для этого объекта не существует.

← →
Ozone © (2003-06-27 11:56) [1]

По-моему этот форум вконец забит вопросами такого рода и забит неоправданно.
Делаешь так:
1. Запускаешь Excel
2. Сервис -> Макрос -> Начать запись
3. Делаешь то, что тебе нужно было бы сделать программно
4. Смотришь код получившегося макроса и пишешь тоже самое на
Delphi (с учетом языка)

← →
snake1977 (2003-06-27 12:10) [2]

я именно так и сделал ..... не прокатывает
эксель все далет через selection, но в создаваемом COM объекте такого метода или свойства нет :(
вот я и спрашиваю, где можно найти описание свойств и методов СОМ объектов этого типа?

← →
Bel © (2003-06-27 13:02) [3]

> где можно найти описание свойств и методов СОМ объектов этого типа?

В справке по VBA Excel.

а ты вместо selection пиши что-то вроде этого
Range:=sheet1.Range["A1:E1"];
и дальше уже для Range то что требуется...

Судя по справке Selection работает если предварительно
Worksheets["Лист1"].Activate,
но через Range действительно удобнее

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