15问答网 > excel中，A1有数66的条件下。点击单元格B1后B1返回67，点击C1后C1返回68，以此类推。。如何实现？

excel中，A1有数66的条件下。点击单元格B1后B1返回67，点击C1后C1返回68，以此类推。。如何实现？

2024-12-01 20:28:22

推荐回答（3个）

回答1：

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If VBA.IsNumeric(Cells(Target.Row, 1).Value) And Target.Count = 1 Then '条件：第1列的值是字符且只选中一个单元格
Target.Value = Cells(Target.Row, 1) + Target.Column - 1 ‘选中单元格的值等于该选中单元格所在行的第1列的值加上选中单元格所在列的值再减去1
End If
End Sub

还可以通过对选中单元格的行号和列号的大小进行判断，对你选择区域进行限制，即在某些范围内选中的单元格才会按要求填充。

回答2：

弄个递进公式就行了，或者用鼠标拉

回答3：

b1
=if($a1=66,a1+1,"")
右拉公式即可