Excel vba :selectioner ligne dans feuile excel via un listbox

midogo -  
gbinforme Messages postés 14930 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,

j ai un listbox

je veux sélectionner une ligne dans la lixte qui sera s"lectionné automatiquement dans la feuille excel
et seulement seul les ligne sélectionées auront leur cellule contenant "NEW" seront modifiées en "MOD"

1 réponse

  1.
    gbinforme Messages postés 14930 Date d'inscription   Statut Contributeur Dernière intervention   4 744
     
    bonjour

    Si tu pouvais nous mettre un exemple sans éléments personnels mais avec la structure des données sur https://www.cjoint.com/ puis nous mettre le lien généré ici ce serait plus facile.
    0
    1. midogo
       
      Dim M As String
      Dim G As Range
      Dim W As Range
      Dim nbrows As Integer
      Dim i As Integer

      Dim j As Integer
      Dim H As Range
      Dim A As String

      Sheet17.AutoFilterMode = False
      Sheet17.Activate


      'Set W = Sheet17.Range("A1:J500")
      'W.Cells.AutoFilter field:=4, Criteria1:=UserForm2.numgroup.Value



      'M = InputBox("entrer la valeur de la modification")


      For i = 0 To ListBox1.ListCount - 1

      Do While ListBox1.Selected(i)
      'Set W = Sheet17.Range("A1:J500")
      ' W.Cells.AutoFilter field:=4, Criteria1:=ListBox1.List(i, 5)

      Set G = Sheet17.Range("A2:J500").Find(what:=ListBox1.List(i, 5), LookIn:=xlValues, lookat:=xlWhole)
      'Sheet17.Rows(i).Select

      MsgBox ("numero PM trouvé :") & G.Value
      MsgBox ("numero PM trouvé :") & G.Address

      G.Offset(0, 2).Value = "MOD"
      i=i+1
      loop
      next
      0
    2. gbinforme Messages postés 14930 Date d'inscription   Statut Contributeur Dernière intervention   4 744
       
      Bonsoir midogo,

      Content pour toi que tu ais trouvé la solution à ton problème.
      0