日期变化时的增量编号
问题描述:
美好的一天,日期变化时的增量编号
我有一个小问题。我有两个单元格:
B35是带mmm-yy的日期单元格 和 B37是没有小数位的数字。
我将由1喜欢递增B37公式当过的时间的变化,即 B35:MAR-13 B37:4 当B35被输入作为APR-13,然后B37的变化为5自动。
我希望我能够清楚地说明我的问题。 谢谢。
答
我想我已经想通了。
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
谢谢
你需要VBA在'worksheet_changes'事件。 http://msdn.microsoft.com/en-us/library/office/ff839775.aspx – glh 2013-04-24 12:13:41