首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VBA >

如果获取一个sheet的最右上角的一格的行列地址?(那个格可能是个合并cell)

2013-02-17 
如果获取一个sheet的最右下角的一格的行列地址?(那个格可能是个合并cell)例如,我的表格的使用范围是从A1到

如果获取一个sheet的最右下角的一格的行列地址?(那个格可能是个合并cell)
例如,我的表格的使用范围是从A1到AD18。
照理来说最右下角的Cell是Cells(18,30)

可是因为最右下角的cell和别的cell合并了,从表格上点上去,显示的是R17。
我在代码里写sn = Cells(18,30),返回的是空白内容。


而且因为这样的表格有很多份,格式不太一定,有时候是S17,Q17都不一定。
但是能肯定的是,它是整个表格最右下角的一个格。


我想获得每个这样的表格的这样一个最右下角的cell的row和column值,要怎么写代码呢?

[解决办法]


Dim int_row, int_col As Integer
Dim result_value As String

int_row = Range("G9").MergeArea.Row
int_col = Range("G9").MergeArea.Column
result_value = Cells(int_row, int_col).Value

http://img.my.csdn.net/uploads/201301/24/1359012241_9846.png

热点排行