Question

我正在尝试编写一个从另一个工作表复制数据的宏。我在如何在公式中正确输入工作表名称时遇到麻烦。摘要工作表是目标，第五个工作表（每天更改（格式为x.xx_1））是源。这是我的代码：

 Sub steadf()

 Dim SN As String

 SN = InputBox("Enter Tab Date - 2.24, 10.24, etc.")
 Worksheets(5).Name = SN & "_1"

    Sheets("Summary").Select
    Range("D24").Select
    ActiveCell.Offset(0, 3).Formula = "=SN" & "_1" & "!" & "Cost"

End Sub

当我运行它时，G24中的公式是

=SN_1!Cost

我想要使用的公式是='2.24_1'!Cost。我将不胜感激任何帮助。提前谢谢。

Answer 1

试试这个：

Formula = "='" & SN & "'!Cost"

引用在VBA中始终更改的公式中的工作表

1 个答案: