小兔网

本示例教您如何Excel VBA中交换两个值稍后我们将在更复杂的程序中经常需要此结构。

情况:

您的工作表上的两个值。

在Excel VBA中交换值

在您的工作表上放置一个命令按钮,并添加以下代码行:

1.首先,我们声明一个名为temp的Double类型变量

昏暗的温度随着 

2.我们使用单元格A1的值初始化变量temp。

temp = Range(“ A1”)。Value

3.现在我们可以安全地将单元格B1的值写入单元格A1(我们已将单元格A1的值存储到temp,这样我们就不会丢失它)。

Range(“ A1”)。Value = Range(“ B1”)。Value

4.最后,我们将单元格A1的值(写入temp)写入单元格B1。

Range(“ B1”)。Value = temp

5.单击命令按钮两次。

结果:

交换价值结果

交换价值结果