1、计算机打开电子表格,然后输入要交换的数据。
2、打开电子表格后,按住Shift键并用鼠标左键单击单元格,将出现一个虚线的“我”形。然后用鼠标向上拖动单元格。
3、向上拖动单元格后,可以交换单元格。
4、向左和向右交换也一样,按住shift键并用鼠标拖动单元格。
假设A1是1,B1是2
变为A1=2,B1=1?
Sub 单元格互换()'A1,B1互换
Dim arr, brr
arr = [a1]
brr = [b1]
[a1] = brr
[b1] = arr
End Sub
复制到代码窗口
前提是 WPS需要支持宏代码
可以从网上下载EXCEL工具箱实现,