excel表中,指定的单元格数字自动跳转到下一位数?
你这个问题,公式就不行了,得用VBA解决了。
如果你的Office版本是WPS个人免费版是用不了VBA的,只能要用微软的Office软件。
如果你的Office版本是微软Office2007或更高版本,并且你的工作簿格式是.xlsx的,请另存为.xlsm格式(启用宏的工作簿)。
记住,以后截图带上行号和列号,不然单元格的名称都叫不出来。
我用D4和G2给你示范一下:
第1步:按ALT+F11打开VBA编辑器。
第2步:在左侧双击对应的工作表名。
第3步:在右侧粘贴代码。
第4步:关闭VBA编辑器。
为了方便你复制,代码如下:
Dim x As Variant '声明一个模块级变量x
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address(0, 0) = "D4" Then '如果单击目标是D4单元格
x = Target.Value '把目标单元格的值记录到变量x中
End If
End Sub
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Address(0, 0) = "D4" Then '如果双击目标是D4单元格
x = Target.Value '把目标单元格的值记录到变量x中
End If
End Sub
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address(0, 0) = "D4" Then '如果变更目标是D4单元格
If Target.Value <> "" And Target.Value <> x Then '如果目标的值不是空值、且与之前的值不相等
Application.EnableEvents = False
Range("G2") = Val(Range("G2")) + 1 '那么把G2累加上1
Application.EnableEvents = True
End If
End If
End Sub
你这个问题可以考虑用VBA的用户窗体。不过有点小复杂,最好是即时交流才好办。