Discussion :

[chrtophe]

Bonsoir,

J'ai 1 truc bien tordu.

J'ai 1 formulaire contenant 5 sous-formulaires.
Ce formulaire n'est lié à aucune table.
Chaque sous-formulaire contient des valeurs selon chacun sa propre requête.

J'ai 5 zones de texte remplis par du vba à l'ouverture du formulaire.

la valeur des zones de texte représente le nombre de lignes de chaque formulaires.

le remplissage ce fait comme ceci :

Code :

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

1
2
3
 
var=Me.nom_sous_formulaire.Form.RecordSet.RecordCount
Me.nom_zone_texte=var

ceci pour chaque sous formulaire.

Sur mon formulaire numéro 2,le résultat est erroné ( 6 au lieu de 8 ). Je ne comprends pas pourquoi.

Je vais recréer le sous-formulaire et sa requête pour voir.

Si qq1 a 1 idée...

PS : si j'utilise 1 variable différente, pas de changement

Merci pour votre aide.

[nico84]

Bonsoir,

Souvent recordcount ne compte que les enregistrements déjà lus. Il faut donc un movelast pour que le total soit bon.

Si le formulaire 2 affiche 6 lignes ça expliquerait

[chrtophe]

Merci pour ta réponse Nico.

Je vais regarder de ce coté. Par contre ce que tu me dis m’inquiète pour mes autres calculs. Vaut il mieux abandonner l'utilisation de recordcount ?

[nico84]

Vaut il mieux abandonner l'utilisation de recordcount ?

Pas nécessairement, mais toujours le précéder de

Code :

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

if not rst.eof then rst.movelast: rst.movefirst

[chrtophe]

Ca a réglé mon prob.

Par contre,j'utilise moveLast au lieu de MoveFirst.

J'ai également imbriqué cela dans une structure if then else de façon à contrôler si lerecordset est non vide.