- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 合并excel数据 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=162927)
-- 发布时间：2021/4/17 14:45:00
-- 合并excel数据
我用帮助里的合并数据方式合并，发现当有逻辑列的时候，会报错。
此主题相关图片如下：捕获.png
此主题相关图片如下：捕获.png
-- 发布时间：2021/4/17 16:21:00
--
For n As Integer = 1 To Sheet.Rows.Count -1
Dim r As Row = Tables("订单").AddNew()
For m As Integer = 0 To nms.Length - 1
if Tables("订单").cols(nms(m)).IsBoolean
r(nms(m)) = IIF(Sheet(n,m).text = "0",false,true)
else
r(nms(m)) = Sheet(n,m).Value
end if
Next
Next
Next
Next