[ACCESS][VBA]
Utilisateur anonyme
-
Utilisateur anonyme -
Utilisateur anonyme -
Bonjour
Je voudrais tester si un de mes champs fait partie des champs d'une table. Seulement, je ne sais pas comment écrire le code pour ce test.
Le champ que je désire tester appartient à un formulaire et se nomme CLE. Et je veux tester s'il se trouve parmi les champs de la table OF_En_Cours.
If ........... Then
MsgBox CLE
DoCmd.OpenForm "Temps_Production", , , stLinkCriteria
DoCmd.OpenQuery "Recup_Val_Inter_Prod", acNormal, acEdit
End If
Si quelqu'un peut m'aider...
Merci
Je voudrais tester si un de mes champs fait partie des champs d'une table. Seulement, je ne sais pas comment écrire le code pour ce test.
Le champ que je désire tester appartient à un formulaire et se nomme CLE. Et je veux tester s'il se trouve parmi les champs de la table OF_En_Cours.
If ........... Then
MsgBox CLE
DoCmd.OpenForm "Temps_Production", , , stLinkCriteria
DoCmd.OpenQuery "Recup_Val_Inter_Prod", acNormal, acEdit
End If
Si quelqu'un peut m'aider...
Merci
2 réponses
-
(Re) Salut,
recherche du côté de l'aide à propos de la collection 'fields' d'une tabledef...
---
A+ Blux"Les cons, ça ose tout. C'est même à ça qu'on les reconnait"
-
dim ma var as string
dim champ as field
dim existe as boolean
existe=false
mavar=me!nomducontrole
for each champ in tabledefs(matable).fields
if mavar=champ.name then
trouve=true
exit for
next champ
if existe then
msgbox("trouvé")
