在 Excel 中交换单元格内容？

Question

有没有一种简单的方法可以在 Microsoft Excel 中交换两个单元格的内容？

简单，我的意思是键盘快捷键或菜单项，不涉及复制到临时单元格或编写 VBA 脚本或类似的东西。换句话说，我正在寻找一种方法来只选择两个单元格并单击某个菜单项或按某个组合键来交换它们的内容。当然，必须有办法做到这一点？

Answer 1

来自：http : //www.extendoffice.com/documents/excel/860-excel-swap-contents-of-two-cells.html

有时，需要交换两个相邻的单元格。我们可以轻松地手动完成。看下面的截图，我想交换A4和B4单元格，请按如下操作：

1. 选择要交换的单元格。在本例中，选择单元格 A4。

2. 按Shift键，将光标置于右边框。

3. 然后将光标拖动到单元格 B4 的右边框。

4. 当显示“？”时，松开鼠标。

5. 并且两个单元格内容已经交换。

使用这种方法，我们还可以交换两个相邻的行或列。

Answer 2

对于相邻相同大小的矩形范围的特定情况，您可以使用this answer to a similar question中描述的方法。

1. 选择右侧或底部范围
2. 按Ctrl+X
3. 选择相邻范围（即，正上方或左侧）
4. 按Ctrl+ +（+通常在=键上方，所以这会转换为Ctrl+ Shift+ =）

请注意，您可以使用相同的过程来交换整个相邻的行或列。

Answer 3

简单，我的意思是键盘快捷键或菜单项，不涉及复制到临时单元格或编写 VBA 脚本或类似的东西。我正在寻找一种方法来只选择两个单元格并单击某个菜单项或按某个组合键来交换它们的内容。

为什么要施加这个限制？创建宏使这变得微不足道。据我所知，它不能以任何其他方式完成。您可以将宏分配给按钮或热键。

Sub Swap()     
    If Selection.Count <> 2 Then     
         MsgBox "Select 2 cells (only) to swap."     
         Exit Sub     
    End If     
    Set trange = Selection     
    If trange.Areas.Count = 2 Then     
         temp = trange.Areas(2)     
         trange.Areas(2) = trange.Areas(1)     
         trange.Areas(1) = temp     
    Else     
         temp = trange(1)     
         trange(1) = trange(2)     
         trange(2) = temp     
    End If     
End Sub     

Answer 4

不可以。如果不编写自己的宏，就无法在 Excel 中交换两个单元格的内容。

编辑：听起来现在可能有一种简单的方法可以在较新版本的 Excel 中交换单元格内容，所以这个答案现在可能已经过时了。