excel中经常需要移动一整列,比如向左移动一列,通常的方法是插入一列空列,然后将想要移动的列复制过去,非常的麻烦,现在就要做一个简单的方法,一键移动列。具体的方法需要用到vb,不过代码我都给出来了,需要的直接复制过去就可以了,你也不必懂代码,可以直接使用,方法如下:

1、在菜单栏上面点击【 开发工具 】选项,在该选项下,我们点击【 宏 】按钮,打开宏对话框。 

2、打开了宏对话框,我们填写宏名为【 向左移动一列 】,然后点击【 创建 】按钮。

3、打开了宏编辑器,在这个模块里,我们输入如下代码,然后点击关闭。代码如下:

Sub 向左移动一列()

Application.ScreenUpdating = False

x = Selection.Column

If x >= 1 Then

Columns(x).Cut

Columns(x - 1).Insert

Application.ScreenUpdating = True

End If

End Sub

4、接着再次在菜单栏上执行:开发工具--宏

5、在宏对话框中,输入宏名为【 向右移动一列 】,然后点击创建

6、输入如下代码,然后点击关闭按钮。代码如下:

Sub 向右移动一列()

Application.ScreenUpdating = False

x = Selection.Column

If x< 256 Then

Columns(x).Cut

Columns(x + 2).Insert

End If

Application.ScreenUpdating = True

End Sub

7、返回到了vb编辑器,关闭它就可以返回到excel

8、在excel中,我们点击想要移动的这一列的列头,也就是图示中的字母E的位置,这样就选中了整个列

9、接着我们点击菜单栏上面的:开发工具--宏

10、点击【 向左移动一列 】,选中这个宏,然后点击【 执行 】。

11、我们看到这一列已经移动了,这就是效果图:

12、如果你想要移动的方向是向右移动一列,你就要选择另一个宏了。