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.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
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
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" <rick@discussions.microsoft.com> a écrit dans le message de news:
7524FA6B-9470-43FF-87DF-11637C57DBE7@microsoft.com...
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.
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
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
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" <rick@discussions.microsoft.com> a écrit dans le message de news:
7524FA6B-9470-43FF-87DF-11637C57DBE7@microsoft.com...
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.
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.