rechercher une ligne avec une cellule reférence

[matthieu]

bonjour à tous,

J'ai un tableau avec des informations nom prénom et age
avec une référence. Mais plusieurs personnes peuvent avoir la même référence (voir fichier joint).
Et je voudrais que lorsque je tape dans une cellule (dans un autre classeur) une référence quelconque, cela m'affiche l'ensemble des lignes correspondant à cette référence.

Par exemple, si je tape 3, que cela m'affiche les 2 lignes corespondant aux 2 noms ayant cette référence. (alexandre et marc avec leur nom et leur age).

merci et bonne journée à tous.

 

[matthieu]

Si il n'y pas le fichier joint merci de me l'indiquer.
je vais réessayer de le mettre
recherche référence

 

[matthieu]

decidément je n'arrive pas a mettre le fichier dans le forum
donc je vous les mis sur mon site
à l'adresse si dessous

je suis vraiment desolé

 

[matthieu]

le fichier

 

[2passage]

Bonjour,

Pour info : 'fichier zippé sans accents ni caractères spéciaux ni espaces et inférieur à 50 Ko'. il faut absolument un .zip

(et je ne peux pas t'aider, le proxy m'enmpeche l'accès a ton fichier)
A+

 

[matthieu]

voila le fichier *.zip [file name=recherche_20050729141250.zip size=2553]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/recherche_20050729141250.zip[/file]

 

[Gibson94]

Salut Matthieu, 2passage, le forum,

Une petite routine...

Option Explicit

Sub Matthieu()
Dim ligne As Integer, ligne1 As Integer
Dim c1 As Variant, plage As String
' Plage de référence de la feuil1
plage = 'A2:A7'

' Ligne1 est la 1ère ligne de la feuil2 pour mettre les résultats
ligne1 = 6

For Each c1 In Worksheets('feuil1').Range(plage)
If c1 = Worksheets('Feuil2').Range('A3').Value Then
ligne = c1.Row
Worksheets('Feuil2').Range(Cells(ligne1, 1).Address).Cells = Worksheets('Feuil1').Range(Cells(ligne, 1).Address).Value
Worksheets('Feuil2').Range(Cells(ligne1, 2).Address).Cells = Worksheets('Feuil1').Range(Cells(ligne, 2).Address).Value
Worksheets('Feuil2').Range(Cells(ligne1, 3).Address).Cells = Worksheets('Feuil1').Range(Cells(ligne, 3).Address).Value
Worksheets('Feuil2').Range(Cells(ligne1, 4).Address).Cells = Worksheets('Feuil1').Range(Cells(ligne, 4).Address).Value
ligne1 = ligne1 + 1
End If
Next c1

End Sub

 

[matthieu]

merci
je suis un debutant sur excel

vous pourriez m'envoyer le fichier excel
avec la macro dedans car je n'arrive pas a la mettre en oeuvre merci

je suis vraiment desolé pour mon incompétence
encore merci pour la rapidité de la réponse [file name=recherche_20050729143405.zip size=2553]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/recherche_20050729143405.zip[/file]

 

[Monique]

Bonjour,

Avec une formule matricielle,
à valider par ctrl, maj et entrée
[file name=DoublonsMatthieu.zip size=5163]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/DoublonsMatthieu.zip[/file]

 

[matthieu]

merci beaucoup a vous tous

une grande partie de mes problemes sont resolus grace à vous

il me reste à resoudre le probleme que moi cela doit marcher
jusqu'a un nombre de ligne important
je met le fichier excel pour vous montrer
dans la feuil2 sous la premiere référence il faut que je puisse continuer le tableau avec d'autre référence

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

 

[Gibson94]

Re salut tout le monde,

Ci-joint fichier avec la macro...

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

 

[matthieu]

merci beaucoup pour votre aide

mais le problème c'est qu'il faut que à chaque fois que je valide une nouvelle référence, les nouvelles lignes trouvées se mettent en dessous des ligne précédentes.
Au final il y aura plusieurs lignes.

encore merci
[file name=recherches.zip size=11830]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/recherches.zip[/file]

 

[matthieu]

merci beaucoup pour votre aide

mais le problème c'est qu'il faut que à chaque fois que je valide une nouvelle référence, les nouvelles lignes trouvées se mettent en dessous des ligne précédentes.
Au final il y aura plusieurs lignes.

encore merci
[file name=recherches_20050729151421.zip size=11830]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/recherches_20050729151421.zip[/file]

 

[Monique]

Re,

En tapant tes références dans une plage annexe.
Une formule les met en ordre et en nombre.
Les formules ont changé depuis tout à l'heure,
toujours des formules matricielles, plus une : pour les références.
[file name=DoublonsMatthieuV1.zip size=4654]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/DoublonsMatthieuV1.zip[/file]

 

[matthieu]

merci Monique mais le seul souci

c'est que maintenant quand je tape 3 par exemple
il ne m'affiche pas les 2 ligne correspondannt à cette reférence.
Il faut que je tape 3, deux fois pour les avoir les 2.

Et en fait moi je souhaiterais tapé une référence 3 par exemple et que cela affiche toutes les ligne correspondant à cette référence.
Et ensuite en dessous que je continue à taper autant de référence que je le souhaite.

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