Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
Private Sub Form_Current()
Dim Db As DAO.Database
Dim oNumDoublon As DAO.Recordset
Dim NumDoublon As Long
 
Set Db = CurrentDb
Set oNumDoublon = CurrentDb.OpenRecordset("ReqNumCourrierFicheNavette")
 
                                    NumDoublon = oNumDoublon.RecordCount
                                    MsgBox NumDoublon                                            
End Sub
Bonjour,

J'ai une requête nommée :ReqNumCourrierFicheNavette
C'est une requête de regroupement.

Je dois poser une condition posée sur le nombre d'enregistrements de la requête.
Le problème est le suivant. J'ai deux enregistrements retournés dans ma requête,et bizarrement "oNumDoublon.RecordCount" me retourne =1

Où ai-je l'erreur?

Merci de votre aide

Cordialement,

Gentoo