我新建了一个EXCEL的workbook,怎样修改其中一个表的表名？(100分)

我新建了一个EXCEL的workbook，默认里面有三个wooksheet,并用Excelworksheet得到第一个
excelapplication1.Connect;
excelapplication1.Workbooks.Add(null,0);
ExcelWorkbook1.ConnectTo(excelapplication1.Workbooks[1]);
ExcelWorksheet1.ConnectTo(excelworkbook1.Worksheets[1] as _Worksheet);
怎样修改其中这个表的表名
我不知用ExcelWorksheet1的哪个属性??

以下是在excel中录制的宏，楼主参考一下：

Sub Macro1()
'
' Macro1 Macro
' 宏由 Administrator 录制，时间: 2004-4-12
'

'
Range("B6").Select
ActiveCell.FormulaR1C1 = "5555"
Range("B7").Select
ActiveCell.FormulaR1C1 = "777"
Range("B8").Select
Sheets("Sheet1").Select
Sheets("Sheet1").Name = "ttttt"
Sheets("Sheet2").Select
Sheets("Sheet2").Name = "yyyy"
End Sub