Discussion :

[khilim1]

Bonjour,

Sur un formulaire j'ai une zone de liste (zone1) qui est alimenté par une requête.

Cette requête elle même utilise un critère qui est dans une zone de liste28

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
str = ("SELECT Last(ACHAT.Prix) FROM ACHAT HAVING (((ACHAT.Code_article)=""" & Liste28.Value & """));")

liste28 contient une valeur qui n'apparait que lorsque l'on choisi un article dans une autre zone de liste déroulante.

Mon probleme est que, étant donné que ma liste (zone2) n'est pas activé par défaut j'ai une erreur car liste28 est alors égale à 0.

Il faut cliquer sur la zone de liste28 pour que la requête fonctionne.

comment remédier à ça?
Merci.

[kan630]

peut etre mettre une valeur par défaut dans ta zone de liste28 ?
(dans les propriété de la liste, onglet données)

[khilim1]

J'ai essayé de mettre une valeur par defaut mais cela ne fonctionne pas.
soit je met 1 par défaut et du coup la requête ne marche pas la valeur reste donc 1 (la zone n'étant pas activé),

soit je peut mettre par défaut la valeur de ma requete mais je n'arrive pas à faire fonctionner cela.

[loufab]

Bonjour,

Petit cour fondamental :

Les événements :

• Règle N°1 : les procédures événementielles se déclenchent suite à un... événement.
• Règle N°2 : pour qu'un événement se déclenche il faut... produire une action.
• Règle N°3 : Sauf quelques exception une action est produite par la main de l'utilisateur/utilisatrice.
• Règle N°4 : Dans le cas ou la règle 4 ne pourrait pas produire la règle 1, c'est au développeur de s'en charger.

Normalement si tu respectes c'est 4 règles tu dois t'en sortir seul.

Cordialement,

[kan630]

Effectivement !!

Dans ce cas
il faudrait peut etre mettre une ligne dans ton form_open qui simule un click de l'utilisateur
Du style

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Private Sub Form_Open(Cancel As Integer)
    Call Me.Liste0_Click
End Sub
 
Public Sub Liste0_Click()
    MsgBox "toto"
End Sub

[loufab]

pas de

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Call me.liste_click0

seulement

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

liste_click0

On agit sur le code VBA non sur l'objet !!!