excel中，如何把不相邻的两行或两列数据迅速互换位置？

工具/材料：EXCEL表格

1.首先点击打开需百要编辑的EXCEL表格，如图，这是有两列数据。

2.然后用鼠标选择其中一列的全部数度据。

3.接着按住键盘上问的shift键，并将鼠标放到第一列数字的边框里，指针变成“移动答”的小图标。

4.然后点击鼠标左键，第一列的数字拖到到第二列数字右边的单元列版表里，拖动的时候，需要保持两列单元格格式一致权。

5.拖拽完之后，就看到EXCEL表格中两列互换了。

点击查看动画。

鼠标移到选中区域的左边或右边呈黑十字状时，按住SHIFT键，按动画操作

Sub change()
Dim a, b, c
'a,b为zd要交换的内行号，c为中间变量
a = 1 '为a赋值
b = 2 '为b赋值
Set sh1 = ThisWorkbook.ActiveSheet
For i = 1 To 30 '假设数容据为有1到30列
c = sh1.Cells(a, i).Value
sh1.Cells(a, i).Value = sh1.Cells(b, i).Value
sh1.Cells(b, i).Value = c
Next
Set c = Nothing
End Sub

将鼠标移至B列左框线上,待鼠标变成虚线的十字,按住ALT和Shift键,按住鼠标左键右移至D列位址,再相同方法将编号列左移至B列