Dim ip As New Importer - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → Dim ip As New Importer

共有4083人关注过本帖树形打印复制链接主题：Dim ip As New Importer

fvcfox

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：二尾狐帖子：571 积分：5432 威望：0 精华：0 注册：2020/5/7 13:05:00

Dim ip As New Importer 发帖心情

Post By：2022/1/14 11:05:00 [显示全部帖子]

使用导入表格的代码，如果电子表格有合并的单元格，在导入时会出错，要怎样防止出错

fvcfox

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：二尾狐帖子：571 积分：5432 威望：0 精华：0 注册：2020/5/7 13:05:00

Post By：2022/1/14 11:35:00 [显示全部帖子]

此主题相关图片如下：微信截图_20220114111726.png

是以上的出错

try

ip.Import()

Catch ex As Exception

MessageBox.Show("导入的表格有问题, 请尝试只保留有用的数据行, 将合计行等没用行删除后再导入")

Return

End Try

不起作用

[此贴子已经被作者于2022/1/14 11:38:51编辑过]

fvcfox

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：二尾狐帖子：571 积分：5432 威望：0 精华：0 注册：2020/5/7 13:05:00

Post By：2022/1/15 14:06:00 [显示全部帖子]

Dim Book As New XLS.Book("c:\test\订单.xls")
Dim Sheet As XLS.Sheet = Book.Sheets(0)
msgbox(Sheet.Rows.Count -1)

可以读取有效行，但msgbox(Sheet.cols.Count -1)并不是有效，而是255列，有办法读取有效列吗

fvcfox

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：二尾狐帖子：571 积分：5432 威望：0 精华：0 注册：2020/5/7 13:05:00

Post By：2022/1/15 16:17:00 [显示全部帖子]

怎样在生成的临时表

Dim dtb As New DataTableBuilder("统计")
dtb.AddDef("产品", GetType(String), 32)
dtb.AddDef("客户", GetType(String), 32)
dtb.AddDef("数量", GetType(Integer))
dtb.AddDef("金额", GetType(Double))
dtb.Build()
MainTable= Tables("统计")

的DataColChanged写代码

下一主题 >> << 上一主题

主题：Dim ip As New Importer