Access 2003 Boite MSGBOX

Bonjour,
Un peu difficile sans connaitre la structure de fonctionnement personnalisé de votre BD !

Bonjour,
Une possibilité, utiliser la procédure événementielle [sur changement], ce qui permet de créer le message désiré : exemple pour le champ [Nom] :
Dans les propriétés, onglet [Evénement], sous [sur changement], mettre [Procédure événementielle] et ensuite dans l'éditeur VBA compléter la procédure avec votre message, soit:

Private Sub Nom_Change()
MsgBox "Vous n'avez pas renseigné le nom de la personne!"
End Sub

Répéter la marche à suivre pour chaque champ concerné !

Bonjour,
Je vous renvoie ici : https://forums.commentcamarche.net/forum/affich-27197443-access-2003-boite-msgbox#4

Bonjour,
Petite erreur ...!
Je vous renvoie ici : https://forums.commentcamarche.net/forum/affich-27197443-access-2003-boite-msgbox#1

Bonjour
Merci pour cette proposition, ça fonctionne !
Joss

Pingou

J'ai un problème avec ta proposition, parce que si chaque champs n'est pas sélectionné automatique, la procédure ne sert à rien...

En cherchant un peu, voilà ce que je propose :
"
Private Sub Form_BeforeUpdate(Cancel As Integer)
If IsNull([LIEN_AVEC_LA_PA]) Or [LIEN_AVEC_LA_PA] = "" Then
MsgBox "Sélectionnez le lien avec la PA"
Cancel = True
ElseIf IsNull([PRISE_DE_CONNAISSANCE_CLIC]) Or [PRISE_DE_CONNAISSANCE_CLIC] = "" Then
MsgBox "Indiquez la Prise de connaissance du CLIC"
Cancel = True
ElseIf IsNull([DEMANDE_INITIALE]) Or ([DEMANDE_INITIALE]) = "" Then
MsgBox "Indiquez la demande initiale"
Cancel = True
ElseIf IsNull([PROPOSITION_INITIALE]) Or [PROPOSITION_INITIALE] = "" Then
MsgBox "Indiquez la proposition initiale"
Cancel = True
ElseIf IsNull([CIVILITE_PA]) Or [CIVILITE_PA] = "" Then
MsgBox "Précisez la civilité de la PA"
Cancel = True
ElseIf IsNull([NOM_PA]) Or [NOM_PA] = "" Then
MsgBox "Entrez le Nom de la PA"
Cancel = True
ElseIf IsNull([TRANCHE_AGE]) Or [TRANCHE_AGE] = "" Then
MsgBox "Sélectionnez la tranche d'âge de la PA"
Cancel = True
ElseIf IsNull([VILLE_PA2]) Or [VILLE_PA2] = "" Then
MsgBox "Sélectionnez la Ville de la PA ***** Si pas d'information, séléectionnez dans la liste : -Hors Secteur- ou -Non Localisé-"
Cancel = True
ElseIf IsNull([SITUATION_FAMILIALE]) Or [SITUATION_FAMILIALE] = "" Then
MsgBox "Sélectionnez la Situation Familiale de la PA"
Cancel = True
End If
End Sub
"
Le probleme que je rencontre, c'est qu' il ne vérifie que 3 champs sur 9....., il me zappe les 3 premiers, la tranche d'âge et la situation familiale, donc si les 3 concernés sont remplis, il valide la fermeture du formulaire... et c'est pas ce que je veux...
Pourquoi ? aurais-tu une réponse à m'apporter
Merci à toi
Joss

?????
Ton lien me renvoie sur cette page... est-ce normal ?
Merci
Joss

Bonsoir,
Ok je te transmets ma base demain via ci-joint.fr histoire de voir a quoi elle ressemble
Merci
Bonne soirée