Discussion :

[jean-paul lepetit]

Bonjour,

Je me heurte, à un problème tout bête ,

j'ai besoin de récuperer le nombre d'enregistrements d'un sous formulaire. Le source de ce sous-formulaire est une requête SQL qui est créée et actualisée par des contrôles listes déroulantes.

Code :

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

1
2
3
 
Str_Sql = "SELECT [Tbl_Civilite].[Libelle_Court], etc....
Me!Sfrm_Vivier.Form.RecordSource = Str_Sql

J'ai fait une requête avec un count et les mêmes critères qui me donne bien le nombre d'enregistrements, mais voilà, comment faire pour affecter le résultat à une zone de texte de mon formulaire....

Merci de votre aide

[loufab]

Bonjour,

Pour le nombre d'enregistrement d'un formulaire ou sous-formulaire il vaut mieux utiliser ceci.

Code :

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

1
2
3
4
5
Dim rst As Recordset
Set rst = Me.RecordsetClone
me.moncontrole = rst.RecordCount
Set rst = Nothing
End Sub

Cordialement,

[jean-paul lepetit]

Je savais bien que c'était facile.....

Merci

[jean-paul lepetit]

J'ai Répondu trop vite.....

Loufab, ta solution marche, mais si j'ai plus d'enregistrements que ce qu'affiche mon sous-formulaire, le RecordCount me donne uniquement le nombre d'enregistrements affichés......

[jean-paul lepetit]

Après recherche, j'ai trouvé...
il faut ajouter un Rst.MoveLast pour avoir le nombre total d'enregistrements.

Code :

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

1
2
3
4
5
6
Dim rst As Recordset 
Set rst = Me.RecordsetClone 
rst.movelast
me.moncontrole = rst.RecordCount 
Set rst = Nothing 
End Sub

Merci à Loufab pour le début

[loufab]

Très étrange, je n'ai jamais eu besoin d'un movelast.

Tu déclenche le code dans quelle circonstance ?

[jean-paul lepetit]

Mon sous formulaire n'a pas de champ pere et fils, mais est basé sur une requête que je créé après mise à jour d'une liste déroulante.
Et le compte est fait après un requery de mon sous formulaire.