YANN-56
XLDnaute Barbatruc
Bonjour à tous,
J'ai eu un peu de mal à rédiger le sujet de ma question pour être compris dans ma recherche.
Dans l'exemple joint j'initialise mon USF comme suit:
Immédiatement une action sur la roulette de la souris me change
le premier Item visible... (C'est l'un des premiers buts)
Par la suite en cliquant sur le Bouton "Item Visible?"
Le TextBox me l'indique... et la roulette redevient active sur la ListView.
Sauf que je cherche à faire que par suite de la modification du "FirstVisible",
le TextBox s'actualise, sans passer par le Bouton...???
(La fonction ListView_Change() n'existant pas, je ne sais comment procéder)
Et là je sèche lamentablement... D’où mon appel à vous.
Merci d'avance à qui m'aidera.
Yann
J'ai eu un peu de mal à rédiger le sujet de ma question pour être compris dans ma recherche.
Dans l'exemple joint j'initialise mon USF comme suit:
Code:
Private Sub UserForm_Initialize()
With Me.ListView1
.Gridlines = True: .View = 3
With .ColumnHeaders
.Add , , "ZOOM", 80
End With
For i = 1 To 10
.ListItems.Add , , i
Next i
End With
End Sub
Immédiatement une action sur la roulette de la souris me change
le premier Item visible... (C'est l'un des premiers buts)
Par la suite en cliquant sur le Bouton "Item Visible?"
Code:
Private Sub CommandButton1_Click()
Me.TextBox1.Value = Me.ListView1.GetFirstVisible.Index
Me.ListView1.SetFocus
End Sub
Le TextBox me l'indique... et la roulette redevient active sur la ListView.
Sauf que je cherche à faire que par suite de la modification du "FirstVisible",
le TextBox s'actualise, sans passer par le Bouton...???
(La fonction ListView_Change() n'existant pas, je ne sais comment procéder)
Et là je sèche lamentablement... D’où mon appel à vous.
Merci d'avance à qui m'aidera.
Yann