OVH Cloud OVH Cloud

ListBox

6 réponses
Avatar
Barsalou
Bonjour
J'aimerais sélectionner un élément d'une listBox sans pour autant que
l'évènement click de ce contrôle soit exécuté. J'ai essayé list1.text=...,
list1.listindex=..., list1=... sans succès.
Merci

6 réponses

Avatar
Pierre Archambault
Salut Barsalou,

Il me semble que si tu ne mets pas de code dans l'événement Click, il ne se
passera rien.

Ou alors si tu as du code dans cet événement, il doit y avoir une condition
pour que ce code ne s'exécute pas. Tu pourrais vérifier cette condition au
début de la procédure:

If Condition = True Then Exit Sub

Pierre


"Barsalou" a écrit dans le message de
news:
Bonjour
J'aimerais sélectionner un élément d'une listBox sans pour autant que
l'évènement click de ce contrôle soit exécuté. J'ai essayé list1.text=...,
list1.listindex=..., list1=... sans succès.
Merci


Avatar
JLuc
A l'endroit ou tu veux pouvoir selectionner par code, met avant
Application.EnableEvent = False
et aprés
Application.EnableEvent = True

Si tu veux pouvoir selectionner à la souris sans événement, met un
bouton de commande :
Private Sub CommandButton1_Clic()
If CommandButton.Caption = "Go" Then
CommandButton.Caption = "Stop"
Application.EnableEvent = False
Else
CommandButton.Caption = "Go"
Application.EnableEvent = True
End If
End Sub


Barsalou a exprimé avec précision :
Bonjour
J'aimerais sélectionner un élément d'une listBox sans pour autant que
l'évènement click de ce contrôle soit exécuté. J'ai essayé list1.text=...,
list1.listindex=..., list1=... sans succès.
Merci



--
____
( O | O )
--
_oooO_ JLuc _Oooo_

O-O
Avatar
Barsalou
Merci
Je ne connaissais pas Application.EnableEvent
Avatar
Barsalou
mais apparemment mon VB6 ne reconnaît ni Application ni EnableEvents
Faut-il ajouter quelque chose dans les composants ?
Merci
Avatar
Jacques93
Bonjour,
Barsalou a écrit :
mais apparemment mon VB6 ne reconnaît ni Application ni EnableEvents
Faut-il ajouter quelque chose dans les composants ?
Merci



Application.EnableEvents est spécifique à VBA Excel.

--
Cordialement,

Jacques.
Avatar
Guy DETIENNE
Salut ;O)

Attention... Ici c'est avant tout un groupe basé sur VB6 et versions
antérieures...
La solution que tu proposes n'est pas du VB mais bien VBA.

Pour le 'débutant' et apparement c'est la cas de Barsalou, il risque d'y
avoir une grande confusion car il sera impossible d'utiliser le code proposé
et ne comprendra pas pourquoi cela ne fonctionne pas et risque de tourner en
rond.

Un programmeur VB averti sais que l'objet Application n'existe pas...

Donc il faudrait spécifier que la solution proposée ne s'adapte qu'à VBA et
ici spécifiquement Excel me semble-t-il.

N'oublions pas que VB et VBA, malgré leur similitude syntaxique au niveau
langage, sont 2 mondes ayant de très grandes différences.

Guy


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

A l'endroit ou tu veux pouvoir selectionner par code, met avant
Application.EnableEvent = False
et aprés
Application.EnableEvent = True

Si tu veux pouvoir selectionner à la souris sans événement, met un bouton
de commande :
Private Sub CommandButton1_Clic()
If CommandButton.Caption = "Go" Then
CommandButton.Caption = "Stop"
Application.EnableEvent = False
Else
CommandButton.Caption = "Go"
Application.EnableEvent = True
End If
End Sub


Barsalou a exprimé avec précision :
Bonjour
J'aimerais sélectionner un élément d'une listBox sans pour autant que
l'évènement click de ce contrôle soit exécuté. J'ai essayé
list1.text=..., list1.listindex=..., list1=... sans succès.
Merci



--
____
( O | O )
--
_oooO_ JLuc _Oooo_

O-O