Afficher ligne

Résolu
mic6259 Messages postés 371 Statut Membre -  
Mike-31 Messages postés 18405 Date d'inscription   Statut Contributeur Dernière intervention   -
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

2 réponses

  1. cs_Le Pivert Messages postés 8437 Statut Contributeur 730
     
    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!!!!!!!!!!!!

    0
    1. mic6259 Messages postés 371 Statut Membre 1
       
      Bonjour Le Pivert
      Çà fonctionne a merveille
      Un grand merci
      Cordialement
      0
  2. Mike-31 Messages postés 18405 Date d'inscription   Statut Contributeur Dernière intervention   5 147
     
    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
    0