Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

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

Serega__2 © (2001-12-10 09:29:00)
сабж.

Denis V. Didenko (2001-12-17 14:29:00) [1]
v:Variant
v:=CreateOleObject("Excel.application");
v.Visible:=True;
v.// Здесь начинаеться Эксель бейсик прочитай в помощи по Эхелю как вставлять строку и учитывая синтаксис паская смело действуй

Сергей Чурсин (2001-12-11 13:31:00) [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";

TonnyS (2001-12-10 14:20:00) [3]
на сайте Королевство Дельфи есть несколько статей "По вопросам интеграции" (вроде там) http://delphi.vitpc.com

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »