explication

[marleauc]

Bonjour voici ma question j'Ai une formule VbA qui fonctionne pas C-A-D que lorsque que j'Appui sur la ligne de la listview3 , elle n'Affiche que seulement la première ligne

Formule Vba
Private Sub ListView3_Click()
Dim SelItemTxt As String
Dim rngR As Range, c As Range
SpinBBase = Me.ListView3.SelectedItem.Index
'IndexBase = SpinBBase.Value
'Stop
SelItemTxt = Me.ListView3.SelectedItem.SubItems(2)
Set rngR = Sheets("Base").Range("A2:M" & Range("A65000").End(xlUp).Row)
Set c = rngR.Find(SelItemTxt, lookat:=xlPart)
IndexBase = c.Row - 1
AlimenteTb
End Sub

 

[Jam]

Re : explication

Bonsoir marleauc,

Je pense qu'il faudrait revoir ta question et le sujet de ton post pour pouvoir espérer une belle réponse du forum.
Pour mémoire, (re)prend le temps de lire la charte Lien supprimé

Bon courage

 

[YANN-56]

Re : explication

Bonsoir, ou Bonjour suivant l'heure marleauc, et à ceux qui passeront par là,

Je suis un fervent adepte des listView (Attention! Il ne faut pas entendre "Pro")

Il me serait peut-être possible de t'aider, mais avec ton USF
genre tableau de bord de Boeing; il n'est pas facile de s'y retrouver.

D'autant que tu as rebaptisé les contrôles, et ajouter desTrucs dans "ThisWorkbook" qui dérangent.

Te serait-il possible de joindre un exemple avec seulement une base de données et un USF
comportant la ListView, son initialisation, et son remplissage?

Amicalement,

Yves

P.S. Jam que je salue au passage a bien raison.
Sois plus clair dans l'énoncé de ta question