Afficher le nombre d'enregistrements sur une recherche

Bonjour,

Dans un formulaire de recherche à multicritères
Je souhaite afficher le nombre d'enregistrements trouvés dans table sur le nombre total.
Dans un des tuto, j'ai trouvé ceci :


Me.LblStats.Caption = DCount("*", "T_Medias", SQLWhere) & "/" & DCount("*", "T_Medias")


Cela fonctionne pour une requête faite sur une seule table.

Mais dès qu'il s'agit d'une requête sur plusieurs tables, j'ai un message d'erreur
voici la requête


SQL = "SELECT MediaID, TitreMedia, Rangement, LibelleGenre, LibelleSupportMedia, NomAuteur, NomEditeur " _
& "FROM T_Medias, T_Genres, T_SupportMedia, T_Auteurs, T_Editeurs " _
& "WHERE T_Medias!CodeGenre = T_Genres!GenreID AND T_Medias!CodeSupport = T_SupportMedia!SupportID " _
& "AND T_Medias!CodeAuteur = T_Auteurs!AuteurID And T_Medias!CodeEditeur = T_Editeurs!NumEditeur " _
& "AND T_Medias!MediaID <> 0 "

If Not Me.ChkAuteur Then
SQL = SQL & "AND T_Auteurs!NomAuteur LIKE '*" & Me.TxtAuteur & "*'"
End If

If Not Me.ChkEditeur Then
SQL = SQL & "AND T_Editeurs!NomEditeur LIKE '*" & Me.TxtEditeur & "*'"
End If

If Not Me.ChkGenre Then
SQL = SQL & "AND T_Genres!LibelleGenre = '" & Me.CboGenre & "'"
End If

If Not Me.ChkSupport Then
SQL = SQL & "AND T_SupportMedia!LibelleSupportMedia = '" & Me.CboSupport & "'"
End If

If Not Me.ChkTitre Then
SQL = SQL & "AND T_Medias!TitreMedia LIKE '*" & Me.TxtTitre & "*'"
End If


SQLWhere = Trim(Right(SQL, Len(SQL) - InStr(SQL, "Where ") - Len("Where ") + 1))

SQL = SQL & ";"

Me.LblStats.Caption = DCount("*", "T_Medias", SQLWhere) & "/" & DCount("*", "T_Medias")

Je souhaite savoir comment modifier cette requête pour voir s'afficher le résultat dans le label "LblStats"
Merci d'avance