VBA

Bonjour,

J'aimerai bien savoir comment je pourrai selon un critère donné avoir les informations d'une page sur une autre. Je m'explique:

j'ai une worksheet A dans laquelle y a une colonne " choix" qui contient une liste déroulante, selon le choix choisi j'aimerai bien que la ligne qui appartient a ce choix apparaisse dans une autre worksheet " plan d'action".

Et j'ai 4 sélections de choix différents, si c'est le premier ça doit apparaître dans une partie de la feuille sinon quelque part d'autre.

J'avais pensé au code suivant:

Dim A as worksheet

dim B as worksheet

dim n as integer

Set A = worksheets.("Qualité environ")

set B = worksheets.("Plan d'action")

n= rows.count-2

For i =1 to n

If A.range("M1:M20").value = " prioritaire" then

B.range("D1:D6").value = A.range("A1:A20").value

Else if A.range("M1:M20").value = " exemplaire" then

B.range("E1:E6").value = A.range("A1:A20").value

else if A.range("M1:M20").value = " prioritaire" then

B.range("F1:F6").value = A.range("A1:A20").value

Next

End if

Mais je dois rassembler des données de 3 worksheets différents pour les mettre toutes dans une seule .

Mercii

bonjour

tu gères des plans d'amélioration ?

alors je te conseille une unique feuille de saisie, en colonnes simples

ensuite des tris, filtres et TCD

joins un exemple de ton fichier pour préciser ton besoin