在Excel中输入或更改日期后，如何自动对日期进行排序？

在Excel中输入或更改日期后，如何自动对日期进行排序？ 

在Excel中， 排序 函数可以帮助您根据需要以升序或降序对日期进行排序。 但这不是动态的，如果您对日期进行了排序，然后向其添加了新日期，则需要再次对其进行排序。 在工作表中每次输入新日期时，是否有任何好的快速方法可以自动对日期进行排序？

使用公式输入或更改日期时自动排序日期

使用VBA代码输入或更改日期时自动排序日期

例如，A列中的原始日期，以下公式可帮助您根据要排序的列自动对新助手列中的日期或任何其他文本字符串进行排序，请执行以下操作：

1。 输入以下公式：

=INDEX($A$2:$A$15,MATCH(ROWS($A$2:A2),COUNTIF($A$2:$A$15,"<="&$A$2:$A$15),0)) 放入日期列旁边的空白单元格中， C2，例如，然后按 Ctrl + Shift + Enter 键，您将获得一个数字序列，然后将填充手柄向下拖动到要使用的单元格，请参见屏幕截图：

备注：在上式中： A2：A15 是您要自动排序的原始日期范围。

2. 然后通过单击将数字格式化为日期格式 短期约会 来自 总 下的下拉列表 首页 标签，请参见屏幕截图：

3。 然后，序列号已转换为日期格式，并且原始日期也已排序，请参见屏幕截图：

4。 从现在开始，当您输入新日期或更改A列中的日期时，C列中的日期将自动按升序排序，请参见屏幕截图：

当您输入新日期或根据需要更改日期时，以下VBA代码可以帮助您自动对原始列中的日期进行排序。

1。 输入或更改日期时，转到要自动对日期进行排序的工作表。

2。 右键单击工作表标签，然后选择 查看代码 从上下文菜单中，弹出 Microsoft Visual Basic应用程序 窗口，请复制以下代码并将其粘贴到空白处 模块 窗口，请参见屏幕截图：

VBA代码：输入或更改日期时自动排序：

备注：在上面的代码中，输入的日期将在A列中自动排序，您可以更改 A1 和 A2 放到自己需要的单元格中。

3。 从现在开始，当您在A列中输入日期时，该日期将自动升序排序。