Discussion :

[kayo128]

Bonjour à tous,

J'espèe bien que quelqu'un puisse m'aider dans ce forum car ça fait un mois que je cherche une macro mais en vain !! (disant que je ne maitrise pas beaucoup les boucles sur VBA...)

Je suis un stagiaire dans une entreprise et ma mission est de faire un planning d'ordonnancement pour une ligne de production. Mon problème consiste à trouver une Macro qui pourra me permettre de rechercher une valeur d'un tableau dans un autre sur la même feuille, puis supprimé cette valeur et déclaer la plage à côté vers la gauche.

J'ai mi ci-joint mon fichier pour plus d'explication et je vous remercie d'avance ^^

[Daniel.C]

Bonjour,

Attache la macro suivante à un bouton (note que tu devras enregistrer ton classeur au format xlsm, le format xlsx ne pouvant avoir de macros) :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
Sub Traitement()
    Dim Col, c As Range, x As Range
    For Each c In Range([I11], Cells(11, Columns.Count).End(xlToLeft))
        For Each x In [D7:AB7]
            If x.Value = c.Value And x.Offset(1) = c.Offset(1).Value Then
                x.Offset(1, 1).Resize(2).Delete xlToLeft
                Exit For
            End If
        Next x
    Next c
End Sub

[kayo128]

Bonjour,

Je vous remercie pour votre réponse c'est gentil

Votre Macro est très proche ce que je souhaite faire, par contre vous avez travaillé que sur "ref", il faudrait de même pour "Client". Il reste aussi la requête suivante, "chaque plage ("ref+Client"), on la recherche une et une seule fois"... Si vous avez besoin de plus d'explication n'hésiter pas et merci pour votre aide ^^

Cordialement,

[Daniel.C]

Je ne comprends pas bien; peux-tu mettre en pièce jointe le classeur avec le résultat voulu.

[kayo128]

Bonjour

Merci de votre réponse. J'ai mis ci'joint une nouvelle version du fichier avec des explications plus clair je pense ^^

J'ai rajouté les onglets "résultats 1" pour la premier solution, puis l'onglet "Résultats 2" pour éclaircir le rôle de la fonction mémoire si c'est possible à réaliser dans une macro !

Je vous remercie d'avance.

Cordialement,

[Daniel.C]

Deux choses encore :
1. La plage I10:K12 est vide; est-ce normal ?
2. On peut mémoriser, mais si le classeur est fermé et rouvert, cette mémorisation est perdue. On pourrait mettre un "x" en ligne 13 sous le couple de cellules traitées ? A toi de voir.