empecher le click sur listview

creolia

XLDnaute Impliqué
bonjour je cherche une solution pour empecher de cliquer sur ma listview au demarage de mon usf


j'ai essayer listview1.locked=true

sa à pas marcher sa me fais une erreur


je souhaite que les information apparaisse mais qu'ont puisse pas cliquez dessus merci d'avance à bientot
 

roro69

XLDnaute Impliqué
Re : empecher le click sur listview

Bonsoir
Il n'y a pas de propriété toute faite pour désactiver la séléction dans un listView car justement çà été créer dans le but de pouvoir SELECTIONNER des items dans une liste.
Je ne comprend pas l'utilité d'utilisé un listView si c'est pour désactiver la selection juste après....
Ceci dit il ya peut etre à eessayer du coté d'une var personnalisé tel que:
Private listView_ItemSelectionChanged(object sender, ListViewItemSelectionChangedEventArgs a)
'et au chargement de l'USF
With listView
if (a.IsSelected) a.Item.Selected = false
End with
A++
 

creolia

XLDnaute Impliqué
Re : empecher le click sur listview

en realité il va pas etre tous le temps desactivé mais juste au debut pour eviter certaine manipulation ensuite j'aurais un button pour le reactivé

en gros au debut il seras utiliser comme un moteur de recherche en lecture seul ensuite en cliquand sur un button modifier il me deverouilleras tous cela

merci pour ta réponse je teste sa

à bientot
 

creolia

XLDnaute Impliqué
Re : empecher le click sur listview

Bonsoir malheureusement vos solutions n'est pas exactement ce que je cherche

gilbert cette solution j'ai essayer le problème c'est qu'il me modifie le fond en gris

donc illisible

et celui de roro69 j'ai plein erreur

merci quand même

je continue mes recherche

à bientot
 

Roland_M

XLDnaute Barbatruc
Re : empecher le click sur listview

bonsoir,

exemple avec une variable propre à l'userf !
Code:
'- en haut du code de l'userform
Dim ListViewActif As Boolean

'- début du code UserForm_Initialize
Private Sub UserForm_Initialize()
ListViewActif = False
. . .

'- à chaque Sub de ListView concerné ! (exp ici ListView1)
Private Sub ListView1_ItemClick(ByVal Item As MSComctlLib.ListItem)
If ListViewActif = False Then Exit Sub
. . .


Private Sub ListView1_DblClick()
If ListViewActif = False Then Exit Sub
. . .


'- ensuite à toi de voir avec ton bouton pour remettre à True exemple
Private Sub ButtonActiveListView()
ListViewActif = True
End Sub
 

Discussions similaires

Membres actuellement en ligne

Statistiques des forums

Discussions
312 206
Messages
2 086 203
Membres
103 157
dernier inscrit
youma