Extraction de données

Bonjour,

J'ai un fichier contenant dans la première feuille la répartition des "pièces" dans des "caisses" (Tableau 1)


Je veux dans la deuxième feuille mettre le numéro de la caisse face au numéro de la pièce. (Tableau 2)



J'ai essayé avec la fonction RECHERCHEV sans succès.

Merci d'avance

4 réponses

  1. Salam 3alikoum,

    Voici un exemple : https://www.cjoint.com/c/EDpmUmbmF0A

    =RECHERCHEV(tartibalalouan!A4;tartibalalouan!A4:G30;7;FAUX)

    G30 étant la dernière cellule en bas à droite de ton tableau.

    7 étant le nombre de colonne le colonnes (mon tableau va de A à G soit 7 colonnes)

    Faux pour avoir une correspondance exact et non approximative.

    Cdlt
    0
    1. formule à mettre dans B5 classement pièce et à étirer
      0
  2. Bonjour,

    Tu peux utiliser une fonction personnelle VBA qui effectuera la recherche du numéro de pièce dans la plage correspondante puis renverra le numéro de caisse associé.

    Pour permettre de t'aider d'avantage, il faudrait pouvoir disposer de ton fichier.
    Tu peux le joindre en utilisant https://www.cjoint.com/

    A+
    0
    1. Rebonjour,

      Merci pour vous tous pour vos réponses !

      Excel-worker, la fonction RECHERCHEV m'oblige à indiquer la ligne et la colonne de la caisse et de la pièces, vu le nombre important ça sera un travail "presque manuel", c'est justement ce que je veux éviter pour gagner du temps.

      Gyrus, voici le lien de mon fichier complet, https://www.cjoint.com/c/EDptsc4gmVV
      si vous pouvez m'aider à élaborer une fonction VBA je vous serai très reconnaissant. (sachant que mes connaissances dans la programmation VBA sont "basiques" :) )

      Merci d'avance
      0
      1. Bonsoir,

        Ton fichier en retour.
        https://www.cjoint.com/c/EDpvaZO8Koq

        N'hésite pas à demander des précisions si nécessaire.

        A+
        1
        1. Merci infiniment Gyrus, c'est exactement ce que je voulais, il me reste juste un petit souci de mis à jour
          Si je mets les pièces manquantes dans une caisse ou que je change de caisse pour une pièce donnée, comment mettre à jour les données de la deuxième feuille

          Merci encore une fois
          0
        2. @green-eagle-1Bonjour,

          Ajoute l'instruction Application.Volatile :
          Function ChercheCaisse(Piece As Integer)
          Dim C As Range
          Application.Volatile
          With Worksheets("Classement des caisses")
          Set C = .Range("B4:K61").Find(Piece, , xlValues, xlWhole)
          If Not C Is Nothing Then
          ChercheCaisse = .Cells(C.Row, 1)
          Else
          ChercheCaisse = ""
          End If
          End With
          End Function

          A+
          0
        3. C'est parfait !

          Merci
          0