Bonjour à tous,
J’ai un petit soucis de relation Chexbox et inputbox. Quand CheckBox prend la valeur vrai, j’ai un InputBox qui apparaît afin que j’insère une date. Il n’y a pas de problème quand j’insère une date et que je valide (OK). Par contre quand je veux annuler l’insertion d’une date(annuler) j’ai un bug.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
Private Sub CheckBox_Click()
Date = InputBox("date?", "date")
Range("b2").Value = Date
End Sub
Solutions ?