发布网友 发布时间:2022-04-21 20:02
共2个回答
热心网友 时间:2023-12-07 10:21
在 VBA 把下列代码粘贴到某一个工作表的 代码窗口内(如Sheet1)
这段代码只对在 A1 单元起作用
Public total
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address <> "$A$1" Then
total = total + Cells(1, 1)
Cells(1, 1) = total
Cells(1, 1).Select
End If
End Sub
热心网友 时间:2023-12-07 10:22
不能实现,公式循环