当excel日期列的日期改变时，可以自动调整改变日期的排列顺序

Question

当excel日期列的日期改变时，可以自动调整改变日期的排列顺序
重点是不需要每次都手动点“排序按钮”
如图：

Answer 1

在左侧工程管理器窗口中双击你需要运行的工作表名称sheet1(..),在代码窗口中上方下拉列表中选择：通用选为：worksheet;右侧改为change
粘贴以下代码：
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)

If Target.Column < 3 Then
Range("A2").Select
Range("A1:B65536").Sort Key1:=Range("A2"), Order1:=xlAscending, Header:=xlGuess

Columns("A:B").Select
Selection.Sort Key1:=Range("A1"), Order1:=xlAscending, Key2:=Range("B1") _
, Order2:=xlAscending, Header:=xlGuess, OrderCustom:=1, MatchCase:= _
False, Orientation:=xlTopToBottom, SortMethod:=xlPinYin, DataOption1:= _
xlSortNormal, DataOption2:=xlSortNormal
End If
End Sub

Answer 2

每次都手动

否则用VBA编代码本回答被提问者和网友采纳