R1C1式の変数を含む

Question

このコードは、フィルタリングされたデータの数 - RelCovを取得します。次に、RelCovのそのグループの「ワンド」の数を数えます。 R1C1の式は、先週のRelCovの週数を比較し、差異を「？more」、「？less」または「先週と同じ」と返します。次に、その式の末尾に「wands "それはRelCovです。数式に&ワンドを含めると、「NAME」というエラーが表示されます。これは私が持っているものです。

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 = """ 

私は式の終わりに、私は「名前」のエラーが表示されます「「ワンド=」」後&杖&が含まれます。問題を解決するために、フォーラムの最後に「ワンド」変数を含めるにはどうすればよいですか？

あなたが使用することができ

Answer 1

：

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 & ")"