以文本方式查看主题 -  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp) --  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2) ----  异常来自 HRESULT:0x800A03EC  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=147767)

--  作者：newsun2k --  发布时间：2020/3/23 18:06:00 --  异常来自 HRESULT:0x800A03EC Dim App As New MSExcel.Application Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open(strFileName) Dim xlsSheet As MSExcel.WorkSheet = Wb.WorkSheets(1) xlsSheet.cells(Index, 0) = Index - 1                                             //执行到此的时候，报错。异常来自 HRESULT:0x800A03EC                                                                                                   //xlsSheet.cells(Index, 0).value = Index - 1  也试过 何解？

--  作者：有点蓝 --  发布时间：2020/3/23 20:20:00 --   vba的下标从1开始 xlsSheet.cells(Index, 1).value = Index - 1