Discussion :

[Cyriusix]

Bonjour à tous,

j'ai dans un formulaire plusieurs champs devant permettre un enregistrement.

Le premier de ces champs n'a pas droit aux doublons et donc je désirerai faire ne sorte que si un autre enregistrement de la table MaTable contient le même nom dans le champ en question, il faudrait qu'au moment ou l'on passe au champ d'après (j'immagine par un Update), un msgbox apparaisse pour mettre en garde la personne comme quoi il y a déja un enregistrement du meme nom et qu'il faut trouver un autre nom.

Voila, quelqu'un pourait-il me donner un coup de main?

Merci d'avance
Cyriusix

[Jean-Philippe André]

Bonjour,
plusieurs méthodes sont possibles. Perso je combine souvent les fonctions Nz() + Dcount()

Code :

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

1
2
3
4
5
If Nz(Dcount("*","MaTable","ChampA=3 AND ChampB='" & Me.ChampB & "'"),0)<>0 Then
Msgbox "OKI"
Else
MsgBox "U FAIL"
End if

[Cyriusix]

Merci beaucoup pour ce code, mais serait-ce possible d'avoir quelques explications? genre à quoi servent Nz et DCount ainsi que un petit commentaire sur le reste.. je ne suis malheureusement pas encore super rodé en VBA..

Merci bien.

[Jean-Philippe André]

Bonjour,
outre l'aide en ligne qui explique le fonctionnement,
voici les liens issus de la FAQ ^^
Dcount()
http://access.developpez.com/faq/?pa...es#Recordcount
Nz()
http://access.developpez.com/faq/?page=Langage#nz

Nz n'est pas forcément nécessaire dans tous les cas, mais un blindage toujours prévisible.

[Cyriusix]

Oui merci..

Mais a quoi correspond le ChampA = 3?

[Jean-Philippe André]

Exemple, c'est un exemple