Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Access > VBA Access
VBA Access Le forum pour les questions relatives au code VBA sous Access, et à son environnement de développement VBE.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 22/03/2011, 10h09   #1
Membre du Club
 
Inscription : janvier 2007
Messages : 149
Détails du profil
Informations forums :
Inscription : janvier 2007
Messages : 149
Points : 41
Points : 41
Par défaut Méthode sur Recordset RECORDCOUNT

Code :
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
gentoo est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 22/03/2011, 10h35   #2
Membre Expert
 
Avatar de keita
 
Homme
Inscription : novembre 2002
Messages : 879
Détails du profil
Informations personnelles :
Sexe : Homme
Localisation : Côte d'Ivoire

Informations forums :
Inscription : novembre 2002
Messages : 879
Points : 1 015
Points : 1 015
Envoyer un message via MSN à keita
bonjour
Citation:
Où ai-je l'erreur?
Pas d'erruer sauf que tu dois ajouter ceci: oNumDoublon.MoveLast
Code :
1
2
3
4
..................
oNumDoublon.MoveLast
NumDoublon = oNumDoublon.RecordCount
                                    MsgBox NumDoublon
@+
keita est déconnecté   Envoyer un message privé Réponse avec citation 10
Vieux 22/03/2011, 14h04   #3
Membre du Club
 
Inscription : janvier 2007
Messages : 149
Détails du profil
Informations forums :
Inscription : janvier 2007
Messages : 149
Points : 41
Points : 41
Un Grand Merci keita!


J'ai appliqué ton conseil, et surtout je n'avais pas fait de regroupement
et là, ça change tout!


Merci!!!

gentoo est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité Cette discussion est résolue.
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 23h20.


 
 
 
 
Partenaires

Hébergement Web