引用更改表名的VBA公式



我是VBA的新手,我试图创建一个使用引用表的公式的代码。然而,表格名称每个月都在变化。我应该使用什么函数来引用表格?

我想过创建一个简单的宏,将有问题的工作表重命名为"原始数据";在公式代码中很容易引用,但我希望避免这样做。这是到目前为止的代码:

Range("J2").Formula = "=SUMPRODUCT(--ISNUMBER(SEARCH(Checklist!R2C1:R6C1,WorkSheets(1)!RC[-1])))>0"

Worksheets(1)是我希望在代码中引用的不断变化的工作表名称。我想到使用工作表(1)来引用最左边的工作表,因为这不需要工作表的名称。J2是工作表中不断更改名称的单元格。

我已经将代码修改为,'" & ActiveWorkbook.Sheets(1).Name & "'!,现在它正在按预期工作。谢谢你的帮助!!

最新更新