OVH Cloud OVH Cloud

Comment programmer une fonction DCount?

3 réponses
Avatar
anassyto
je desire limite le nombre d'enregistre d'un sous formulaire contenu dans une
formulaire principal.

Pour cela on m'a conseille d'utiliser une fonction DCount
ainsi : nb=DCount("*","NonRequete")

Mais je ne sais pas comment l'integrer au code de mon sous forrmulaire. de
plus le nombre d'enregistrement depend d'un nombre introduit dans un champ
texte dans le formulaire principal.

merci de m'eclairer!

3 réponses

Avatar
3stone
Salut,

"anassyto"
| je desire limite le nombre d'enregistre d'un sous formulaire contenu dans une
| formulaire principal.


La question est "pourquoi" ?

Quel est la finalité ?

--
A+
Pierre (3stone) Access MVP
Perso: http://www.3stone.be/
Conseils MPFA: http://www.mpfa.info/
Avatar
anassyto
j'utilise un formulaire prinipale appeldoffre qui contient un sous formulaire
description des lots. j'ai un champs texte dans mon formulaire principale qui
recoit le nombre de lot que contient l'appel d'offre. je desire limite en
fonction de l'appel d'offre le nombre d'entree dans le sous formulaire ceci
pour rendre mon formulaire pricipale plus pratique et eviter les erreurs!


Salut,

"anassyto"
| je desire limite le nombre d'enregistre d'un sous formulaire contenu dans une
| formulaire principal.


La question est "pourquoi" ?

Quel est la finalité ?

--
A+
Pierre (3stone) Access MVP
Perso: http://www.3stone.be/
Conseils MPFA: http://www.mpfa.info/




Avatar
3stone
Salut,

"anassyto"
| j'utilise un formulaire prinipale appeldoffre qui contient un sous formulaire
| description des lots. j'ai un champs texte dans mon formulaire principale qui
| recoit le nombre de lot que contient l'appel d'offre. je desire limite en
| fonction de l'appel d'offre le nombre d'entree dans le sous formulaire ceci
| pour rendre mon formulaire pricipale plus pratique et eviter les erreurs!



A placer sur activation du sous-formulaire (Form_Current) :


With Me
If .RecordsetClone.RecordCount >= .Parent.NumMax Then
.AllowAdditions = False
Else
.AllowAdditions = True
End If
End With


NumMax étant le nom du champ dans le form principal (à adapter)

--
A+
Pierre (3stone) Access MVP
Perso: http://www.3stone.be/
Conseils MPFA: http://www.mpfa.info/