Valeur existante ou pas dans une table

bonjour à tous ,
j'ai un petit souci que je ne sais pas comment aborder.
Selon qu'un champ "Journee" au format date qui est indexe sans doublons existe ou non dans MaTable
Si la date existe deja dans la table je voudrais que le form de saisie s'ouvre en mode allowEdits, si la date n'existe pas je voudrais que le form de saisie s'ouvre en mode allowadditions.
J'ai un form de filtrage pour choisir la date. Je pense que c'est à ce niveau que doit s'effectuer la verification mais je ne sais pas comment.
Si quelqu'un peut m'aider, merci d'avance.

Bonjour,
tu peux utiliser la fonction DCount()
pour chercher si tu as déjà une valeur identique dans ta table:
Exemple :

Code:

---

1 2 3 4 5

If DCount("Journée","TaTable","Journée=#" & Me.TonchampDate &"#")>0 Then 'il existe déjà un enregistrement Else 'il n'y a pas d'enreigstrement aevc cette date End if

---

merci jp mais j'ai un mesage d'erreur de compilation sur la ligne :

Code:

---

If DCount("Journée","CheckList","Journée=#" & Me.SaisieDate &"#)>0 Then

---

attendu : separateur de liste ou )

corrigée pardon (manquait un guillemet)

Code:

---

If DCount("Journée", "CheckList", "Journée=#" & Me.SaisieDate & "#") > 0 Then

---

8O ça me dit erreur d'execution 2001 ! Comment je peux savoir à quoi ça correspond ça ,

as-tu un format US dans ta cellule ?
Sinon, il faut faire un

Code:

---

If DCount("Journée", "CheckList", "Journée=#" & Format(Me.SaisieDate,"MM/dd/yyyy") & "#") > 0 Then

---

non mon format de date est bien "dd,mm,yyyy"

Code:

---

If DCount("Journée", "CheckList", "Journée=#" & Format(Me.SaisieDate, "mm/dd/yyyy") & "#") > 0 Then

---

ça me dit toujours "erreur d'execution 2001 "

salut,
petite question : ton champs journée est de type date ou de type texte ? :aie:

bonjour JP,

te fatigues plus... tout est ok ça fonctionne divinement bien !

sans ces pu.... d'accents que j'avais devant les yeux ! :arf:

Je te remercie mille fois pour ta patience et l'interet que tu as bien voulu porter à mon souci.