Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Access > IHM
IHM Ce forum est dédié aux questions relatives à la création de formulaires et d'états, avec ou sans code VBA, et macros.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 25/11/2010, 12h30   #1
Candidat au titre de Membre du Club
 
shmider
Inscription : novembre 2010
Messages : 38
Détails du profil
Informations personnelles :
Nom : shmider

Informations forums :
Inscription : novembre 2010
Messages : 38
Points : 10
Points : 10
Par défaut Boucle If avec condition sur un Champ.

Re-Bonjour tout le monde,

Je cherche à afficher un MsgBox si le formulaire "Commande" n'a pas été renseigné.
Alors j'ai commencé ma boucle if comme suite:
N.B: je fais la vérification par rapport à la clés primaire "ID_Commande"
Code :
1
2
3
If ID_Commande = Null
Then MsgBox "Veuillez remplir le formulaire commande"
Else: DoCmd.RunCommand acCmdSaveRecord
Sauf que j'ai une erreur avec selection du "Then":
Erreur de compilation attendu: numéro de ligne, ou d'étiquette, ou d'instruction ....

Qu'en pensez vous ? Où est l'erreur?

Je vous remercie pour votre temps.
@+
shmider est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 25/11/2010, 12h55   #2
Membre Expert
 
Inscription : janvier 2006
Messages : 1 111
Détails du profil
Informations forums :
Inscription : janvier 2006
Messages : 1 111
Points : 1 093
Points : 1 093
Bonjour, un If n'est pas une boucle et sa syntaxe est la suivante :
Code :
1
2
3
if ... then
Else
End if
__________________
[Access] Les bases du débogage => ici
Kloun est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 25/11/2010, 13h27   #3
Candidat au titre de Membre du Club
 
shmider
Inscription : novembre 2010
Messages : 38
Détails du profil
Informations personnelles :
Nom : shmider

Informations forums :
Inscription : novembre 2010
Messages : 38
Points : 10
Points : 10
Bonjour Kloun,
Merci beaucoup pour ton temps.

Rappel du problème:
Afficher le sous formulaire "Detail_Commande" si est seulement si le champ "ID_Commande" est plein.

Après avoir réctifié ma commande If, j'ai constaté que access (lors du clique sur le bouton qui appel la macro) ne prend pas en compte la condition If !

En fait, il affche toujours mon sous formulaire et quelque soit la valeur du champ "ID_Commande" vide ou plein !

Merci à toi.
@+
shmider est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 25/11/2010, 13h39   #4
Candidat au titre de Membre du Club
 
shmider
Inscription : novembre 2010
Messages : 38
Détails du profil
Informations personnelles :
Nom : shmider

Informations forums :
Inscription : novembre 2010
Messages : 38
Points : 10
Points : 10
Hourraa !!
J'ai résolu le problème !

Voici la solution:

Code :
1
2
3
4
If IsNull(ID_Contrat) Then MsgBox "Vous devez renseigner le contrat d'abord", vbInformation _
    Else: Me!Detail_Contrat_ss.Visible = True
 
    DoCmd.RunCommand acCmdSaveRecord
@+
shmider est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité Cette discussion est résolue.
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 18h27.


 
 
 
 
Partenaires

Hébergement Web