delphi 操作Excelsheet有关问题

delphi 操作Excelsheet问题
如何   实现   Excel   宏中
Sheets( "Sheet2 ").Move   After:=Sheets(3)  
如此的     sheet移动   操作

[解决办法]
ExcelApp.WorkSheets[2].Activate = true
或
ExcelApp.WorksSheets[ 'Sheet2 ' ].Activate =true
[解决办法]
看一看OFFICE的VBA是不是支持，如果支持就可以做