Worksheet_ChangeRésolu

Question

Bonjour,

j'essaye de cr&#233;er une macro se d&#233;clenchant lorsque l'heure d'une
cellule change, cependant je ne parviens pas &#224; trouver le bon format
sachant que cette cellule dans excel est au format 00:00,00.

Merci de bien vouloir me donner un petit coup de pouce !!





voici la macro :



                                                                                                         



Private Sub Worksheet_Change(ByVal Target As Range)



' Calcul_Points_Perf_Chrono()



    If Target.Address = "$E12" Then

        If Target.Value > 00,01,14 Then Range("H12").Select

            ActiveCell.FormulaR1C1 = "2"

        

        

    End If

    

End Sub

pjcleder · Accepted Answer

PAT

Essaie ceci et fais-moi signe si tu as un probl&#232;me.

Private Sub Worksheet_Change(ByVal Target As Range)
    If CDate(Target.Value) > CDate("00:01:14") Then
            Range("H12").Select
            MsgBox "Sup&#233;rieur &#224; 1:14"
    End If
End Sub

Modifie ta cellule et appuie sur entr&#233;e. Ca devrait aller !

galopin01 · Answer

bonsoir,
je pense que tu auras du mal &#224; &#233;valuer cette condition car ton format 00:00,00 est purement visuel : Excel le stocke diff&#233;remment.
Tu peux faire un petit coup de MsgBox Target.Value pour v&#233;rifier...

Par contre tu pourrais sans doute stocker tes valeurs de comparaison dans une table de r&#233;f&#233;rence :
If Target.Value > [A1].Value Then...

aquaman31 · Answer

Merci &#224; vous deux, m&#234;me si rien ne fonctionne pour l'instant vos
r&#233;ponses respectives m'ont apport&#233; de nouvelles id&#233;es qui peut &#234;tre me
permettront de r&#233;soudre ce probl&#232;me.

Merci encore,

Cordialement, JC

Worksheet_Change

3 réponses

Discussions similaires