Choix multiple pour un somme de 1

Bonjour Rachid,

R@chid a écrit :

Mais on ne sait pas s'il est prés à effacer les valeurs précédentes avant de taper une nouvelle...

Si, il le dit dans sa cellule C1.

Cordialement.

Bonjour @ tous,

[quote="Yvouille"]Bonjour Rachid,

R@chid a écrit :

Mais on ne sait pas s'il est prés à effacer les valeurs précédentes avant de taper une nouvelle...

Si, il le dit dans sa cellule C1.

Cordialement.[/quote]

Si c'est le cas j'ai déjà donné une réponse ici..., d’après ce que j'ai compris.

@ + +

merci pour votre reponse je vais teste

bon j ai retravaille le code qui donne ça :

Sub remettre_a_zéro()

'condition si la valeur est inférieur a 1

If (Range("B5")) < 1 Then

'action si vrai remettre a zéro

Range("I5").ClearContents

'action si faux ne rien faire

Else

Exit Sub

End Sub

sa ne marche toujours pas mais le bouton fonctionne lui ?????

Je ne comprends pas ce que tu veux faire exactement, mais voici un code qui fonctionne.

Sub remettre_a_zéro()

    'condition si la valeur est inférieur a 1
    If (Range("B5")) < 1 Then
    'action si vrai remettre a zéro
    Range("I5").ClearContents
    'action si faux ne rien faire
    End If
    ''Exit Sub

End Sub

Cordialement.

merci c est pour m'entraîné sur tout et puis me simplifie la vie aussi qu'est se qui fonctionne pas ?

baptiste91 a écrit :

qu'est se qui fonctionne pas ?

Sub remettre_a_zéro()

    'condition si la valeur est inférieur a 1
    If (Range("B5")) < 1 Then
    'action si vrai remettre a zéro
    Range("I5").ClearContents
    'action si faux ne rien faire
    Else
    Exit Sub

End Sub

Tu utilises ELSE si tu veux justement effectuer une "action si faux", mais toi tu as écrit "action si faux NE RIEN FAIRE", alors tu dois laisser tomber le ELSE.

Par contre dans tous les cas, si tu as commencé un IF et que tu écris une des conditions sur une deuxième ligne (ici ta ligne Range("I5").ClearContents), alors tu dois absolument conclure par END IF, ce que j’ai rajouté dans mon code.

Tu as écrit un EXIT SUB au milieu du code qui est absolument inutile. Si tu ne l’écrit pas, la macro se termine normalement sur la ligne END SUB. Tu places un EXIT SUB en milieu de code uniquement si tu veux terminer ta macro prématurément à certaines conditions bien précises.

Cordialement.

ok note merci pour tes explication