Merci pour vos réponses.
Voici mon code :
Set rstRS = New ADODB.Recordset
With rstRS
.Open _
Source:="dossier", _
ActiveConnection:=cnnDB, _
CursorType:=adOpenKeyset, _
LockType:=adLockOptimistic, _
Options:=adCmdTable
End With
Set dgDossier.DataSource = rstRS
Malgré cela, ma datagrid reste vide ! ! ! !
J'attends vos prochaines réponses.