然後用vb控制excel,類似的代碼如下
dimxlsApp?作為?對象,?xlsWbas?對象?,xlsWorksheet?作為?目標
設置?xls app = createobject(" excel . application ")?創建excel.application對象。
Xlsapp.visible=true '顯示excel?主接口
xls app . workbooks . Open(" C C:\ 1 . xls ")' Open C:1 . xls。
設置?xls WB = xls app . workbooks(" 1 . xls ")?設置xlswb變量?參考1.xls?詞典
設置?Xlsworksheet = xlswb。工作表(1)'設置xls工作表變量引用1.xls?工作簿中的第壹張工作表。
msgbox?Xlsworksheet.cells (1,1)'顯示單元格a1的內容。
Xlsapp.quit()'關閉excel。