Problème avec les requetes en vba sous access
ciracus
-
ciracus -
ciracus -
Bonjour,
Je suis toujours en stage et je dois toujours faire une modeste base de données (je suis débutant en vb). Or, je n'arrive pas à récupérer à sélectionner en fonction de checkbox les champs d'une requete.
Plus précisément, je fais une première requete (qui fonctionne parfaitement) sur la sélection de checkbox et de combox (filtre):
sql = "SELECT table.* FROM table Where table!number <> 0 "
If Not Me.chk_champ1 Then
sql = sql & "And table.champ1 like '*" & Me.cmb_champ1 & "*' "
End If
If Not Me.chk_champ2 Then
sql = sql & "And table.champ2 like '*" & Me.cmb_champ2 & "*' "
End If
If Not Me.chk_champ3 Then
sql = sql & "And table.champ3 like '*" & Me.cmb_champ3 & "*' "
End If
sql= sql & ";"
Ensuite je voudrais récupérer que certains champs de la requete précédente en fonction de checkbox (par exemple si les checkboxs 1 et 3 sont cochées alors la requetes sql2 donne les champs 1 et 3 de la requete précedénte)
J'ai essayé cela:
If Me.chkbox1_champ1 Then
sql2 = sql2 & "select [sql].champ1"
End If
If Me.chkbox3_champ3 Then
sql2 = sql2 & "select sql.champ3"
End If
sql2 = sql2 & "from sql;"
Or [sql].champ1 bloque. J'ai aussi essayé sql.champ1, avec et sans select... Mais rien à faire!
Auriez vous une idée sur la façon dont je pourrais coder cela?
Merci beaucoup de m'aider encore!!
Je suis toujours en stage et je dois toujours faire une modeste base de données (je suis débutant en vb). Or, je n'arrive pas à récupérer à sélectionner en fonction de checkbox les champs d'une requete.
Plus précisément, je fais une première requete (qui fonctionne parfaitement) sur la sélection de checkbox et de combox (filtre):
sql = "SELECT table.* FROM table Where table!number <> 0 "
If Not Me.chk_champ1 Then
sql = sql & "And table.champ1 like '*" & Me.cmb_champ1 & "*' "
End If
If Not Me.chk_champ2 Then
sql = sql & "And table.champ2 like '*" & Me.cmb_champ2 & "*' "
End If
If Not Me.chk_champ3 Then
sql = sql & "And table.champ3 like '*" & Me.cmb_champ3 & "*' "
End If
sql= sql & ";"
Ensuite je voudrais récupérer que certains champs de la requete précédente en fonction de checkbox (par exemple si les checkboxs 1 et 3 sont cochées alors la requetes sql2 donne les champs 1 et 3 de la requete précedénte)
J'ai essayé cela:
If Me.chkbox1_champ1 Then
sql2 = sql2 & "select [sql].champ1"
End If
If Me.chkbox3_champ3 Then
sql2 = sql2 & "select sql.champ3"
End If
sql2 = sql2 & "from sql;"
Or [sql].champ1 bloque. J'ai aussi essayé sql.champ1, avec et sans select... Mais rien à faire!
Auriez vous une idée sur la façon dont je pourrais coder cela?
Merci beaucoup de m'aider encore!!
A voir également:
- Problème avec les requetes en vba sous access
- Incompatibilité de type vba ✓ - Forum Programmation
- Acer quick access - Forum logiciel systeme
- Access appdata - Guide
- Désinstaller ACER QUICK ACCESS - Forum Logiciels
- Vba range avec variable ✓ - Forum VB / VBA