Copier coller sous conditions (Macro)
Résolu/Fermé
kcrom
Messages postés
4
Date d'inscription
jeudi 19 juin 2014
Statut
Membre
Dernière intervention
26 juin 2014
-
19 juin 2014 à 14:37
kcrom Messages postés 4 Date d'inscription jeudi 19 juin 2014 Statut Membre Dernière intervention 26 juin 2014 - 21 juin 2014 à 11:14
kcrom Messages postés 4 Date d'inscription jeudi 19 juin 2014 Statut Membre Dernière intervention 26 juin 2014 - 21 juin 2014 à 11:14
Bonjour,
Je débute totalement sous vba, je souhaiterai faire un copier coller d'une ligne complète si elle contient un terme "xxx" (il est possible qu'il y ait un espace avant ou après) de la "feuil2" dans une autre feuille "feuil3" du même classeur et tout cela pour toute les lignes de la feuille.
Je souhaite lancer la macro depuis une feuille "feuil1" indépendante du même classeur.
la colonne contenant les termes à vérifier est "AC" dans la "feuil2".
Pouvez-vous m'aider?
Merci beaucoup pour votre aide
Je débute totalement sous vba, je souhaiterai faire un copier coller d'une ligne complète si elle contient un terme "xxx" (il est possible qu'il y ait un espace avant ou après) de la "feuil2" dans une autre feuille "feuil3" du même classeur et tout cela pour toute les lignes de la feuille.
Je souhaite lancer la macro depuis une feuille "feuil1" indépendante du même classeur.
la colonne contenant les termes à vérifier est "AC" dans la "feuil2".
Pouvez-vous m'aider?
Merci beaucoup pour votre aide
A voir également:
- Copier coller sous conditions (Macro)
- Copier coller pdf - Guide
- Historique copier-coller android - Guide
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Copier-coller - Accueil - Informatique
- Arobase copier coller - Forum Clavier
3 réponses
eriiic
Messages postés
24603
Date d'inscription
mardi 11 septembre 2007
Statut
Contributeur
Dernière intervention
15 décembre 2024
7 255
19 juin 2014 à 22:56
19 juin 2014 à 22:56
Bonjour,
Un exemple :
La macro suppose que tu as une ligne de titre et tu n'as pas de filtre automatique dessus. Sinon enlever les 2 lignes de code le mettant et l'enlevant.
https://www.cjoint.com/?DFtw4m9dLFo
eric
Un exemple :
Sub dupliquer() Dim derlig As Long, dercol As Long Sheets("Feuil3").Cells.ClearContents With Sheets("Feuil2") derlig = .Cells(Rows.Count, "A").End(xlUp).Row dercol = .Cells(1, Columns.Count).End(xlToLeft).Column .Range("A1").AutoFilter .Range("A1").AutoFilter Field:=29, Criteria1:="=*" & [B3] & "*", Operator:=xlAnd .Range("A1").Resize(derlig, dercol).Rows.Copy Sheets("Feuil3").[A1] .Range("A1").AutoFilter End With End Sub
La macro suppose que tu as une ligne de titre et tu n'as pas de filtre automatique dessus. Sinon enlever les 2 lignes de code le mettant et l'enlevant.
https://www.cjoint.com/?DFtw4m9dLFo
eric
kcrom
Messages postés
4
Date d'inscription
jeudi 19 juin 2014
Statut
Membre
Dernière intervention
26 juin 2014
Modifié par kcrom le 21/06/2014 à 11:11
Modifié par kcrom le 21/06/2014 à 11:11
Bonjour eric, merci pour ta réponse.
Je voulais te demander en quoi consiste cette ligne :
Criteria1:="=*" & [B3] & "*"
J'ai aussi un autre souci j'ai adapté ta macro et en fait il ne me copie que l'entête (la première ligne) et non les lignes suivantes...
Merci pour ton aide.
Je voulais te demander en quoi consiste cette ligne :
Criteria1:="=*" & [B3] & "*"
J'ai aussi un autre souci j'ai adapté ta macro et en fait il ne me copie que l'entête (la première ligne) et non les lignes suivantes...
Merci pour ton aide.
kcrom
Messages postés
4
Date d'inscription
jeudi 19 juin 2014
Statut
Membre
Dernière intervention
26 juin 2014
21 juin 2014 à 11:14
21 juin 2014 à 11:14
En fait c'est bon j'ai compris.
Tout fonctionne correctement. Merci pour ton aide!
Tout fonctionne correctement. Merci pour ton aide!