Voila J'ai plusieurs colonnes
Nom, Prénom, Date de naissance, Adresse, ville, Etc...
Je souhaiterais que la saisi d'une date de naissance soit obligatoire a
partir du moment ou j'ai saisi un nouveau nom.
Quelque chose du genre : Lorsque j'arrive sur le champ Date Naissance celui
ci test la présence d'un nom et refuse de quitter en laissant la date vide
et propose de supprimer le "Nom" si la date n'est pas possible.
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. Essaie le code suivant :
Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Column = 5 Then Adresse = Target.Address Exit Sub Else If Adresse = "" Then Exit Sub If Range(Adresse).Value = "" Then Application.EnableEvents = False Range(Adresse).Select Application.EnableEvents = True MsgBox "Voulez-vous supprimer le nom ?" End If End If End Sub
Cordialement. Daniel "Michel" a écrit dans le message de news: dli6li$77$
Bonjour a tous
Est il possible d'imposer la saisie de données.
Voila J'ai plusieurs colonnes Nom, Prénom, Date de naissance, Adresse, ville, Etc... Je souhaiterais que la saisi d'une date de naissance soit obligatoire a partir du moment ou j'ai saisi un nouveau nom.
Quelque chose du genre : Lorsque j'arrive sur le champ Date Naissance celui ci test la présence d'un nom et refuse de quitter en laissant la date vide et propose de supprimer le "Nom" si la date n'est pas possible.
Cela est'il possible et si oui comment.
D'avance merci pour l'aide Michel
Bonjour.
Essaie le code suivant :
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 5 Then
Adresse = Target.Address
Exit Sub
Else
If Adresse = "" Then Exit Sub
If Range(Adresse).Value = "" Then
Application.EnableEvents = False
Range(Adresse).Select
Application.EnableEvents = True
MsgBox "Voulez-vous supprimer le nom ?"
End If
End If
End Sub
Cordialement.
Daniel
"Michel" <michel_b@libertysurf.fr> a écrit dans le message de news:
dli6li$77$1@news.tiscali.fr...
Bonjour a tous
Est il possible d'imposer la saisie de données.
Voila J'ai plusieurs colonnes
Nom, Prénom, Date de naissance, Adresse, ville, Etc...
Je souhaiterais que la saisi d'une date de naissance soit obligatoire a
partir du moment ou j'ai saisi un nouveau nom.
Quelque chose du genre : Lorsque j'arrive sur le champ Date Naissance
celui
ci test la présence d'un nom et refuse de quitter en laissant la date vide
et propose de supprimer le "Nom" si la date n'est pas possible.
Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Column = 5 Then Adresse = Target.Address Exit Sub Else If Adresse = "" Then Exit Sub If Range(Adresse).Value = "" Then Application.EnableEvents = False Range(Adresse).Select Application.EnableEvents = True MsgBox "Voulez-vous supprimer le nom ?" End If End If End Sub
Cordialement. Daniel "Michel" a écrit dans le message de news: dli6li$77$
Bonjour a tous
Est il possible d'imposer la saisie de données.
Voila J'ai plusieurs colonnes Nom, Prénom, Date de naissance, Adresse, ville, Etc... Je souhaiterais que la saisi d'une date de naissance soit obligatoire a partir du moment ou j'ai saisi un nouveau nom.
Quelque chose du genre : Lorsque j'arrive sur le champ Date Naissance celui ci test la présence d'un nom et refuse de quitter en laissant la date vide et propose de supprimer le "Nom" si la date n'est pas possible.
Cela est'il possible et si oui comment.
D'avance merci pour l'aide Michel
Daniel
Complément : j'ai choisi la colonne comme colonne des dates. A modifier en conséquence. Daniel "Michel" a écrit dans le message de news: dli6li$77$
Bonjour a tous
Est il possible d'imposer la saisie de données.
Voila J'ai plusieurs colonnes Nom, Prénom, Date de naissance, Adresse, ville, Etc... Je souhaiterais que la saisi d'une date de naissance soit obligatoire a partir du moment ou j'ai saisi un nouveau nom.
Quelque chose du genre : Lorsque j'arrive sur le champ Date Naissance celui ci test la présence d'un nom et refuse de quitter en laissant la date vide et propose de supprimer le "Nom" si la date n'est pas possible.
Cela est'il possible et si oui comment.
D'avance merci pour l'aide Michel
Complément : j'ai choisi la colonne comme colonne des dates. A modifier en
conséquence.
Daniel
"Michel" <michel_b@libertysurf.fr> a écrit dans le message de news:
dli6li$77$1@news.tiscali.fr...
Bonjour a tous
Est il possible d'imposer la saisie de données.
Voila J'ai plusieurs colonnes
Nom, Prénom, Date de naissance, Adresse, ville, Etc...
Je souhaiterais que la saisi d'une date de naissance soit obligatoire a
partir du moment ou j'ai saisi un nouveau nom.
Quelque chose du genre : Lorsque j'arrive sur le champ Date Naissance
celui
ci test la présence d'un nom et refuse de quitter en laissant la date vide
et propose de supprimer le "Nom" si la date n'est pas possible.
Complément : j'ai choisi la colonne comme colonne des dates. A modifier en conséquence. Daniel "Michel" a écrit dans le message de news: dli6li$77$
Bonjour a tous
Est il possible d'imposer la saisie de données.
Voila J'ai plusieurs colonnes Nom, Prénom, Date de naissance, Adresse, ville, Etc... Je souhaiterais que la saisi d'une date de naissance soit obligatoire a partir du moment ou j'ai saisi un nouveau nom.
Quelque chose du genre : Lorsque j'arrive sur le champ Date Naissance celui ci test la présence d'un nom et refuse de quitter en laissant la date vide et propose de supprimer le "Nom" si la date n'est pas possible.
Cela est'il possible et si oui comment.
D'avance merci pour l'aide Michel
Daniel
Désolé autre complément : Dans un module : Public Adresse As String Sûr, sinon cela ne fonctionne pas. "Michel" a écrit dans le message de news: dli6li$77$
Bonjour a tous
Est il possible d'imposer la saisie de données.
Voila J'ai plusieurs colonnes Nom, Prénom, Date de naissance, Adresse, ville, Etc... Je souhaiterais que la saisi d'une date de naissance soit obligatoire a partir du moment ou j'ai saisi un nouveau nom.
Quelque chose du genre : Lorsque j'arrive sur le champ Date Naissance celui ci test la présence d'un nom et refuse de quitter en laissant la date vide et propose de supprimer le "Nom" si la date n'est pas possible.
Cela est'il possible et si oui comment.
D'avance merci pour l'aide Michel
Désolé autre complément :
Dans un module :
Public Adresse As String
Sûr, sinon cela ne fonctionne pas.
"Michel" <michel_b@libertysurf.fr> a écrit dans le message de news:
dli6li$77$1@news.tiscali.fr...
Bonjour a tous
Est il possible d'imposer la saisie de données.
Voila J'ai plusieurs colonnes
Nom, Prénom, Date de naissance, Adresse, ville, Etc...
Je souhaiterais que la saisi d'une date de naissance soit obligatoire a
partir du moment ou j'ai saisi un nouveau nom.
Quelque chose du genre : Lorsque j'arrive sur le champ Date Naissance
celui
ci test la présence d'un nom et refuse de quitter en laissant la date vide
et propose de supprimer le "Nom" si la date n'est pas possible.
Désolé autre complément : Dans un module : Public Adresse As String Sûr, sinon cela ne fonctionne pas. "Michel" a écrit dans le message de news: dli6li$77$
Bonjour a tous
Est il possible d'imposer la saisie de données.
Voila J'ai plusieurs colonnes Nom, Prénom, Date de naissance, Adresse, ville, Etc... Je souhaiterais que la saisi d'une date de naissance soit obligatoire a partir du moment ou j'ai saisi un nouveau nom.
Quelque chose du genre : Lorsque j'arrive sur le champ Date Naissance celui ci test la présence d'un nom et refuse de quitter en laissant la date vide et propose de supprimer le "Nom" si la date n'est pas possible.
