Demande d'aide extraction de données

franco -  
eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour, je tente de trouver une formule pour extraire des données de cette façon:

voici mon tableau:

colonne 1: critère (texte)
colonne 2: valeur du critère de 1 à 3

je cherche à regrouper sur une colone dans un autre tableau tous les critères ayant comme valeur

est-ce possible??
Merci d'avance pour votre réponse

2 réponses

  1. Kuartz Messages postés 852 Date d'inscription   Statut Membre Dernière intervention   65
     
    Bonjour,

    Le code a utiliser :

    Sub Code()
    
    DL = Cells(Application.Rows.Count, 1).End(xlUp).Row
    
    DL2 = Cells(Application.Rows.Count, 7).End(xlUp).Row
    
    Range(Cells(2, 7), Cells(DL2, 7)) = ""
    
    VALEUR = InputBox("Valeur souhaitée?")
    
    x = 2
    
    For i = 2 To DL
    
    If Range("B" & i).Value = Val(VALEUR) Then
        Range("G" & x).Value = Range("A" & i)
        x = x + 1
    End If
    
    Next i
    
    End Sub


    Je vous ai fait un petit fichier test que vous pouvez utiliser :

    https://www.cjoint.com/c/EKqqPopN5vf

    Cordialement.
    0
    1. franco1985 Messages postés 5 Statut Membre
       
      Formidable ton petit dossier kuartz merci beaucoup!!
      0
  2. Kuartz Messages postés 852 Date d'inscription   Statut Membre Dernière intervention   65
     
    Par contre, merci de faire attention à ne pas poster 2 fois le même message. Un seul suffit.
    0
    1. franco1985 Messages postés 5 Statut Membre
       
      Merci beaucoup pour votre réponse; entre temps j'ai crée mon compte d'ou le nouveau message.

      je suis donc obligé de passer par une macro, je ne peux pas trouver de formule adéquat??
      0
    2. eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   7 281
       
      Bonjour,

      Ca se fait en 3 clics.
      Tu mets un filtre automatique, tu filtres sur ta valeur et tu fais un copier-collé.
      Si besoin tu termines en supprimant les doublons.
      eric
      0