日期变化时的增量编号

Question

美好的一天，

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

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

我将由1喜欢递增B37公式当过的时间的变化，即 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 

谢谢