Macro

[mcj1997]

En pièce jointe, vous trouverez un morceau de programme que je n'arrive pas à finaliser.

Merci d'avance,

 

[BERRACHED said]

Re : Macro

Salut,mcj1997

As tu Essayé de mettre ça avant ton code :

If ActiveSheet.CheckBox1.Value = "oui" Then
Exit Sub
Else

Cordialement

 

[mcj1997]

Re : Macro

Non je ne veux pas essayer cela car je veux garder cette condition car avec OUI un calcul s'effectue et avec NON c'est un autre calcul qui s'effectue.

Ce que je cherche c'est bloquer c'est macro si D10 = 1

 

[BERRACHED said]

Re : Macro

Ré,

même si j'ai pas compris le principe mais suivant ce que tu dit normalement c'est ainsi :

Sub ModifC9()
If Sheets("Feuil1").Range("D10").Value = 1 Then
Exit Sub
Else
If ActiveSheet.CheckBox1.Value = True Then
        Select Case Range("D9").Value
            Case Is < 13550
            Range("C9") = Range("D9") - 4404
            Case Is <= 21860
            Range("C9") = Range("D9") - 2202
            Case Else
            Range("C9") = Range("D9")
        End Select
Else
        Select Case Range("D9").Value
            Case Is < 13550
            Range("C9") = Range("D9") - 2202
            Case Is <= 21860
            Range("C9") = Range("D9") - 1101
            Case Else
            Range("C9") = Range("D9")
        End Select
End If
End If
End Sub

Cordialement

 

[mcj1997]

Re : Macro

J'ai déjà essayé et je viens de réessayer mais cela ne fonctionne pas.

Désolé,

Comment faire ?

 

[BERRACHED said]

Re : Macro

Ré,

essayé ce code ça a marcher chez moi :

Private Sub CheckBox1_Change()
If Sheets("Feuil1").Range("d10").Value = 1 Then
Exit Sub
Else
Call ModifC9
End If
End Sub

Cordialement

 

[mcj1997]

Re : Macro

pourriez-vous svp m'envoyer mon fichier corrigé car chez moi ça ne marche toujours pas, désolé

merci d'avance,

 

[BERRACHED said]

Re : Macro

Ré,

voir le fichier si j'ai bien compris :

Cordialement

 

[mcj1997]

Re : Macro

Ré,

voir le fichier si j'ai bien compris :

Cordialement

Non ce n'est pas encore bon car après essai lorsque je mets 12000 en C3, j'ai 10800 en D9
et 6396 en C9, qu'il y ait 1 ou 2 en D10

Merci d'avance