在处理数据过程中，经常会碰到需要将整列数据左右移动位置（或者整行数据上下移动位置），本教程就是教大家如何通过按钮快速实现整列（或整行）数据快速移动位置。教程以整列移动为例，整行数据的操作方法类似。
操作方法
（01）本教程以图中数据为例，就是单元格内容为2的列数，即B列。
（02）插入ActiveX按钮控件，如果您找不到命令，可以参考以下链接：
（03）设置按钮格式，本教程编辑文字为“整列向右移动一格”。
（04）给按钮指定需要实习右移功能的代码，点击右边的“新建”按钮，进入VBA窗口。
（05）在模块中Sub 按钮1_Click() 和End Sub之间输入整列右移代码：Dim i%Dim j%i = = mnCells(i, j)ct '选择需要移动的列 ‘剪切需要移动的列Cells(i, j + 2)ct ’选择需要插入的位置rt Shift:=xlToRight ‘插入已剪切列Cells(i, j + 1)ct ’光标返回源数据
（06）返回Excel窗口，同理制作一个 “整列左移一格” 按钮。
（07）给“整列左移一格” 按钮指定代码如下：Dim i%Dim j%i = = mnCells(i, j)ells(i, j - 1)rt Shift:=xlToRight
（08）回到Excel界面，将光标放在需要移动列的任意一个单元格（或者列中的任意区域，或者选择整列），然后点击移动按钮即可，本教程以B列右移一格为例：先选中B13，然后点击右移按钮，效果如图所示，B列整体移到了原来C列的位置。
特别提示
整行数据上下移动的方法与此类似，如果您感兴趣，不妨自己尝试以下。
如果对您有点帮助，请支持一下，谢谢！
