如何在delphi中操纵excel的sheet,尤其是选择多个sheet?(100分)

在vba中，选择多个sheet的宏的语句：
sheets(Array("sheet1","sheet2")).select,
它的pascal形式是什么呢？
请问那里可以找到vba中的函数的pascal形式？

http://www.delphibbs.com/delphibbs/dispq.asp?lid=759711
有不少这方面的讨论.
我使用的是Servers上的office控件.
procedure TForm1.Button1Click(Sender: TObject);
var
arr : OleVariant;
shs : sheets;
begin
arr := varArrayCreate([0,1],varVariant);
arr[0] := 'Sheet1';
arr[1] := 'Sheet2';
xlApp.Connet;
xlApp.Visible[0] := True;
xlApp.AlertBeforeOverwriting[0] := False;
xlBook.ConnectTo(xlApp.Workbooks.Add(NULL, 0));
xlBook.Sheets.Item[arr].QueryInterface(IID_Sheets,shs);
shs.Select(False,0);
end;

接受答案了.