如何在Excel中按值自动对列进行排序？

网友投稿 244 2023-12-11

如何在Excel中按值自动对列进行排序？

例如，您有一个如下图所示的采购表。现在您希望在此列中输入新数字/价格时自动对价格列进行排序，您该如何解决？在这里，我介绍一个 VBA 宏来帮助您在 Excel 中按值自动对特定列进行排序。

使用VBA按值自动对列进行排序

使用VBA按值自动对列进行排序

一旦您在Excel中输入新数据或更改列中的值，此VBA宏就会自动对特定列中的所有数据进行排序。

1。右键单击当前工作表名称 工作表标签栏，然后单击 查看代码

从右键单击菜单中。

。在打开的Microsoft Visual Basic for Application对话框中，将以下VBA宏代码粘贴到打开的窗口中。

VBA：Excel中的自动排序列

Private Sub Worksheet_Change(ByVal Target As Range) On Error Resume Next If Not Intersect(Target, Range("B:B")) Is Nothing Then Range("B1").Sort Key1:=Range("B2"), _ Order1:=xlAscending, Header:=xlYes, _ OrderCustom:=1, MatchCase:=False, _ Orientation:=xlTopToBottom End If End Sub

Copy

备注

1）在上面的vba代码中， B：B 意味着它将自动对B列进行排序， B1 是 B 列中的第一个单元格， B2

是 B 列中的第二个单元格，您可以根据需要更改它们。

2) 片段标头：=xl是在第 5 行告诉 Excel 您将排序的范围有一个标题，以便在排序时不包括该范围的第一行。如果没有标题，请将其更改为标题：=xlNo; 和改变键1：=范围（“B2”）在第 4 行键1：=范围（“B1”）.

。然后返回工作表，当您在“价格”列中输入新数字或修改任何现有价格时，“价格”列将自动按升序排序。

备注：当您在价格列中输入新数字时，您必须在原始数字下方的第一个空白单元格中输入数字。如果新输入的数字与原数字之间有空白单元格，以及原数字之间有空白单元格，则该列不会自动排序。

演示：使用Excel中的VBA自动按值对列进行排序

Kutools for Excel 包括适用于Excel的300多种便捷工具，可以在30天之内免费试用。 立即下载并免费试用!

在Excel中轻松按出现频率排序

Kutools for Excels 高级排序 该实用程序支持在Excel中按文本长度，姓氏，绝对值，频率等对数据进行快速排序。

全功能免费试用 30-天！

最佳办公生产力工具

将小时转化为分钟 Kutools for Excel!

准备好增强您的 Excel 任务了吗？利用的力量 Kutools for Excel - 您终极的节省时间的工具。简化复杂的任务并像专业人士一样浏览数据。以闪电般的速度体验 Excel！

为什么需要 Kutools for Excel

🛠️ 超过 300 项强大功能: Kutools 包含 300 多项高级功能，可简化您在 1500 多种场景中的工作。

📈 卓越的数据处理能力：合并单元格、删除重复项并执行高级数据转换 - 所有这些都不费吹灰之力！