excel vbaで可変行のセル範囲を合計するための配列数式を挿入

Question

多数のセルに配列式を挿入して、範囲内のセルを最初に丸めて合計する必要があります。しかし、その範囲は必ずしも同じではないので、変数の範囲を定義する行番号を取り込む必要があります。これは動作していないよう：

Set ssheet = ThisWorkbook.Sheets("1 to 50")  
With ssheet.Range(Cells(1, 8), Cells(3200, 8)) 
Set x = .Find("Rate", LookIn:=xlValues, Lookat:=xlWhole) 
tworow = x.Row 
Set y = .Find("Total=", LookIn:=xlValues, Lookat:=xlWhole) 
nextrow = y.Row 
End With 
l = tworow + 1 
m = nextrow - 1 
ssheet.Cells(nextrow, 9).FormulaArray = "=sum(round("I" & l & ":" & "I" &m,2))" 
End sub 

は、私は、このことにより、所望の範囲を選択することができます。

myrange = "I" & l & ":" & "I" & m 
Range(myrange).Select 

しかし、和式のコードは、「予想文の末尾を」アウトできます。助けてください。

Answer 1

文字列がどのように構成されているか、つまり文字通り何が表示されるべきかを並べ替える必要があります。これを試してください

ssheet.Cells(nextrow, 9).FormulaArray = "=sum(round(I" & l & ":I" & m & ",2))"