OVH Cloud OVH Cloud

rendre obligatoire des saisie?

2 réponses
Avatar
rick
Bonjour,

sous excel est t'il possible avant le passage sur autre ligne, d'obliger les
utilisateurs a remplir obligatoirement 3 champ situé sur 3 colonnes avant de
pouvoir passer sur une autre ligne,et affcihé un message bloquant si un des
champs n'est pas rempli.


merci davance

2 réponses

Avatar
Daniel
Bonjour.
En supposant que les données obligatoires soient saisies dans les colonnes
A, B et C :

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("A:C")) Is Nothing Then Exit Sub
If Range("A" & Target.Row - 1).Value <> "" And Range("B" & Target.Row -
1).Value <> "" _
And Range("C" & Target.Row - 1).Value <> "" Then Exit Sub
MsgBox "erreur de saisie"
End Sub

Cordialement.
Daniel
"rick" a écrit dans le message de news:

Bonjour,

sous excel est t'il possible avant le passage sur autre ligne, d'obliger
les
utilisateurs a remplir obligatoirement 3 champ situé sur 3 colonnes avant
de
pouvoir passer sur une autre ligne,et affcihé un message bloquant si un
des
champs n'est pas rempli.


merci davance




Avatar
rick
j'ai essayé ce code, mais ca ne genere aucun message???



Bonjour.
En supposant que les données obligatoires soient saisies dans les colonnes
A, B et C :

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("A:C")) Is Nothing Then Exit Sub
If Range("A" & Target.Row - 1).Value <> "" And Range("B" & Target.Row -
1).Value <> "" _
And Range("C" & Target.Row - 1).Value <> "" Then Exit Sub
MsgBox "erreur de saisie"
End Sub

Cordialement.
Daniel
"rick" a écrit dans le message de news:

Bonjour,

sous excel est t'il possible avant le passage sur autre ligne, d'obliger
les
utilisateurs a remplir obligatoirement 3 champ situé sur 3 colonnes avant
de
pouvoir passer sur une autre ligne,et affcihé un message bloquant si un
des
champs n'est pas rempli.


merci davance