Afficher ligne Résolu/Fermé

Question

Bonjour, 
Dans le Formulaire, pourriez-vous, quand on clique sur un nom, afficher dans la feuille DB la ligne correspondante au nom choisi. Pourriez-vous aussi m’expliquer comment vous avez fait, car j'apprend le langage VBA, le Formulaire je l'ai trouvé dans Google.
Merci beaucoup 

https://cjoint.com/c/JHtiglbRW5l

cs_Le Pivert · Answer

Bonjour,

comme ceci:

Private Sub ListBox1_Click()
  For i = 1 To NbCol
    tmp = Me.ListBox1.Column(i - 1)
    If Not IsError(tmp) Then Me("textbox" & i) = tmp
  Next i
  Me.Enreg = Me.ListBox1.Column(NbCol)
  Sheets("BD").Activate
  Rows(ListBox1.ListIndex + 2 & ":" & ListBox1.ListIndex + 2).Select
End Sub 

on met le code dans l'évement  click de la ListBox

ListBox1.ListIndex est le numéro de l'index cliqué.

Cela commence à 0 il faut donc ajouter 1 et 1 pour la ligne d'en-tête cela fait 2 

Voilà c'est tout simple


car j'apprend le langage VBA,

depuis 2015, ce n'est pas récent!!!!!!!!!!!!

Mike-31 · Answer

Salut le fil,

mic6259, en Message Privé  je t'ai posté un correctif sur une discussion que j'ai traité avant l'été sur un tirage loto   
jette y un œil

Afficher ligne

2 réponses

Discussions similaires