盗版玩家 知乎:EXCEL不能读取文件

来源:百度文库 编辑:中科新闻网 时间:2024/04/16 14:23:21

DimxlsAppAsObject
DimxlsWbAsObject
DimxlsWsAsObject
SetxlsApp=CreateObject("Excel.Application")
SetxlsWb=xlsApp.Workbooks.Open(FileName)'要打开的文档路径
SetxlsWs=xlsWb.Worksheets(1)
xlsWs.cells(1,1)="哇哈哈"'(行,列),注意:行和列都可用数字表示(1,A)等同于(1,1)

----注意了,下面是补充部分的回答-----
xlsWs.cells(1,1)就是你要读取的数据啊,msgboxxlsWs.cells(1,1)看看
关闭文档:xlsWb.Close
退出Excel:xlsapp.Quit

I don`t no