- 二少工作需要在VBA中获取
合并单元格
的地址范围, 于是有了此方法,作此记录
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Range("A1").MergeCells Then
realadd = Range("A1").MergeArea.Address '取合并单元格的真实地址范围
End If
If Target.Address = realadd Then '直接使用A1会无法响应下面的代码
msgbox "A1真实的地址范围是:" & realadd
End If
End Sub