| 发表于:2007-05-17 12:19:514楼 得分:5 |
有个表三行三列,合并了第一行第一列至第二行第二列,通过下列程序读出数据 sub macro1() dim ncol, nrow, i, j as long on error resume next with activedocument.tables(2) ncol = .columns.count nrow = .rows.count for i = 1 to nrow for j = 1 to ncol debug.print ( "第 " & i & "行第 " & j & "列有效,值为: " & .cell(i, j).range) next next end with end sub 然后再分析那些是合并的表格 | | |
|