Mister Binaire
XLDnaute Occasionnel
Bonjour le Forum,
Concernant cette macro (voir ci-dessous) qui empêche la saisie des datas si une valeur n'est pas rentrée en C2 ou D2, à ce jour je dois sélectionner manuellement (C2 ou D2) Serait il possible de faire une sorte de condition dans la macro en disant : si C2 ou D2 sont vides alors impossible de rentrer les datas sinon rentrer les datas ??
je voudrais également SVP qu'une fenêtre s'affiche si la personne essaye de rentrer les datas sans avoir rien mis en C2 ou D2 du Style "Attention, vous ne pouvez pas rentrer vos datas sans spécifications"
Merci de votre aide !!
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Columns(2), Target) Is Nothing Then
If Not Range("C2") <> "" Then Target.ClearContents 'C2= Spec mini D2= Spec Maxi
End If
End Sub
Concernant cette macro (voir ci-dessous) qui empêche la saisie des datas si une valeur n'est pas rentrée en C2 ou D2, à ce jour je dois sélectionner manuellement (C2 ou D2) Serait il possible de faire une sorte de condition dans la macro en disant : si C2 ou D2 sont vides alors impossible de rentrer les datas sinon rentrer les datas ??
je voudrais également SVP qu'une fenêtre s'affiche si la personne essaye de rentrer les datas sans avoir rien mis en C2 ou D2 du Style "Attention, vous ne pouvez pas rentrer vos datas sans spécifications"
Merci de votre aide !!
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Columns(2), Target) Is Nothing Then
If Not Range("C2") <> "" Then Target.ClearContents 'C2= Spec mini D2= Spec Maxi
End If
End Sub
