包括R1C1公式中的variables
这段代码检索过滤数据的数量 – RelCov。 然后计算RelCov组中的“魔杖”数量。 R1C1公式比较上周RelCov的周数，并返回差异为“多”，“less”或“与上周相同”，然后在该公式末尾添加“魔杖” “那是RelCov。 每当我在公式中包括＆魔杖，我得到一个“名称”的错误。 这是我的：
Windows("usertemp.xls").Activate Sheets("Sheet1").Select Dim RelCov As Integer RelCov = Application.CountIf(Range("ah:ah"), "Relevant Covered") ActiveSheet.Range("$A$1:$AO$18690").AutoFilter Field:=34, Criteria1:="Relevant Covered" Dim wands As Integer wands = Application.CountIf(Range("b:b"), "WAND*") ' MsgBox wands Windows("User File Analysis test.xlsm").Activate Sheets("Sheet1").Select Range("ReleventCovered").Select ActiveCell = RelCov '& Chr(10) & wands & " wands" ActiveCell.Offset(rowOffset:=0, columnOffset:=1).Activate ActiveCell.FormulaR1C1 = "=if(rc[-1]<r[-1]c[-1],r[-1]c[-1]-rc[-1]&"" less"",if(rc[-1]>r[-1]c[-1],rc[-1]-r[-1]c[-1]&"" More"","" same as last week""))& "" wands = """ 当我在公式的末尾添加＆“Wands =”“之后，出现”Name“错误。 如何在论坛结尾包含“魔杖”variables以获取错误？
你可以使用：
ActiveCell.FormulaR1C1 = "=CONCATENATE(IF(RC[-1]<R[-1]C[-1],R[-1]C[-1]-RC[-1] &"" less"", IF(RC[-1]>R[-1]C[-1],RC[-1]-R[-1]C[-1]&"" More"","" same as last week"")), "" wands = ""," & RelCov & ")"