OVH Cloud OVH Cloud

selection de lisbox

5 réponses
Avatar
chris
Bonjour à tous,

J'ai un formulaire avec 10 listbox et je souhaiterai que l'utilisateur ne
puisse selectionner seulement qu'1 listbox sur les 10. S'il s'apperçoit
qu'il a fait une mauvaise selection, qu'il ait la possibilité d'en
selectionner une autre et que la précédente selection se déselectionne
automatiquement.
Merci pour votre aide




begin 666 p.gif
M1TE&.#EAH0`1`( ````3S/___R'Y! $```$`+ ````"A`!$```+_C(^IR^T/
MHYRTVHNSWKS[#X9B!I0.D*"(JJBL]"[ES,54;#_Y>>P!GF*X*C[#JSA:!9._
M)>UGZCFC-%34>+4VH;9CTY6%8J7;K_BL-&)96JYZ+0VWR$ E^TU];Z_ENCJ/
M!X:G9R581M@WEC@4. AW=\@UT[:'Z+0D,VE9:<EHMHD("4E'ZABG&0DDNHG:
MQ:=')NFYNAC;M=>Z`DC+&3>7YNO(Z_D;:UM,>S=Z2PP;/'R<F!J4S&CHYQ?=
MFQPLC0G]UVG\!*?H#,:FQ6?2[(8Y+B>=SJX-['[X-%_/Q-_OCS$IH,"!! L:
:/(@PH<*%#!LJ_ <QHL2)%"M:O(@Q8X8"`#L`
`
end

5 réponses

Avatar
FxM
chris wrote:
Bonjour à tous,

J'ai un formulaire avec 10 listbox et je souhaiterai que l'utilisateur ne
puisse selectionner seulement qu'1 listbox sur les 10. S'il s'apperçoit
qu'il a fait une mauvaise selection, qu'il ait la possibilité d'en
selectionner une autre et que la précédente selection se déselectionne
automatiquement.
Merci pour votre aide


Bonjour,

Voudrais-tu enlever cette *$£#@ de pub sous forme d'image nommée p.gif
qui est à chaque fois attachée à tes messages et dont l'utilité
n'apparaît pas comme évidente ?

Merci et @+
FxM

Avatar
chris
Désolé FxM j'ai essayé de désinstallé le *$£#@ de pub comme tu dis, on va
voir si ça fonctionne. Si non aurai tu une idée concernant ma question.....

"FxM" a écrit dans le message de news:

chris wrote:
Bonjour à tous,

J'ai un formulaire avec 10 listbox et je souhaiterai que l'utilisateur ne
puisse selectionner seulement qu'1 listbox sur les 10. S'il s'apperçoit
qu'il a fait une mauvaise selection, qu'il ait la possibilité d'en
selectionner une autre et que la précédente selection se déselectionne
automatiquement.
Merci pour votre aide


Bonjour,

Voudrais-tu enlever cette *$£#@ de pub sous forme d'image nommée p.gif qui
est à chaque fois attachée à tes messages et dont l'utilité n'apparaît pas
comme évidente ?

Merci et @+
FxM



Avatar
docm
Bonjour.

Pour désélectionner, il faut mettre la propriété ListIndex à -1.
Si tes ListBox s'appelle ListBox1, ListBox2, etc...

Private Sub ListBox1_Click()
x = 1
For i = 1 To 10
If i <> x Then
Controls("Listbox" & i).ListIndex = -1
End If
Next
End Sub

Private Sub ListBox2_Click()
x = 2
For i = 1 To 10
If i <> x Then
Controls("Listbox" & i).ListIndex = -1
End If
Next
End Sub

Etc...

docm

"chris" a écrit dans le message de news:
#
Bonjour à tous,

J'ai un formulaire avec 10 listbox et je souhaiterai que l'utilisateur ne
puisse selectionner seulement qu'1 listbox sur les 10. S'il s'apperçoit
qu'il a fait une mauvaise selection, qu'il ait la possibilité d'en
selectionner une autre et que la précédente selection se déselectionne
automatiquement.
Merci pour votre aide







Avatar
FxM
Re-

Je n'ai jamais mis réellement en oeuvre tout ce qui est userform et ne
connais pas toutes les actions possibles. Voici ce que j'envisagerais :

Comme tu l'indiques le choix dans un listbox remet les autres à zéro.
cela suppose d'avoir un choix en début montrant "--- choisir ---" ou
équivalent. Voir .selected = 0 ??

Tu pourrais aussi avoir une bordure (un symbole, une flèche, ..) autour
du listbox indiquant que ce listbox va être choisi et que les autres
seront ignorés. Le listbox.change (dés-)active le symbole (.visible = true).

@+
FxM Formuliste et macrot(t)eur à ses heures :o)

PS : Y'a plus d'image, c'est très 'beaucoup plus mieux'. Merci.





chris wrote:
Désolé FxM j'ai essayé de désinstallé le *$£#@ de pub comme tu dis, on va
voir si ça fonctionne. Si non aurai tu une idée concernant ma question.....

"FxM" a écrit dans le message de news:

chris wrote:
Bonjour à tous,

J'ai un formulaire avec 10 listbox et je souhaiterai que l'utilisateur ne
puisse selectionner seulement qu'1 listbox sur les 10. S'il s'apperçoit
qu'il a fait une mauvaise selection, qu'il ait la possibilité d'en
selectionner une autre et que la précédente selection se déselectionne
automatiquement.
Merci pour votre aide
Bonjour,


Voudrais-tu enlever cette *$£#@ de pub sous forme d'image nommée p.gif qui
est à chaque fois attachée à tes messages et dont l'utilité n'apparaît pas
comme évidente ?

Merci et @+
FxM







Avatar
chris
merci pour votre aide, ja vais essayer....

"docm" a écrit dans le message de news:
%
Bonjour.

Pour désélectionner, il faut mettre la propriété ListIndex à -1.
Si tes ListBox s'appelle ListBox1, ListBox2, etc...

Private Sub ListBox1_Click()
x = 1
For i = 1 To 10
If i <> x Then
Controls("Listbox" & i).ListIndex = -1
End If
Next
End Sub

Private Sub ListBox2_Click()
x = 2
For i = 1 To 10
If i <> x Then
Controls("Listbox" & i).ListIndex = -1
End If
Next
End Sub

Etc...

docm

"chris" a écrit dans le message de news:
#
Bonjour à tous,

J'ai un formulaire avec 10 listbox et je souhaiterai que l'utilisateur ne
puisse selectionner seulement qu'1 listbox sur les 10. S'il s'apperçoit
qu'il a fait une mauvaise selection, qu'il ait la possibilité d'en
selectionner une autre et que la précédente selection se déselectionne
automatiquement.
Merci pour votre aide