Discussion :

[mathilde50]

Bonjour,

Je viens vous demander à tous de l'aide concernant deux problèmes.

Voici le premier :

Dans un formulaire j'ai une zone de liste avec trois propositions : Bordereau, Fax et Note. J'ai aussi trois boutons qui permette de lancer un envoi de données vers trois documents différents (bordereau, fax et note). Je voudrais que grâce à du code, lorsque je sélectionne BORDEREAU dans ma zone de liste le bouton concernant le bordereau s'affiche mais pas les autres et ainsi de suite lorsque je sélectionne les autres données. J'ai cherché sur l'aide acces les faq et le forum mais j'ai pas trouvé de réponse.

Mon deuxième problème est le suivant :

Dans un formulaire de recherche multicritère (merci à cafeine pour son code) j'ai fait en sorte qu'après le clic sur une check box, le curseur se positionne automatiquement sur la zone de texte de recherche qui s'y rapporte grâce au code

Code :

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

.setfocus

Je voudrais que lors d'un clic sur une check box qui se rapporte à une zone de liste, la liste se déroule automatiquement (si c'est possible évidemment).

Voila j'espère que je suis assez claire dans mes explications.

Merci pour toutes les réponses que vous pourrez m'apporter.

[FRED.G]

Normalement, on pose de préférence 1 seule question par thread, mais là c'est pas très grave

Pour la deuxième question, utilise la méthode DropDown de ta liste (juste après le setFocus).

Je vais voir ta deuxième question...

[FRED.G]

Alors pour ta deuxième, ou plutôt ta première question, je te conseille d'utiliser l'événement OnChange (Sur Modification) de ta liste.
Là tu places le code suivant :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Select case MaListe
  case 1
    Bouton1.Enabled = True
    Bouton2.Enabled = False
    Bouton3.Enabled = False
  case 2
    Bouton1.Enabled = False
    Bouton2.Enabled = True
    Bouton3.Enabled = False
  case 3
    Bouton1.Enabled = False
    Bouton2.Enabled = False
    Bouton3.Enabled = True
End Select

[mathilde50]

Merci beaucoup je vais essayer ça tout de suite et je te tiens au courant

[mathilde50]

Merci c'est parfait

A bientôt