- 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=41823)
-- 发布时间：2013/10/28 15:23:00
-- [求助]如何导入合并过的excel
各位大神求助啊，一个EXCEL表格，他是经过合并的，还有多重表头。如何导入到foxtable中，并且格式与原excel相同。坐等各位大神，表格已发附件，狐狸爸爸求给力。
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:2013-10-28 14-39-12_order.xls |
-- 发布时间：2013/10/28 15:25:00
--
在线等啊。
-- 发布时间：2013/10/28 15:27:00
--
你好,多层表头的表无法正常导入的哦.
-- 发布时间：2013/10/28 15:28:00
--
没有办法的哦，只能导入之后慢慢整理。
-- 发布时间：2013/10/28 15:39:00
--
狐狸爸爸，那不管多层表头，下面的合并单元格能导入，但一个订单只有第一行是显示的，其他行都是空白。能合并在一起吗？
-- 发布时间：2013/10/28 15:39:00
--
好忧伤啊。怎么办呢
-- 发布时间：2013/10/28 15:49:00
--
空的好办，导入之后，逐行扫描，如果某行的某列内容为空，则从上一行取值填入。
For i As Integer = 1 To Tables("表A").Rows.count - 1
If Tables("表A").Rows(i).Isnull("第三列") Then
Tables("表A").Rows(i)("第三列") = Tables("表A").Rows(i-1)("第三列")
End If
Next
记得从1开始，也就是第二行开始遍历。
-- 发布时间：2013/10/28 15:54:00
-- 回复：（狐狸爸爸）空的好办，导入之后，逐行扫描，如...
这个好，谢谢狐狸爸爸，我就是要等这个，我先去验证一下。
再问一下狐狸爸爸，这段代码放在那里。
[此贴子已经被作者于2013-10-28 15:55:21编辑过]
-- 发布时间：2013/10/28 16:35:00
--
狐狸爸爸，代码放在什么地方啊，求解释，新手小白，不懂。
-- 发布时间：2013/10/28 16:36:00
--
导入后，在命令窗口执行就行了，因为这是一次性的操作