formule dans une cellule erreur 1004

[Zorei]

voila mon code
je souhaite faire juste cette opération sur les cellules que j'ai choisie en dessous


Sub tri()
For i = 9 To 13 Step 2

If Cells(9, i).Value > Cells(9, i + 1).Value Then
Cells(33, i).Value = "=0,2*5*(Cells(9, i)-Cells(9, i + 1))/5,7" l'erreur intervient sur cette ligne erreur 1004 application defined or object defined error

Else
Cells(33, i).Value = "=0,2*5*(Cells(9, i + 1)-Cells(9, i))/5,7"

End If
Next i

End Sub

S'il vous plait aidez moi c'est entrain de m'envahir!!!!

merci

 

[Pierrot93]

Re : formule dans une cellule erreur 1004

Bonjour Zorei

pas sur du résultat que tu veux obtenir... essaye peut être ainsi !!!

Cells(33, i).Value = "=0,2*5*" & (Cells(9, i) - Cells(9, i + 1)) & "/5,7"

sinon soit un peu plus explicite et mets peut être un fichier en pièce jointe si nécessaire.

bon après midi
@+

 

[Dull]

Re : formule dans une cellule erreur 1004

Salut Zorei, le Forum

Pas sûr du tout parce que je ne peux pas tester 😱 mais essaye ça

Sub tri()
For i = 9 To 13 Step 2

If Cells(9, i).Value > Cells(9, i + 1).Value Then
Cells(33, i).Value= "=0,2*5*" & (Cells(9, i) & - Cells(9, i + 1)) & "/5,7" [COLOR=Green]' l'erreur intervient sur cette ligne erreur 1004 application defined or object defined error"[/COLOR]

Else
Cells(33, i).Value= "=0,2*5*" & (Cells(9, i + 1) - Cells(9, i)) & "/5,7"

End If
Next i

End Sub

EDITION: Salut Pierrot 🙂... pareil 😛
Bonne Journée

 

[Zorei]

Re : formule dans une cellule erreur 1004

Merci pour votre aide mais le message d'erreur revient!!!

 

[Pierrot93]

Re : formule dans une cellule erreur 1004

Re, bonjour Dull🙂

tu devrais nous mettre un petit fichier en pièce jointe avec le code et résultat attendu, ce serait plus facile pour t'aider, peut être un problème sur le type de donnée dans tes cellules... A voir...

@+