excel表如何以B列为6节点在D列同行合并单元格并求C列同行的和

一键出结果，效果如上动态图：

代码文本如下：

Sub a按条件合并求和()

ApplicationScreenUpdating = False '//关闭屏幕刷新

ApplicationDisplayAlerts = False '//关闭系统提示

Dim arr(1 To 100, 1 To 1)

n = 1

m:

For i = n To [a65536]End(3)Row

  If Cells(i, 1) = 6 Then

      he = he + Cells(i, 2)

      k = i

      GoTo l

  Else

      he = he + Cells(i, 2)

  End If

Next

l:

Cells(n, 3) = he

he = 0

Range("c" & n & ":c" & k)Merge

n = k + 1

If n <= [a65536]End(3)Row Then GoTo m

ApplicationScreenUpdating = True '//恢复屏幕刷新

ApplicationDisplayAlerts = True '//恢复系统提示

End Sub

只要2个指针即可。

2个指针都从单链表头开始，一个以每次2个元素的速度进行遍历，另一个以每次1个元素的速度遍历，当一个到链表最后时，另一个指针指着的就是链表中间元素。时间复杂度为n。

以上就是关于excel表如何以B列为6节点在D列同行合并单元格并求C列同行的和全部的内容，包括:excel表如何以B列为6节点在D列同行合并单元格并求C列同行的和、怎样找出单链表的中间节点、等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！