Подскажите плз, как програмно вставить строку в Excel.

← →
Serega__2 (2001-12-10 09:29) [0]

сабж.

← →
TonnyS (2001-12-10 14:20) [1]

на сайте Королевство Дельфи есть несколько статей "По вопросам интеграции" (вроде там) http://delphi.vitpc.com

← →
Сергей Чурсин (2001-12-11 13:31) [2]

Через ActiveX Automation как-то так...
***********************************

var
ExOle :OleVariant;
Sheet1, Cells:OleVariant;

***********************************

try
ExOle:=GetActiveOleObject("Excel.Application");
except
ExOle:=CreateOleObject("Excel.Application");
if ExOle.Workbooks.Count<1 then
ExOle.Workbooks.Add;
if ExOle.Workbooks[1].Sheets.Count<2 then
ExOle.Workbooks[1].Sheets.Add("Sheets1");
if ExOle.Workbooks[1].Sheets.Count<2 then
ExOle.Workbooks[1].Sheets.Add("Sheets2");

end;
ExOle.Visible:=true;
*******************************************************

Sheet1:= ExOle.ActiveWorkbook.Worksheets["Sheets1"];
Sheet1.Cells[1,2]:="aaaa";

← →
Denis V. Didenko (2001-12-17 14:29) [3]

v:Variant
v:=CreateOleObject("Excel.application");
v.Visible:=True;
v.// Здесь начинаеться Эксель бейсик прочитай в помощи по Эхелю как вставлять строку и учитывая синтаксис паская смело действуй

Подскажите плз, как програмно вставить строку в Excel. Найти похожие ветки