Bonjour,
1) j'ai tapé le code suivant :

Code :
Dim str As String
If rst.State <> adStateClosed Then rst.Close
str = " SELECT * FROM demande where mat_d = '" & Text1.Text & "'"
rst.Source = str
rst.Open
Mais le débogeur s'arrete à la dernière ligne rst.Open et m'affiche le message suivant :
Erreur d'exécution '3709'
impossible d'utiliser cette connexion pour effectuer cette opération. Elle est fermée ou non valide dans ce contexte.
Pourtant j'ai utilisé ce code ailleurs et ça marchait. Je ne comprends pourquoi j'ai cette erreur.
2) sur une autre feuille quand j'essaye d'inserer un nombre décimale dans ma base de donnée (access) j'ai le message d'erreur suivant :
Erreur d'exécution '-2147217913(800e07)'
Type de données incompatible dans l'expression du critère
Pourtant le champ qui recoit cet enregistrement est defini à Numérique et réel double, je comprends pas également.
Merci d'avance pour votre aide.