Discussion :

[Freuzo]

Bonjour,
Désolé car je sais que cette question est posée plusieurs fois sur ce forum mais je n'ai pas pu adapter les solutions à mon petit problème.

Mon besoin : une macro qui copie chaque ligne dont la valeur à la cellule E commence par "dla" + contient "Mgr" dans la colonne i + contient "E" dans la colonne "N".
Et une feuille est créé et les lignes qui remplissent les conditions y sont collées.

Merci d'avance tout le monde.

[Menhir]

une macro qui copie chaque ligne dont la valeur à la cellule E commence par "dla" + contient "Mgr" dans la colonne i + contient "E" dans la colonne "N".
Et une feuille est créé et les lignes qui remplissent les conditions y sont collées.

Il faut le faire à l'envers : commencer par créer la feuille puis faire les copies.

Pour créer une feuille, méthode Add de la collection Worksheets (au pluriel) du classeur souhaité.
https://docs.microsoft.com/fr-FR/off...worksheets.add

Ensuite tu fais une boucle sur les lignes à scruter.
http://silkyroad.developpez.com/vba/boucles/

Tu fais un test If en vérifiant les trois premiers caractères du contenu de la cellule avec la fonction Left et la présence de te seconde chaine avec une fonction InStr(), les deux conditions reliées par un opérateur And.
https://docs.microsoft.com/fr-fr/off...else-statement
https://docs.microsoft.com/fr-fr/off.../left-function
https://docs.microsoft.com/fr-fr/off...instr-function
https://docs.microsoft.com/fr-fr/off...p/and-operator

Si le test est positif, tu fais une copie avec la méthode Copy appliquée à toute les ligne (Row).
https://msdn.microsoft.com/fr-fr/lib...0(v=office.15)

[Freuzo]

M'apprendre à pécher au lieu de me donner le poisson.
OK. Je vais essayer avec tous ces liens.
Merci.

[Menhir]

M'apprendre à pécher au lieu de me donner le poisson.

C'est le crédo de ce forum.

Cela dit, te fournir toutes ces explications et tous ces liens était plus long que de te donner le code tout fait.
Mais au moins ça te permettra de progresser.

[Freuzo]

C'est bien, j'aime cette philosophie. Je reviendrai poster ce que j'aurai obtenu comme code.

[Philippe Tulliez]

Bonjour,
Pour copier des données suivant conditions, tu as également une solution en utilisant la méthode AdvancedFilter (filtre avancé) de l'objet Range avec un critère calculé. Moins de cinq lignes de code

Pour en savoir plus sur les filtres avancés Les filtres avancés ou élaborés dans Excel

Quelques exemples

• Exemple simple
• Exportation des données en autant de feuilles qu'il n'y a d'éléments dans une colonne
• Contribution avec exemples sur la méthode AdvancedFilter et l'objet ListObject