Affichage sur DataGrid

Bonjour

Je travaille sur une application dans le VB6.
J'ai une liste de personne ou les coordonnées de chaque personne se répetent plusieurs fois.
Je veux afficher ces personnes avec leurs coordonnées sur la DataGrid, mais une seule fois pour chaque personne.
J'ai utilise la fonction distinct (NomComplet) . Avec cette fonction seul le nom qui s'affiche.

Ma requete est comme suite

Sqls="select * from TableSaisiePointageQ where ((Dossier = '"& cstr(vardossier) &"') and (Periode = '" & cstr( cmbQuinzaine) &"'))"

ADsaisiepointageQ.RecordSource=Sqls

Set DGsaisiepointageQ.DataSource= ADsaisiepointageQ

ADsaisiepointage.Refresh

Merci pour votre aide