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 16/12/2011, 17h18   #1
Nouveau Membre du Club
 
Inscription : juillet 2003
Messages : 115
Détails du profil
Informations personnelles :
Localisation : France, Paris (Île de France)

Informations forums :
Inscription : juillet 2003
Messages : 115
Points : 29
Points : 29
Par défaut Pb constitution requete avec Select, Distinct et Count

Bonsoir,

J'essaye depuis le milieu de l'apres midi de constituer une requete en VBA qui me permette de faire ceci :
J'ai dans une table ce style de données :
     Nom    Prenom    Code     Group
   Dupont   Jean      12345   Group1
   Dupont   Jean      12345   Group2
   Dupont   Jean      78952   Group1
   Dupont   Jean      78952   Group2
   Durant    Gille      54321    Group3
   Martin     Paul      98765   Group1
   Martin     Paul      98765   Group2
Ce que j'aimerai pouvoir faire c'est d'avoir ce résultat :
    Nom     Prenom  NbreCodeDistinct     
   Dupont   Jean         2   
   Durant    Gille         1   
   Martin     Paul         1
Suite à mes recherches, il faut jouer entre deux syntaxes :

1ere exple de code qui va me permettre de compter par Nom
Code :
1
2
3
4
 
SELECT NomChauffeur, PrenomChauffeur, (SELECT Count(PermisChauffeur.Value) 
FROM tbl_chauffeur WHERE NumChauffeur=T.NumChauffeur)
FROM tbl_chauffeur AS T;
2eme exple qui va me permet de compte le nombre distinct de code
Code :
1
2
3
4
5
 
SELECT Count(PermisDistinct) AS NombreDePermis
FROM
  (SELECT  DISTINCT(PermisChauffeur.Value)  AS PermisDistinct
    FROM  tbl_chauffeur)
Mon pb, c'est que je n'arrive pas à faire un mix des deux pour obtenir mon tableau final

Y aurait il une bonne âme charitable pour me venri en aide SVP?
Merci d'avance pour le pietre debutant que je suis

Anax
Anaxagore est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 16/12/2011, 19h45   #2
Expert Confirmé Sénior
 
Avatar de f-leb
 
Homme Fabien
Enseignant
Inscription : janvier 2009
Messages : 2 415
Détails du profil
Informations personnelles :
Nom : Homme Fabien
Âge : 41
Localisation : France, Sarthe (Pays de la Loire)

Informations professionnelles :
Activité : Enseignant

Informations forums :
Inscription : janvier 2009
Messages : 2 415
Points : 4 447
Points : 4 447
bonsoir,

Citation:
Envoyé par Anaxagore Voir le message
J'ai dans une table ce style de données :
     Nom    Prenom    Code     Group
   Dupont   Jean      12345   Group1
   Dupont   Jean      12345   Group2
   Dupont   Jean      78952   Group1
   Dupont   Jean      78952   Group2
   Durant    Gille      54321    Group3
   Martin     Paul      98765   Group1
   Martin     Paul      98765   Group2
Ce que j'aimerai pouvoir faire c'est d'avoir ce résultat :
    Nom     Prenom  NbreCodeDistinct     
   Dupont   Jean         2   
   Durant    Gille         1   
   Martin     Paul         1
Dans un premier temps, une requête R1:
Code sql :
SELECT DISTINCT Nom, Prenom, Code FROM tbl_chauffeur;
     Nom    Prenom    Code    
   Dupont   Jean      12345   
   Dupont   Jean      78952   
   Durant    Gille      54321    
   Martin     Paul      98765   
 
puis:
Code sql :
1
2
3
SELECT Nom, Prenom, count(*) AS NbrCodesDistincts 
FROM R1
GROUP BY Nom, Prenom
f-leb est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 16/12/2011, 23h32   #3
Nouveau Membre du Club
 
Inscription : juillet 2003
Messages : 115
Détails du profil
Informations personnelles :
Localisation : France, Paris (Île de France)

Informations forums :
Inscription : juillet 2003
Messages : 115
Points : 29
Points : 29
Merci bcp pour tes explications
ca m'a permis de trouver ce liens a partir duquel j ai pu ne faire qu'une seule requête : http://blogs.office.com/b/microsoft-...in-access.aspx
Anaxagore 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 01h54.


 
 
 
 
Partenaires

Hébergement Web