VBA如何将一列数据颠倒顺序

1、首先，打开一个含有数据的Excel表格，如下图示。

2、按下Alt+F11，在打开的新界面左上角，双击数据所在的工作表，出现代码编辑区，如下图所示。

3、输入代码：Sub 鱼木混猪()For i = 1 To Int(8 / 2)a = Range("B" & i)Range("B" & i) = Range("B" & 9 - i)Range("B" & 9 - i) = aNextEnd Sub代码作用是将前B列中1-8行数据颠倒顺序，如下图所示。

4、鼠标点击代码中的任意位置，然后点击“运行子程序”按钮，如下图所示。

5、返回Excel，就能看到B列中的数据颠倒了顺序，如下图所示。