Excel 如何自动增加单元格的输入值
我想要的是自动增加输入的单元格值 假设我在单元格中输入了3,但我希望它自动递增50,新值为53Excel 如何自动增加单元格的输入值,excel,automation,vba,Excel,Automation,Vba,我想要的是自动增加输入的单元格值 假设我在单元格中输入了3,但我希望它自动递增50,新值为53 你知道我该怎么做吗?这只是cellB9的一个例子。在工作表代码区域安装以下宏: 我看到了@Gary的学生答案,值得考虑。我只是描述另一种方法。选择远离工作区域的区域。说R2:R100,然后用工作表填充系列函数以所需的增量填充它。 您的R2…R5单元格将有7、14、21等值。现在在单元格A2中使用=Row()+R2,并根据您的要求填写。你的A2,A3,A4。。。现在的值为9,17,24。。。。您可以隐藏
你知道我该怎么做吗?这只是cellB9的一个例子。在工作表代码区域安装以下宏:
我看到了@Gary的学生答案,值得考虑。我只是描述另一种方法。选择远离工作区域的区域。说
R2:R100
,然后用工作表填充系列函数以所需的增量填充它。
您的R2…R5单元格将有7、14、21等值。现在在单元格A2中使用
=Row()+R2
,并根据您的要求填写。你的A2,A3,A4。。。现在的值为9,17,24。。。。您可以隐藏R列,使其不可见。一个单元格或多个单元格???@Gary的学生谢谢您的vba代码工作正常谢谢:)
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Intersect(Target, Range("B9")) Is Nothing Then Exit Sub
If IsNumeric(Target.Value) Then
Application.EnableEvents = False
Target.Value = Target.Value + 50
Application.EnableEvents = True
End If
End Sub