Bonjour a tous,

Je n'arrive pas trop a me schématiser comment faire.

J'ai la formule qui m'interdit de mettre dans une cellule (enfin je pense) :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
    If Range("C5").Value = "" Then
    Else
        Range("C5").Value = Replace(Range("C5").Value, ".", ",")
        If Not IsNumeric(Range("C5").Value) Then
             MsgBox " saisir des chiffres"
             Range("C5").Value= ""
        Else
        End If
    End If
mais je ne sais pas dans quoi le mettre , c'est a dire dans quel fonction :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Code : Sélectionner tout - Visualiser dans une fenêtre à part
Private Sub Worksheet_Change(ByVal Target As Range)
ou autre, vue que ces fonctions doivent renvoyer une valeur.. et que je suis pas super doué la dedans, je m'en remet a vous

Merci