cells.formula

[sarrsouraa]

bonjour tout le monde si quelqu 'un peut m aider
mon but c'est d'affecter à une cellule une formule de type :
G6.formula=G1+G2+G3+G4+..+GX
avec x une variable saisie par l'utilisateur j'ai essaye comme ca

depart=1
Do While depart <= x
Cells(6, 7).formula = "=" & Cells(6, 7).formula & "+" & Cells(depart, 7).Address(0, 0)
depart = depart + 1
Loop

mais il m'affiche type in compatible pour la partie :
Cells(6, 7).formula = "=" & Cells(6, 7).formula & "+" & Cells(depart, 7).Address(0, 0)


je sais p comment resoudre ce pb
merciiiiiiiiiiiiiiiiiii

 

[Roland_M]

Re : cells.formula

bonjour

essai déjà sans le "="
car lorsque tu lis Cells(6, 7).formula
celui-ci te donne déjà "=...."
donc tu rajoutes "=" en trop

Cells(6, 7).formula = Cells(6, 7).formula & . . .

 

[sarrsouraa]

Re : cells.formula

merci pour ta reponse
ad j'enlève "=" j'ai plus le message d'erreur mais la cellule a comme formule +G13+G14.. donc pas de resultat final correct

 

[sarrsouraa]

Re : cells.formula

c'est bon ca marche maintenant j'ai initialisé la valeur de la cellule et c bon
merci bcp pr ton aide