帮忙看一下一段简短的代码
Dim myapp As New Excel.Application()
Dim xlsbook1 As Excel.Workbook
xlsbook1 = myapp.Workbooks.Open("E:\2008.xls")
Dim xlssheet1 As Excel.Worksheet
xlssheet1 = xlsbook1.Sheets(1)
xlssheet1.Cells(1, 2) = "ok"
With xlssheet1
.Cells(1, 1) = "测试"
End With
xlsbook1.Save()
xlsbook1.Close()
xlsbook1 = Nothing
以上代码中
xlssheet1 的值是怎么输到xlsbook1 中的啊?
xlssheet1 = xlsbook1.Sheets(1) 后不需要 xlsbook1.Sheets(1)=xlssheet1
就能过去了?