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

网友投稿 172 2023-12-11

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

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

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

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

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

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

从右键单击菜单中。

2

。 在打开的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

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

备注

:

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

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

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

3

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

备注:当您在价格列中输入新数字时,您必须在原始数字下方的第一个空白单元格中输入数字。 如果新输入的数字与原数字之间有空白单元格,以及原数字之间有空白单元格,则该列不会自动排序。
演示:使用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 多种场景中的工作。

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

⏱️  高效的批量操作:当你可以聪明地工作时,为什么还要付出额外的努力呢? 轻松批量导入、导出、组合和调整数据。

📊  可定制的图表和报告:访问各种附加图表并生成富有洞察力的报告。

🗄️  强大的导航窗格:通过强大的列管理器、工作表管理器和自定义收藏夹获得优势。

📝  七种类型的下拉列表:通过各种功能和类型的下拉列表使数据输入变得轻而易举。

🎓  用户友好:对于初学者来说轻而易举,对于专家来说是一个强大的工具。

立即下载,与 Excel 一起穿越时空!

阅读更多 免费下载... 采购... 
Office Tab 为 Office 带来选项卡式界面,让您的工作更轻松
在Word,Excel,PowerPoint中启用选项卡式编辑和阅读,发布者,Access,Visio和Project。 在同一窗口的新选项卡中而不是在新窗口中打开并创建多个文档。 每天将您的工作效率提高50%,并减少数百次鼠标单击!
阅读更多 免费下载... 采购... 

版权声明:本文内容由网络用户投稿,版权归原作者所有,本站不拥有其著作权,亦不承担相应法律责任。如果您发现本站中有涉嫌抄袭或描述失实的内容,请联系我们jiasou666@gmail.com 处理,核实后本网站将在24小时内删除侵权内容。

上一篇:在Excel中选择文本框时如何自动选择文本?
下一篇:如何在Google表格中按字母顺序自动对数据排序?
相关文章