VB更改EXCEL單元格內容

''更改c:
.xls中sheet1 E2內容修改為1020 

''先點擊 工程－引用Microsoft Excel... 
Private Sub Command1_Click() 
Dim xlapp As Excel.Application 
Dim xlbook As Excel.Workbook 
Dim xlsheet As Excel.Worksheet 
Set xlapp = CreateObject("Excel.application") 
Set xlbook = xlapp.Workbooks.Open("c:
.xls") 
Set xlsheet = xlbook.Worksheets("sheet1"