Demande d'aide en vba sous access

Résolu/Fermé

nikos le grec - 4 juin 2009 à 09:08
nikos le grec Messages postés 102 Date d'inscription jeudi 4 juin 2009 Statut Membre Dernière intervention 25 juin 2009 - 5 juin 2009 à 10:29

Bonjour,

J'ai un petit problème en vba sous access.
le voici :

Dans un formulaire j'ai trois liste déroulante qui vont chercher chacune trois informations différente et en vba sous access j'aimerais savoir comment on lui dit si la première liste déroulante est sélectionné je fais quelque chose sinon si la seconde est sélectionner je fais autre chose sinon si la troisième est sélectionné je fais encore autre chose.

merci de votre aide.

A voir également:

Demande d'aide en vba sous access
Find vba - Astuces et Solutions
Access appdata - Guide
Vba attendre 1 seconde ✓ - Forum VB / VBA
Mkdir vba ✓ - Forum VB / VBA
Excel compter cellule couleur sans vba - Guide

10 réponses

Réponse 1 / 10

NicoDisso Messages postés 230 Date d'inscription mardi 26 mai 2009 Statut Membre Dernière intervention 22 août 2009 32
4 juin 2009 à 09:17

dans l'évenement click de ta liste tu tapes le code que tu veux

sub listbox1_click()

msgbox "Je bosse",vbinformation,"Information"

end sub

nikos le grec Messages postés 102 Date d'inscription jeudi 4 juin 2009 Statut Membre Dernière intervention 25 juin 2009 1
4 juin 2009 à 09:34

non quand je dis sélectionné c'est qu'une information est choisi dans la liste box numéro une parmis tant d'autre.
est-ce assez claire pour toi ou veux-tu que je m'xprime plus clairement ?

Réponse 2 / 10

nikos le grec Messages postés 102 Date d'inscription jeudi 4 juin 2009 Statut Membre Dernière intervention 25 juin 2009 1
4 juin 2009 à 09:27

voici ma procédure du bouton rechercher :

Private Sub RECHERCHER_Click()

End Sub

c'est dans cette procédure RECHERCHER_Click() que je veux lui dire si la première liste déroulante est sélectionner je fais quelquechose etc jusqu'à la troisième liste déroulante.
m'as-tu compris ?

Réponse 3 / 10

NicoDisso Messages postés 230 Date d'inscription mardi 26 mai 2009 Statut Membre Dernière intervention 22 août 2009 32
4 juin 2009 à 09:29

si par selectionnée tu veux dire qu'un texte y est saisi alors tu mets

Private Sub RECHERCHER_Click()

if listbox_1.text<>"" then
msgbox "Ok, Valeur Trouvée",vbinformation,"message"
else
msgbox "Indiquez une valeur",vbinformation,"message"
end if

End Sub

Réponse 4 / 10

NicoDisso Messages postés 230 Date d'inscription mardi 26 mai 2009 Statut Membre Dernière intervention 22 août 2009 32
4 juin 2009 à 09:37

??
Oui mais quand tu la selectionnes il y a bien un texte qui est selectionné...
Si tu colles le code que je t'ai donné et que tu le mets dans le code de ton botuon ca affiche les messages ?

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question

Réponse 5 / 10

nikos le grec Messages postés 102 Date d'inscription jeudi 4 juin 2009 Statut Membre Dernière intervention 25 juin 2009 1
4 juin 2009 à 10:20

non ça marche pas et ça commence a m'énerver parce que je suis en stage et les tables que j'ai faite cela ne va pas a une personne donc ca me gonfle.
^^

Réponse 6 / 10

blux Messages postés 26613 Date d'inscription dimanche 26 août 2001 Statut Modérateur Dernière intervention 21 janvier 2025 3 326
4 juin 2009 à 11:39

Salut,

c'est l'évènement 'sur changement'

Réponse 7 / 10

nikos le grec Messages postés 102 Date d'inscription jeudi 4 juin 2009 Statut Membre Dernière intervention 25 juin 2009 1
4 juin 2009 à 11:41

soit plus claire dans ta réponse

blux Messages postés 26613 Date d'inscription dimanche 26 août 2001 Statut Modérateur Dernière intervention 21 janvier 2025 3 326
4 juin 2009 à 13:51

qu'entends-tu par 'est sélectionné' ?

Réponse 8 / 10

nikos le grec Messages postés 102 Date d'inscription jeudi 4 juin 2009 Statut Membre Dernière intervention 25 juin 2009 1
4 juin 2009 à 16:22

regarde plus haut je l'ai déjà dit et je vais pas non plus me répéter.
mais bon pas grave j'ai trouvé la solution.

blux Messages postés 26613 Date d'inscription dimanche 26 août 2001 Statut Modérateur Dernière intervention 21 janvier 2025 3 326
4 juin 2009 à 16:38

T'as raison, ne répète pas...
Reste stagiaire, l'humilité, c'est pour les autres...

Réponse 9 / 10

nikos le grec Messages postés 102 Date d'inscription jeudi 4 juin 2009 Statut Membre Dernière intervention 25 juin 2009 1
5 juin 2009 à 10:23

dsl jsui tetre juste stagiaire mais jsui pas là pour répéter les choses deja dites alors si tes pas content va voir ailleurs si jy suis

blux Messages postés 26613 Date d'inscription dimanche 26 août 2001 Statut Modérateur Dernière intervention 21 janvier 2025 3 326
5 juin 2009 à 10:25

Classe ! Tu commences bien sur le forum, toi...

Réponse 10 / 10

nikos le grec Messages postés 102 Date d'inscription jeudi 4 juin 2009 Statut Membre Dernière intervention 25 juin 2009 1
5 juin 2009 à 10:29

ecoute c'est bien pour toi.
aller salut

Discussions similaires

"L'indice n'appartient à la sélection" + VBA

Erreur d'exécution 13 Incompatibilité de type

Acer quick access

ouverture d'un fichier excel à partir d'un code VBA

C'est quoi le runtime Access ?