主题：[分享] Excel查看器（20131014改）

如果只是查看，还是webbrowser好。

因为1、单元格的边框只有4边同时设置，所以Excel的边框反映不出来。

      2、字体过大之后，显示不出来，要调整行高。

     3、同一个单元格只能有一种字体格式，不能完全模仿Excel

我拿这个是想直接用表格定制数据行明细的浏览窗口，可以少用很多控件，界面也会为熟悉Excel界面的人所接受。

QQ在家是不用的，清净

明天上班去加。（密码和账号忘了，只有单位的电脑能上）

            Dim rng As C1.Win.C1FlexGrid.CellRange = tables(表名).Grid.GetCellRange(起始行, 起始列, 终止行, 终止列)
             tables(表名).Grid.MergedRanges.Add(rng)

1、有BUG告诉我好吗,我再改。

2、显示效果：因为单元格边框只能四边同时设定，而单元格只能有一种样式，不用绘制好像没有办法解决。

我这个，是国庆放假闲的没事做的，现在就没时间再玩了。

你说的那个目录树，应该就是狐爸的删选树和加载树，已经很完善了，没必要再做。

C1的方法和属性，用对象浏览器看看，就可以了。

我没有加判断

工作簿为空，会出错，你要先保存工作簿，或加上判断。

能否将出错的表发一份给我，数据你可以随意替换掉。

更新了，你再试试。