Excel自动触发时间 Private Sub Worksheet_SelectionChange(ByVal Target As Range) col_num = ActiveCell.Column row_num = ActiveCell.Row Cells(row_num, 1) = DateEnd Sub