Suppression valeur 0 avec condition sinon appliquer formule

Bonjour,

Etant nouveau dans le forum, je ne sais pas si je poste ma demande au bon endroit

je sèche sur un petit problème :

dans mon tableau excel j'ai des lignes et les 3 dernières colonnes (g,h,i) avec des chiffres.

dans la colonne i, il peut y avoir la valeur : 0

le but étant de faire =arrondi((g*h)/0.05;0)*0.05 à toutes les lignes, sauf celle qui comporte la valeur 0, dans la colonne i

et ce en partant de la dernière cellule avec une valeur de la colonne i jusqu'à la cellule i8

la dernière cellule peut être variable mais la cellule i8 est fixe.

je joints un fichier avec des explications marquées dessus

merci d'avance si quelqu'un peut m'aider .

atoch

Bonjour atoch & bienvenue,

à tester,

Sub test()
Dim i As Long, v As Double
For i = 8 To Cells(Rows.Count, "A").End(xlUp).Row
    v = Round((Cells(i, "G") * Cells(i, "H")) / 0.05, 0) * 0.05
    If v = 0 Then
        Cells(i, "G") = 0
        Cells(i, "I") = 0
    Else
        Cells(i, "I") = v
    End If
Next i
End Sub

Bonjour i20100,

malheureusement cela ne fonctionne pas chez moi

auriez-vous une autre solution?

on peut aussi imaginer que se la valeur de la cellule source est égale à zéro, on applique la formule

v = Round((Cells(i, "G") * 0)) / 0.05, 0) * 0.05

et sinon on applique :

v = Round((Cells(i, "G") * Cells(i, "H")) / 0.05, 0) * 0.05

se serait possible , non?

cordialement atoch

Bonjour atoch,

Regardez dans le format de cellules, êtes vous bien en format nombre, avec 1 "zéros non significatifs"?

Alors modifiez le format de cellules, avec 0 "zéros non significatifs", tous les zéros inutiles disparaissent...

Bonjour njhub,

désolé de la réponse tardive,

j'ai fais le test chez moi , c'est ok mais j'ai modifié certaines lignes de la formule.

merci de votre aide

cordialement

atoch

Merci pour ce retour, au plaisir!

si le problème est résolu, s.v.p. clôture le fil, par un clic sur le bouton