在本文中,您将学习如何在工作表中输入内容时自动对日期进行排序。

问)我有一个电子表格,每天都会用新的日期条目进行更新。我想按最新日期对行进行排序(日期在C列中),并且每当我在底部添加新日期时,我希望它在输入后自动自动排序到列表中。是否有捷径可寻?

让我们举个例子:

以下是我们拥有的数据的图片

img1

以下是我们希望在输入信息时看到的结果的快照。

img2

单击“开发人员”选项卡。从“代码”组中,选择“ Visual Basic”

img3

在工作表中输入以下代码。 (在我们的示例中为sheet1)

私人子Worksheet_Change(按目标的ByVal目标)

关于错误继续Next

Range(“ A1”)。Sort Key1:= Range(“ C2”),_

Order1:= xl升序,标头:= xl是,_

| === OrderCustom:= 1,MatchCase:= False,_

方向:= xlTopToBottom

结束子

img4

这样,您可以在输入信息后轻松按“日期”列对数据进行排序。这将节省我们执行手动数据排序步骤的时间。