主题：急！求助，excel取消合并后，如何保留原来数据？

用代码取消excel表合并后，原单元格数据只能显示在拆分的其中一个单元格内，如何实现所有拆分的单元格都显示原来数据

用代码合并的单元格,取消合并后,恢复原状

不是恢复原状，为便于导入foxtable，要求拆分后每个单元格保留原数据

没办法，只能在excel里处理

 

http://jingyan.baidu.com/article/b7001fe19422f50e7282dd0c.html

 

http://www.ittribalwo.com/article/1506.html

 

网上有代码实现，但不知怎么转换为狐表格式，望大神们倾力研究，这对解决狐表导入excel表问题有重大意义

什么情况下的？要做什么功能？

 

做例子发上来

比如，把存在合并单元格数据的excel表导入狐表就无法得到我们想要的结果，还要事先手工调节excel再导入,太麻烦了，如果这个问题解决了，狐表导入excel就更上一层楼了，比如处理ecxel多层表头的问题,就可以做到一键导入狐表中实现多层表头的生成 ，还望大神们帮忙解决。

我做了个导入excel表的例子，主要是针对存在多层表头的excel表, 想实现导入foxtable后自动生成多层表头，但就差这一步无法解决，例子发给大家，帮忙完善一下。

例子发上来

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:导入excel表.rar

参考代码

 

Dim Book As New XLS.Book("d:\test.xls")
Dim Sheet As XLS.Sheet = Book.Sheets(0)
sheet.ClearMergedCells
Dim level As Integer = 2
Dim ary(level-1) As String
For i As Integer = 0 To sheet.Cols.count - 1
    For j As Integer = 0 To level-1
        If sheet(j,i).text > "" Then
            ary(j) = sheet(j,i).Text
        End If
    Next
    output.show(String.Join("_",ary))
Next