我有一个工作表,其中有第4行中列的标题。我有一个代码,当我双击第4行中的一个单元格时,它会根据该单元格对数据进行排序。我现在遇到的问题是,在B列中,单元格与下面的行合并。因此,例如,第4行和第5行被合并,第6行和第7行等等。由于这些合并的单元格,我的代码将不再允许我排序。有人能帮忙吗?Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
lc = Cells(4,
下面是我的代码: Dim iRow As Long Set ws = Worksheets("Summary") 'find first empty row in database
Set rngNullString = Intersect(ws.Columns("B"), ws.Columns("