以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- SaveExcel影响了其他表 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=140226) |
-- 作者:huangxueyao -- 发布时间:2019/9/1 10:09:00 -- SaveExcel影响了其他表 Dim k1 As String = "D:\\赠品活动模板\\赠品清单.xls" \'表的保存路径 Dim k2 As String = "一仓库存" \'表名 Dim k3 As String = "三仓库存" \'表名 Dim tb1 As Table = e.Form.controls("table1").Table Dim db1 As DataTable = tb1.DataTable Sel ect Case e.form.controls("ComboBox1").value Case "一仓" tb1.SaveExcel(k1, k2) Case "三仓" tb1.SaveExcel(k1, k3) End Sel ect 以上为代码,可以顺利执行,但是会把其他sheet的数据也修改了,什么情况?
|
-- 作者:huangxueyao -- 发布时间:2019/9/1 15:10:00 -- 很奇怪,测试了下,只有当我用了textjoin函数的时候才会出现我说的情况 |
-- 作者:huangxueyao -- 发布时间:2019/9/1 15:13:00 -- 是不是因为textjoin不兼容旧版本的excel? |
-- 作者:有点蓝 -- 发布时间:2019/9/1 21:19:00 -- 这个得问微软了。改为xlsx文件试试 |