有5个格子需要输入日期，比较繁琐，想快点但不会写，求大神帮写下。假设A1到A5，5个格子，使用宏后弹出框，我写10-1，然后会自动在剩下4个格子递增填入10-2、10-3、10-4、10-5这样子。
Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
For i = 1 To 4
Target.Offset(i, 0) = Target + i
Next
Application.EnableEvents = True
End Sub追é®
Application.EnableEvents = False
For i = 1 To 4
Target.Offset(i, 0) = Target + i
Next
Application.EnableEvents = True
End Sub追é®
大ç¥ï¼ç¨ä¸äºåï¼åªééäºä¹ï¼
温馨提示：答案为网友推荐，仅供参考
第1个回答 2018-10-23
发你的文件来!
仔细看我百度
你这个下拉应该也能实现吧？
实际更加复杂？
仔细看我百度
你这个下拉应该也能实现吧？
实际更加复杂？
