A voir également:
- Access/VBA
- Incompatibilité de type vba ✓ - Forum Programmation
- Excel compter cellule couleur sans vba - Guide
- Access appdata - Guide
- Dépassement de capacité vba ✓ - Forum Excel
- Acer quick access - Forum logiciel systeme
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.