copier lignes avec critere

[Michel]

bonjour au forum

je cherche a copier certaines de mes lignes et a les coller sur une autre feuille a un endroit bien precis.
ce que je cherche n'est pas tres simple a resumer c'est pourquoi ci joint un petit exemple de ce qu'il me faut.
j'espere ne pas trop abuser de votre temps en tout cas un grand merci d'avance

[file name=michel.zip size=1945]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/michel.zip[/file]

 

[Hellboy]

Bonjour Michel

Si tu veux passer par les fonctionnalité du chiffrié, tu n'as qu'a mettre un filtre automatique dans la feuille 3 et filter un par un les 2 nom. Tu n'as qu'a pappliquer un copie coller spécial avec les blancs non compris sur ta feuille 1

 

[michel]

salut,

en fait j'ai enormement simplifie le probleme, ce que je cherche c'est une macro car je travaille sur des bases de donnees gigantesque

merci du coup de main

 

[michel]

s'il vous plait....

 

[Monique]

Bonjour,

Par formules en attendant
Dans une colonne supplémentaire, une formule donne un n° aux lignes à transférer en feuille 1
Puis =INDEX(;EQUIV())
On peut donner un nom à la formule si c'est trop lent.
[file name=CollerMichel.zip size=4704]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/CollerMichel.zip[/file]

 

[Monique]

Re,

C'est quoi le Vincent qui traîne en ligne 27 ?
Je ne l'avais pas vu !

 

[michel]

en fait sous le vincent je voudrais mettre les lignes qui correspondent a ce prenom.

 

[Monique]

Re,

Toutes les lignes de tous les Jean les unes au-dessous des autres,
puis toutes les lignes de tous les Vincent ?
C'est ça ?
Parce qu'il n'y a qu'un seul Jean et un seul Vincent ?
Et qu'est-ce que tu fais des autres prénoms ?

 

[Hellboy]

Bonjour michel, Monique

J'aimerais en savoir plus sur le pourquoi et comment et ... de ton but. Parce que si tu fait un tri de tes données, tu peut aussi arriver a ce que tu veux faire. Il vont tous être en odre. Pourrais-tu détailler ta demande un peux plus s.v.p.

Merci !

 

[michel]

re,
les autres prenoms on oublit
c'est pourquoi une macro serait peut etre plus pratique

 

[Hellboy]

re

Donc, en fait on but est de conserver seulement des noms bien précis. Tu as dis que tu avais beaucoup de données. Ou sont ses données et comment tu les met dans Excel ?

Merci !

 

[michel]

re,
ce que j'ai mis sur ce fichier ce n'est qu'un exemple, en fait je dois retirer les lignes qui comportent un libelle precis pour les coller sur une autre feuille. chaque ligne de ma base de donnee est codee ce code pourait tres bien etre un prenom c'est pourquoi une macro capable de retirer telle ligne celon tel critere et de la coller a tel endroit sur une autre feuille correspond tout a fait a ce que je cherche

merci a vous

 

[Monique]

Re,

Tu dis 'retirer la ligne'
ce ne sera pas par formules

 

[michel]

re,
non pas oblige
le mieux serait de copier la ligne je me suis mal exprime mille excuses

 

[Hellboy]

re

Est-ce que ceci peut te donner un moyen de départ ?

Sub Bouton1_QuandClic()
Dim intLigne As Integer
Dim strCritere
For intLigne = 1 To Cells(65536, 1).End(xlUp).Row
    Select Case Cells(intLigne, 1)
           Case strCritere
                Rows(intLigne).Copy Destination:=Worksheets(1).Cells(Cells(1, 1).End(xlDown).Row + 1, 1)
    End Select
Next intLigne
End Sub