Excel通過按鈕一鍵控制整列數據向左（右）移動

在處理數據過程中，經常會碰到需要將整列數據左右移動位置（或者整行數據上下移動位置），本教程就是教大家如何通過按鈕快速實現整列（或整行）數據快速移動位置。教程以整列移動為例，整行數據的操作方法類似。

操作方法

（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列的位置。

特別提示

整行數據上下移動的方法與此類似，如果您感興趣，不妨自己嘗試以下。

如果對您有點幫助，請支持一下，謝謝！