Discussion :

[ph.leveque]

Bonjour,
Voici mon problème, j'ai une listbox à plusieurs choix possibles. Je veux limiter le nombre de choix à 4 max,

voici le code utilisé

Code :

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

1
2
3
4
5
6
Private Sub Savoirs_associés_Change()
Dim i As Long, c As Byte
For i = 0 To Savoirs_associés.ListCount - 1: If Savoirs_associés.Selected(i) Then c = c + 1
Next i
If c > 4 Then Savoirs_associés.Selected(Savoirs_associés.ListIndex) = False: MsgBox "4 select max..."
End Sub

Le message s'affiche bien mais l'ajout se fait quand même comme ceci alors que pour 4 choix ça s'affiche comme ça.
comment résoudre le problème pour que l'ajout ne se fasse pas et oblige à corriger ?

Merci.

[tee_grandbois]

Bonjour,
on ne voit pas le code qui exécute l'ajout, je suppose que c'est dans un autre évènement et c'est peut-être dans ce dernier qu'il faut mettre le contrôle. Peux-tu nous montrer ce code ?

[ph.leveque]

L'ajout se fait directement de la listbox , il est géré par access, c'est une liste à plusieurs valeurs

[tee_grandbois]

Je ne comprend pas :tu ajoutes quoi (je sais) dans quoi (là, je ne sais pas) ?

[ph.leveque]

il s'agit d'un formulaire dans lequel il y a une liste à plusieurs valeurs ou il faut choisir 4 valeur maximum.
Le code fonctionne puisque si l'on coche 5 choix le message apparait mais l'ajout se fait quand même sur remplissage du formulaire.

en gros mon problème est : comment limiter le nombre de choix dans une listbox à plusieurs valeurs dans un formulaire access afin que l'utilisateur ne puisse pas en mettre plus que demandé.

Merci

[tee_grandbois]

Ok, comme tu n'as toujours pas répondu à ma question je suppose que tu ne l'as pas comprise. Je vais donc le faire autrement : je vois un bouton OK sur le formulaire où se trouve la liste de valeurs : je suppose que tu cliques sur ce bouton à un moment. Y a-t-il un code associé à ce bouton ? Si oui, peux-tu le poster ?

[ph.leveque]

Si si j'ai bien compris ta question, il y a surement un code associé au bouton mais je ne le connais pas. dans une listbox à plusieurs valeurs le bouton ok est créé directement par access au moment de la création de la liste, je ne sais pas ou se trouve le code.

[tee_grandbois]

dans une listbox à plusieurs valeurs le bouton ok est créé directement par access au moment de la création de la liste, je ne sais pas ou se trouve le code.

s'agirait-il d'un contrôle Activex particulier ? Il faudrait ouvrir le formulaire en mode création et faire une impression d'écran montrant les propriétés (celles du début, avec l'onglet Toutes)

Ou alors, c'est une nouveauté d'Access 2016 ...