Discussion :

[titeZ]

Bonjour,
J'ai une table qui contient deux champs avec des valeurs

TABLE
Champs 1 champs2
hhgqjf jqgsdjdgvd
qhfsk jhqdsqh
qlkhfks kjqsdhjkqs
jsdfhskk jdflksndf
sdfhs
skdfhk

j'ai besoi de savoir lorsque le nombre de ligne du champs 1 est different du nbre de ligne du champs 2


Pour ça je requete le nombre de ligne dans chaque champs
je fais un count (*) qui marche trés bien dans SQL mais pas dans l'editeur VBA
le truc c'est que SQL mais crée Deux valeur qui sont expr1 et expr 2 mais je ne sais pas le faire dans VBA

Pouvez vous me sauvez la vie svp :s
merci

[Jeannot45]

Hello

Tu peux utiliser un variable qui contient le code SQL
puis tu exécutes ta requete dans ta procedure

exemple

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Sub comptage()
    Dim rstComptage As DAO.Recordset
    Dim lngChamp1 As Long, lngChamp2 As Long
    Dim strSQLComptage As String
 
    strSQLComptage = "SELECT Count(Nom) AS NbNom, Count([Prenom]) AS NbPrenom FROM T_Essai"
 
    Set rstComptage = CurrentDb.OpenRecordset(strSQLComptage)
 
    With rstComptage
        MsgBox "Le champ Nom contient : " & .Fields(0) & " items" & vbCrLf & "Le champ Prenom contient " & .Fields(1) & " items"
    End With
 
End Sub

A+

Jeannot

[titeZ]

MERCI jeannot C'est exactement ce dont j'avais beosin manquez juste une tite virgule mais tt fonctionne