web-dev-qa-db-fra.com

Comment entrer une formule dans une cellule en utilisant VBA?

J'essaie d'entrer une formule dans une cellule contenant une variable appelée var1a? Le code que j'ai est le suivant:

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

Mais il entre dans une feuille de calcul Excel avec une erreur.

excelvbaexcel-formula
7
user2718355

Vous ne construisez pas votre formule correctement.

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

Cela fait la même chose que les lignes suivantes:

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

c'est ce que vous essayez de faire.

De plus, vous voulez avoir le = au début du formala.

9
enderland

Je le ferais comme ça:

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

Si vous avez une formule plus complexe, il vous sera utile

0
Đức Thanh Nguyễn