Tableau inventaire

Bonjour,
J'ai fait un tableau pour un inventaire de pièces ainsi qu'un petit système de recherche pour visualiser la quantité de la pièce recherchée , le site où elle se trouve etc...
Le mode de recherche (onglet recherche) que j'ai fait me permet de savoir si la pièce recherchée se trouve sur plusieurs site à la fois.
j'aimerai pouvoir changer la quantité de la pièce trouvée en fonction de son emplacement , de son site et bien sur de sa référence. Par ex ne changer que la quantité du site de Golfech sans changer celle de Saint Loup. Je peux joindre le fichier si nécessaire.
Merci pour vos réponses

6 réponses

  1. Bonsoir

    Poste ton fichier sur cjoint.com, copie le lien créé et reviens le coller ici

    Cdlmnt
    Via
    0
    1. Bonjour

      Voici le fichier : https://www.cjoint.com/c/JFkrSatCLn2

      Dans l'onglet recherche, il y a 2 lignes (une grise et une verte). A leurs gauche un bouton qui ferai que je puisse modifier la quantité (en C11 ou C12) uniquement de cette ligne sans modifier l'autre, en mettant la valeur voulue soit en G11 ou en G12,
      Dans l'onglet Golfech, les lignes en jaune sont justement des doublons qui peuvent servir d'exemple. Sachant que je vais rajouter d'autre lignes( Références) qui auront aussi des doublons, le tableau va s'étendre au delà des 1500 lignes.
      Désolé mais j'espère être clair dans mes explications.
      Merci

      Cordialement

      Agino44
      0
      1. Re,

        https://mon-partage.fr/f/sAEHZru7/

        Les 2 boutons sont opérationnels

        Attention ne traite pas des doublons comme ceux des lignes 6 et 7
        La macro s'arrête ) la 1ere valeur trouvée et remplace à cette ligne (ici ce serait la 6)
        Mais à mon sens si la BDD est bien faite il ne devrait pas y avoir de tels doublons mais une seule ligne avec quantité 3

        Cdmnt
        Via
        0
        1. Bonsoir,

          Excuse moi mais après avoir téléchargé le fichier, celui-ci ne s'ouvre pas.

          Merci

          Cordialement
          Agino44
          0
          1. Je viens de la retelcharger et il s'ouvre parfaitement
            Voici les codes des macros à mettre dans le worksheet de la feuille
            Sub MAJ_Golfech()
            valeur = Cells(11, 7)
            ref = Cells(7, 3)
            With Sheets("Golfech")
            ligne = .Columns(1).Find("*", , , , xlByColumns, xlPrevious).Row
            For n = 1 To ligne
            If .Range("E" & n) = "Golfech" And .Range("A" & n) = ref Then .Cells(n, 2) = valeur: MsgBox "MAJ effectuée"
            Next
            End With
            End Sub
            
            Sub MAJ_Saintloup()
            valeur = Cells(12, 7)
            ref = Cells(7, 3)
            With Sheets("Golfech")
            ligne = .Columns(1).Find("*", , , , xlByColumns, xlPrevious).Row
            For n = 1 To ligne
            If .Range("E" & n) = "Saint loup" And .Range("A" & n) = ref Then .Cells(n, 2) = valeur: MsgBox "MAJ effectuée"
            Next
            End With
            End Sub

            0
            1. Bonsoir,

              Super cela fonctionne très bien.
              Je te remercie pour ton aide car moi je suis un novice en VBA.

              Encore merci

              Agino
              0