1 réponse
Pour faire ce que tu veux, je pense qu'il faut utiliser un "Recordset" (bibliothèque DAO). On l'utilise comme ceci.
----------------------------------------------------------------------------------------------------
Dim TaBaseDeDonnée As Database
Dim TonRecordset As Recordset
Dim requete As String
requete = "SELECT cequetuveux FROM taTable WHERE cequetuveux = ' " & champDuSousFormulaire & " ';"
Set TonRecordset = CurrentDb
Set TonRecordset = TaBaseDeDonnée .OpenRecordset(requete,dbDynaset)
textbox.Value = TonRecordset!cequetuveux
TonRecordset.Close
TaBaseDeDonnée.Close
----------------------------------------------------------------------------------------------------
Si le textBox est dans le formulaire parent du sous-formulaire utilise parent.textBox
Nico
----------------------------------------------------------------------------------------------------
Dim TaBaseDeDonnée As Database
Dim TonRecordset As Recordset
Dim requete As String
requete = "SELECT cequetuveux FROM taTable WHERE cequetuveux = ' " & champDuSousFormulaire & " ';"
Set TonRecordset = CurrentDb
Set TonRecordset = TaBaseDeDonnée .OpenRecordset(requete,dbDynaset)
textbox.Value = TonRecordset!cequetuveux
TonRecordset.Close
TaBaseDeDonnée.Close
----------------------------------------------------------------------------------------------------
Si le textBox est dans le formulaire parent du sous-formulaire utilise parent.textBox
Nico
Aïcha
MERCI MILLE ça marche.merci encore.
