Открытие шаблона Microsoft Excel

← →
kingsoft © (2007-01-16 04:33) [0]

Доброго времени суток уважаемые мастера. Помогите пожалуйста с небольшой проблемой: Как сделать так, чтобы по нажатию на кнопку (Button), открывался уже готовый шаблон Microsoft Excel, из того или иного каталога жёсткого диска.

← →
КиТаЯц © (2007-01-16 08:11) [1]

ShellExecute ?

← →
pavel_guzhanov © (2007-01-16 09:41) [2]

XLApp:=CreateOleObject("Excel.Application"); XLApp.WorkBooks.Open("c:\Blank.xls");

← →
kingsoft © (2007-01-16 14:35) [3]

> pavel_guzhanov © (16.01.07 09:41) [2]
> XLApp:=CreateOleObject("Excel.Application"); XLApp.WorkBooks.
> Open("c:\Blank.xls");

Что то я не понял. Если можно то напишите пожалуйста полный код, и какие кампоненты нужно додавить на форму для работы, этого кода?

компонентов, кроме твоей кнопки, никаких.

uses comObj, Excel_TLB;

procedure TForm1.BInExcelClick(Sender: TObject); var XLApp:Variant; begin XLApp:=CreateOleObject("Excel.Application"); XLApp.WorkBooks.Open("c:\Blank.xls"); XLApp.Visible:=true; end;

Если у тебя нет файла Excel_TLB.pas, то его нужно импортировать. Делается это так: Projects->Import Type Library, выбираешь в списке "Microsoft Excel 11.0 Object Library (Version 1.5)" и нажимаешь кнопку Create Unit. 11.0 и 1.5 - соответствуют MSExcel 2003, у других версий будут отличаться. Ну и, конечно, в корне диска С должен быть файл Blank.xls, это в том случае, если ты не хочешь ничего менять в приведенном примере.

Открытие шаблона Microsoft Excel Найти похожие ветки