Copie d(une sélection par filtre

[Chris]

Bonjour à tous ...
Si quelqu'un peut m'aider, cela me rendrait bien service..
Voici mes 2 problèmes :

1) Je souhaite copier les enregistrements sélectionnés dans une base de données à la suite d'un filtrage avec le filtre automatique. Quelle procédure écrire ?

2) Dans cette base de données, je veux, grace à une macro, rechercher le nom d'une personne dans la liste des noms qui se trouvent dans la première colonne et quand je l'ai trouvé, copier les éléments qui se trouvent dans les colonnes suivantes. Quelle procédure utiliser?

Merci d'avance à celui qui pourra me dépanner et bon courage sur excel.

 

[Moa]

Salut Chris !

Pour la première partie de ta question, c'est simple, tu fais une première fois la manip complète après lancé l'enregistreur de macros et voilà, une macro toute faite.

Et pour la deuxième partie de ta question, il nous faudrait un peu plus de précision, car avec une simple Liste de validation et une RechercheV, ça devrait aller.

@ +

Moa

 

[Moa]

Voilà, je t'ai fait un exemple vite fait !

Voici la macro qui en découle, faite avec l'enregistreur

Sub Recopie()
Range("A1").Select
Selection.AutoFilter
Selection.AutoFilter Field:=1, Criteria1:="Blao"
Range("A4:C4").Select
Range(Selection, Selection.End(xlDown)).Select
Selection.Copy

Sheets("Feuil2").Select
Range("A2").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Range("A1").Select

Sheets("Base").Select
Selection.AutoFilter Field:=1
Range("A1").Select
Application.CutCopyMode = False
Selection.AutoFilter
End Sub

A plus Moa