Bonjour le Forum.
Malgré toute mes recherches, je n'ai pas trouvé ce que je cherchais.
Voici quelque chose qui s'en approche
Résumé : Quand je clique sur une cellule incluse dans la plage A1:C10 la valeur passe à 1 si la cellule à déjà la valeur 0.
Ce que je souhaite : lorsque je remplie une cellule par 0, incluse dans la plage donnée, lorsque je valide par "ENTER" ou en cliquant ailleurs, le test s'effectue et la cellule prends la valeur 1.
J'espère avoir été clair...
Un grand MERCI d'avance
Pascal
Malgré toute mes recherches, je n'ai pas trouvé ce que je cherchais.
Voici quelque chose qui s'en approche
Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("A1:C10")) Is Nothing Then
If ActiveCell.Value = "0" Then
ActiveCell.Value = 1
End If
End If
End Sub
Résumé : Quand je clique sur une cellule incluse dans la plage A1:C10 la valeur passe à 1 si la cellule à déjà la valeur 0.
Ce que je souhaite : lorsque je remplie une cellule par 0, incluse dans la plage donnée, lorsque je valide par "ENTER" ou en cliquant ailleurs, le test s'effectue et la cellule prends la valeur 1.
J'espère avoir été clair...
Un grand MERCI d'avance
Pascal