自动分拣为您输入日期使用VBA在Microsoft Excel 2010
在本文中,您将学习如何在工作表中输入内容时自动对日期进行排序。
问)我有一个电子表格,每天都会用新的日期条目进行更新。我想按最新日期对行进行排序(日期在C列中),并且每当我在底部添加新日期时,我希望它在输入后自动自动排序到列表中。是否有捷径可寻?
让我们举个例子:
以下是我们拥有的数据的图片
以下是我们希望在输入信息时看到的结果的快照。
单击“开发人员”选项卡。从“代码”组中,选择“ Visual Basic”
在工作表中输入以下代码。 (在我们的示例中为sheet1)
私人子Worksheet_Change(按目标的ByVal目标)
关于错误继续Next
Range(“ A1”)。Sort Key1:= Range(“ C2”),_
Order1:= xl升序,标头:= xl是,_
| === OrderCustom:= 1,MatchCase:= False,_
方向:= xlTopToBottom
结束子
这样,您可以在输入信息后轻松按“日期”列对数据进行排序。这将节省我们执行手动数据排序步骤的时间。