excel - 将公式从 1 个工作表简单复制到另一个工作表，而不会出现 #ref 错误

Question

这应该是我希望的一个简单问题。

我在单元格中有一个简单的公式，工作表名称是 Entry

=Entry!D10

我有 5 个单元格，其中都有类似的公式。我希望能够将form button这些公式中的结果推送并复制到另一个工作表上的新行中。

Answer 1

这是一个跨公式移植而不会出现 #ref 错误的示例

Sub Sample()
    Dim ws1 As Worksheet, ws2 As Worksheet

    Set ws1 = ThisWorkbook.Sheets("Sheet1")
    Set ws2 = ThisWorkbook.Sheets("Sheet2")

    ws1.Range("A1").Formula = ws2.Range("C1").Formula
    ws1.Range("D1").Formula = ws2.Range("F1").Formula
End Sub