Uilisation de FORMULA

[jef]

Bonjour a tous,
Voici un extract d'une de mes macro qui me pose probleme

Mon besoin:
mettre une formule dans une cellule a partir de VB

Sub toto()
For i = 1 To 10
Worksheets("181").Range("M" + Trim(Str(i))).Formula = "=SI(J" + Trim(i) + "<A1;1;0)"
Next i
End Sub

VBA me sort l'erreur 1004 "erreur defini par l'application ou l'objet"
Je ne comprend pas mon erreur
quelqu'un a t il une idée ?

Merci d'avance
Jef

 

[Arnaud]

Salut ,

écrit plutot ta formule comme ça :

"=IF(J" & Trim(i) &"<A1,1,0)"

 

[jef]

Merci,
maintenant ca fonctionnne,
en fait apres plusieur essai le seul point genant provient du SI qu'il faut faut remplacer par IF
d'ou une nouvelle Question VB ne comprend par le francais comme excel ?

a+ sur le forum