Discussion :

[vavavoum74]

Bonjour
Je préviens je débute, merci d'avance pour votre temps et votre indulgence...

Je souhaite faire une macro qui est liée au clic sur un bouton et qui teste certains champs d'un formulaire, s'ils sont tous vides, une action est déclenchée, par exemple afficher un message:
J'utilise le générateur de macro
Si [Champ1] et [Champ2] et ... et [Champ12]="" alors
Zone Message --> "Tout est Vide"

Mais cela ne fonctionne pas, en mettant ="" ou is Null
les champs sont soit date/heure soit texte court, soit numérique, soit texte long (bref il y a un peu de tout!!)
Même si je réduit à 1 champ, qui est pourtant vide (visuellement) dans le formulaire rien à faire !!

Help !!

[marot_r]

Bonjour.

D'abors il faut tester la valeur de chaque champ séparément (l'oppérateur = n'est pas transitif) et ensuite tu peux utilser l'astuce qui fait que Null & "" donne "" ou lieu de Null.

Cela donne quelque chose comme :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

[Champ1] & "" = "" and [Champ2] & "" = "" and ... and [ChampN] & "" = ""

Si tu tiens à être strict (et ne pas utiliser l'astuce) tu peux faire :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

(isnull([Champ1]) or isEmpty([Champ1]) or [Champ1]="") and (isnull([Champ2]) or isEmpty([Champ2]) or [Champ2]="") and ... and (isnull([ChampN]) or isEmpty([ChampN]) or [ChampN]="")

Access va traduire pour toi And et Or en français.

Il y a une subtile différence entre être nul (isNull) et être vide (isEmpty) et il faut tester les 2.
L'astuce simplfie grandement le code.

A+

[vavavoum74]

Merci de ton intérêt!

L'astuce fonctionne très bien!! (il faut cependant ajouter des parenthèses : Si ([Champ1] & ""="") Et ([Champ2] & ""="") etc...)

J'ai appris que = n'était pas transitif...

Merci encore !!