ACCES vba
Fermé
srekk
Messages postés
3
Date d'inscription
mardi 12 juin 2007
Statut
Membre
Dernière intervention
25 juillet 2007
-
12 juin 2007 à 14:41
srekk Messages postés 3 Date d'inscription mardi 12 juin 2007 Statut Membre Dernière intervention 25 juillet 2007 - 14 juin 2007 à 11:25
srekk Messages postés 3 Date d'inscription mardi 12 juin 2007 Statut Membre Dernière intervention 25 juillet 2007 - 14 juin 2007 à 11:25
A voir également:
- ACCES vba
- Acces rapide - Guide
- Accès refusé - Guide
- Trousseau d'accès iphone - Guide
- Je n'ai plus acces a ma boite mail gmail - Guide
- Accès presse papier - Guide
1 réponse
blux
Messages postés
26813
Date d'inscription
dimanche 26 août 2001
Statut
Modérateur
Dernière intervention
24 avril 2025
3 335
12 juin 2007 à 15:07
12 juin 2007 à 15:07
Salut,
tu crées un formulaire avec une liste déroulante (nommée Chx_TypeWell) et une liste modifiable (nommée Liste_SSTypeWell).
Dans les propriétés de la liste déroulante, tu mets dans l'onglet données : origine source 'table/requête, contenu "SELECT refType, TypeWell FROM tbl_TypeWell", colonne liée 1. Dans l'onglet format, tu mets nbrs colonnes 2, et largeur de colonnes 0;2cm, pour n'afficher que la deuxième colonne mais conserver la valeur de la clé.
Dans l'onglet évènement, tu sélectionne code, et tu copies le code suivant :
Dim StrSql As String
StrSql = "SELECT * FROM tbl_SousTypeWell where refSsType = " & Chx_TypeWell.Value & ";"
Liste_SSTypeWell.RowSource = StrSql
Puis s'il le faut, tu modifies la liste Liste_SSTypeWell pour n'afficher que n colonnes comme vu précédemment...
Ca devrait marcher...
tu crées un formulaire avec une liste déroulante (nommée Chx_TypeWell) et une liste modifiable (nommée Liste_SSTypeWell).
Dans les propriétés de la liste déroulante, tu mets dans l'onglet données : origine source 'table/requête, contenu "SELECT refType, TypeWell FROM tbl_TypeWell", colonne liée 1. Dans l'onglet format, tu mets nbrs colonnes 2, et largeur de colonnes 0;2cm, pour n'afficher que la deuxième colonne mais conserver la valeur de la clé.
Dans l'onglet évènement, tu sélectionne code, et tu copies le code suivant :
Dim StrSql As String
StrSql = "SELECT * FROM tbl_SousTypeWell where refSsType = " & Chx_TypeWell.Value & ";"
Liste_SSTypeWell.RowSource = StrSql
Puis s'il le faut, tu modifies la liste Liste_SSTypeWell pour n'afficher que n colonnes comme vu précédemment...
Ca devrait marcher...
14 juin 2007 à 11:25
MERCI! je teste ça tout de suite!
:-))
samantha