如何仅将单元格值复制到其他工作表中的另一个单元格

Question

为了绕过excel中的循环引用，我想在每次重新计算该值时将计算的值（仅该值）复制并粘贴到另一个工作表中的另一个单元格中。 我想只有VBA才有可能。不幸的是，我无法提出任何适合我的代码。 我很高兴有想法。 谢谢。

[已编辑] 我尝试的代码：

Sheets("Sheet1").Range("A1").MergeArea.Copy
Sheets("Sheet2").Range("B2").PasteSpecial xlPasteValues

Answer 1

将此代码粘贴到“ Sheet1”的代码窗口中

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = "$A$1" Then
        Sheets("Sheet2").Range("B2").Value = Target.Value
    End If
End Sub

只要在“ Sheet1”上进行了更改，该代码就会运行，并且只会将值（而非公式）放入“ Sheet2”上的单元格“ B2”中。