web-dev-qa-db-ja.com

VBAを使用してセルに数式を入力する方法は?

Var1aという変数を含むセルに数式を入力しようとしていますか?私が持っているコードは次のとおりです。

    Worksheets("EmployeeCosts").Range("B" & var1a).Formula = ""SUM(H5:H""& var1a)

しかし、それは間違ってExcelワークシートに入ります。

8
user2718355

あなたはあなたの式を正しく構築していません。

Worksheets("EmployeeCosts").Range("B" & var1a).Formula =  "=SUM(H5:H" & var1a & ")"

これは、次の行と同じです。

Dim myFormula As String
myFormula = "=SUM(H5:H"
myFormula = myFormula & var1a
myformula = myformula & ")"

あなたがやろうとしていることです。

また、=フォーマラの冒頭。

9
enderland

私はこのようにします:

Worksheets("EmployeeCosts").Range("B" & var1a).Formula = _
Replace("=SUM(H5:H{SOME_VAR})","{SOME_VAR}",var1a)

もっと複雑な式がある場合は便利です