Excel表格上的求和、间接和字符公式

我有一种情况，在使用间接表引用的求和公式时

我想在一个表（名称：Consolidated_062020）中使用该公式，并使用另一个表（名称：IM_062020）的引用来推导总和。首先，我已经记录了这一点，后来我想将其转换为动态公式，因为这两个表名每个月都会更改

记录的公式是：

ActiveCell.FormulaR1C1 = "=SUM(INDIRECT(""IM_062020"" & ""["" &[@[Team Members]] & CHAR(10) & Consolidated_062020[[#Headers],[Volumes]] & ""]""))"

我尝试了以下方法将其转换为动态方式：

Dim TableName As String
Dim TableName2 As String
Dim OLC As ListObject
Dim OLC2 As ListObject

Month = WorksheetFunction.Text(MacroSheetDate, "mm")

Year = WorksheetFunction.Text(MacroSheetDate, "yyyy")

TableName1 = "IM_" & Month & Year
TableName2 = "Consolidated_" & Month & Year

Set OLC = IndMetricsSht.ListObjects(TableName)

Set OLC2 = IndMetricsSht.ListObjects(TableName2)

我在表格中选择整个列数据范围，并给出以下公式：

Selection.FormulaR1C1 = "=SUM(INDIRECT(" & OLC & "[" & [@[Team Members]] & Chr(10) & OLC2 & [[#Headers],[Volumes]] & "]))"

---

请帮忙

解决问题的代码：

---

Selection.FormulaR1C1=“=SUM（间接（&Chr（34）&TableName&Chr（34）&”&“&”[”&[@[团队成员]]&CHAR（10）&“卷”&“]）”

注释不用于扩展讨论；这段对话已经结束。