[已解决]合并单元格中的offset属性

雄鹰2013

在附件中可以看到，列偏移量是正数时，取合并单元格同行的任意位置得出的结果是一致的。但是如果是负数时，结果是不同的，这是为什么呢？

最佳答案

月排行榜 / 总排行榜

yyyydddd8888

2014-1-7 10:53

要想得到合并单元格的正确偏移的单元格地址，应该单元格后面加上  .mergearea
range(合并单元格中的任意一个单元格）.mergearea.offset()

合并单元格offset属性.rar (7.43 KB, 下载次数: 14)

2014-1-7 10:59 上传

点击文件名下载附件

1. ' MsgBox Range("E4").MergeArea.Offset(0, 3).Address(0, 0)
   
2. 'MsgBox Range("G4").mergearea.Offset(0, 3).Address(0, 0)
   
3. MsgBox Range("g5").MergeArea.Offset(0, -3).Address(0, 0)
   
4. 'MsgBox Range("G4").mergearea.Offset(0, -3).Address(0, 0)
   
5. End Sub
   

复制代码

跳转到最佳答案楼层

hwc2ycy

你说的这个，我以前只注意过正偏移，负偏移今天学习了。

yyyydddd8888

要想得到合并单元格的正确偏移的单元格地址，应该单元格后面加上  .mergearea
range(合并单元格中的任意一个单元格）.mergearea.offset()

合并单元格offset属性.rar (7.43 KB, 下载次数: 14)

2014-1-7 10:59 上传

点击文件名下载附件

1. ' MsgBox Range("E4").MergeArea.Offset(0, 3).Address(0, 0)
   
2. 'MsgBox Range("G4").mergearea.Offset(0, 3).Address(0, 0)
   
3. MsgBox Range("g5").MergeArea.Offset(0, -3).Address(0, 0)
   
4. 'MsgBox Range("G4").mergearea.Offset(0, -3).Address(0, 0)
   
5. End Sub
   

复制代码