excel - 日期更改时的增量

Question

再会，

我有一个小问题。我有两个单元格：

B35 是带有 mmm-yy 的日期单元格，B37 是没有小数位的数字。

我想要一个公式，当日期更改时 B37 加 1，即 B35：Mar-13 B37：4 当 B35 输入为 Apr-13 时，然后 B37 自动更改为 5。

我希望我能够清楚地解决我的问题。谢谢你。

Answer 1

我想我已经想通了。

Private Sub Worksheet_Change(ByVal Target As Range)
   If Not Intersect(Target, Range("B35")) Is Nothing Then
      Application.EnableEvents = False
      Range("B37").Value = Range("B37").Value + 1
      Application.EnableEvents = True
   End If
End Sub

谢谢你