在本文中,您将学习如何使用VBA代码对数据进行排序。

数据排序是一项日常活动,必须执行以使数据更易于理解。

[.underline]#让我们举个例子:#我们有销售报告,我们需要按销售数字

img1

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

img2

单击插入,然后单击模块

img3

这将创建一个新模块。

在模块

中输入以下代码===子Sortdata_ascending()

Sheets(1).Range(“ a1:b”&Range(“ a1”)。End(xlDown).Row)。排序_

key1:= Sheets(1).Range(“ b:b”),order1:= xlAscending,标题:= xlYes

结束子

img4

按ALT + F8快捷键打开“宏”窗口,然后选择宏。

img5

或者,您可以按F5键在VBA屏幕中运行代码。

上面的代码将按Sales值对数据进行升序排序。

img6

要按Sales值对数据进行降序排序(最高的Sales将在顶部列出,然后下降),我们将使用以下VBA代码:

子Sortdata_descending()

Sheets(1).Range(“ a1:b”&Range(“ a1”)。End(xlDown).Row)。排序_

key1:= Sheets(1).Range(“ b:b”),order1:= xlDescending,标题:= xlYes

结束子

执行宏后,我们将得到以下结果(从最大到最小的销售额)

img7

这样,您可以使用VBA代码轻松地对数据进行排序。