遍历表格中所有单元格，当表格中有合并单元格时出错

收藏 · 2014-12-19 15:07 上传

遍历表格中所有单元格，当表格中有合并单元格时出错
语言vb6.0
         列数 = TXTextControl1.TableColumns(TablesID)
         行数 = TXTextControl1.TableRows(TablesID)
         For 行 = 1 To 行数
         For 列 = 1 To 列数
         cell_txt = TXTextControl1.TableCellText(TablesID, 行,列)   ‘出错

                     TXTextControl1.TableCellText(TablesID, 行,列)="abc" '没问题

         Next
         Next

表中有合并单元格时就出错，原因很简单，合并列数以后，(TablesID, 行,列)可能不存在
版主怎么解决？
核心就是怎么遍历有合并单元的表格每一cell 读出每个cell中的内容，好像写内容没问题，但是读就出错了

无标题.png

下面表格出错

Alice · Alice

回复 1楼star_sur的帖子

根据文档，该接口可用。
目前正在重现该问题当中，如果有进展或是解决方案会给你反馈。

Alice · Alice

回复 1楼star_sur的帖子

在ActiveX平台下重现该问题的Demo如下：

txControl.zip (2.57 KB, 下载次数: 643)

star_sur · star_sur

通过判断如果是合并单元格，只取可见的单元格的这个值，这样子绕过去

能不能给段代码？

Alice · Alice

回复 4楼star_sur的帖子

合并的单元格是已知的。
加个判断条件，判断row和column的值，不是这个已知的row，column的时候，获取值。

star_sur · star_sur

你说的情况适合于本软件进行的合并，如果是第三方软件生成的word文件，本软件打开呢？你就判断不出row和column对吧

Alice · Alice

回复 6楼star_sur的帖子

是的。
目前是无法判断单元格是否合并。

		自动登录	找回密码
密码			立即注册

[保留处理] 遍历表格中所有单元格，当表格中有合并单元格时出错

6 个回复

活字格认证

微信认证勋章

元老葡萄