Workbooks.Open вопросик

[Sha]

Workbooks.Open ("c:\база\форма.xls")
Workbooks("c:\база\форма.xls").Work sheets("ОЛПМ").Cells(1, 1) = 555

почему не работает?

з.ы. пытаюсь открыть книгу и записать в ячейку значение (варианты с Range желательно не предлагать =) - не удобно)

[The_Prist]

Workbooks.Open ("c:\база\форма.xls")
Workbooks("форма.xls").Worksheets("ОЛПМ").Cells(1, 1) = 555

[Sha]

спасибо огромное

[Giku]

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ExtCtrls, StdCtrls, ActnColorMaps, CustomizeDlg, ActnMan, ComObj;

type
  TForm1 = class(TForm)
   GroupBox1: TGroupBox;
    Label1: TLabel;
    Button1: TButton;
    StandardColorMap1: TStandardColorMap;
    XPColorMap1: TXPColorMap;
    CustomizeDlg1: TCustomizeDlg;
    TwilightColorMap1: TTwilightColorMap;
    ColorBox1: TColorBox;
    GroupBox2: TGroupBox;
    Label2: TLabel;
    Button2: TButton;
   Button3: TButton;
    Label4: TLabel;
    Label3: TLabel;
    Label5: TLabel;
    GroupBox3: TGroupBox;
    Label6: TLabel;
    ScrollBar1: TScrollBar;
    Label7: TLabel;
    Label8: TLabel;
    Label9: TLabel;
    Label10: TLabel;
    Label11: TLabel;
    Label12: TLabel;
    Label13: TLabel;
    Label14: TLabel;
    Label15: TLabel;
    Label16: TLabel;
    Label17: TLabel;
    OpenDialog1: TOpenDialog;
    OpenDialog2: TOpenDialog;
  
    procedure Button3Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;
 var Excel2: Variant;

implementation


{$R *.dfm}
          

procedure TForm1.Button3Click(Sender: TObject);
begin

Excel2.Workbooks.Open['C:\Temp\MyBook.xls'];

end;

end.

EVariantInvalidOpError

ругается на эту строчку

Excel2.Workbooks.Open['C:\Temp\MyBook.xls'];

почему ?
у меня стоит офис 2010

[Казанский]

А где переменная Excel2 связывается с приложением Excel?

[Giku]

я думал это:

var Excel2: Variant;

а как ее правильно привязать ?