| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]写入excel表问提 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=107502) |
| -- 作者：yjh2002 -- 发布时间：2017/9/29 10:42:00 -- [求助]写入excel表问提 Dim Book As New XLS.Book(lj) \'定义一个Excel工作簿 Dim Sheet As XLS.Sheet = Book.Sheets(0) \'引用工作簿的第一个工作表 For Each r As Row In Tables("抓取数据_table1").Rows sheet(r("bh"),6).value=r("qz") Next book.Save(lj) 这段代码有时候正常，有时候会出现“流不允许写入”这样的错误，请教这是什么原因？
|
| -- 作者：有点甜 -- 发布时间：2017/9/29 10:44:00 -- 1、卸载重装你的ms office软件；
2、路径所在的文件夹，你没有写入的权限，你要设置权限。 |
| -- 作者：yjh2002 -- 发布时间：2017/9/29 10:46:00 -- 谢谢 |