fonction de recherche et recopie

Bonjour,

En b1 de la feuille b , si j'ai bien compris, ceci devrait faire

=SI($A1="";"";INDEX(Feuil1!B$1:B$1000;EQUIV($A1;Feuil1!$A$1:$A$1000;0)))

Puis par la poignée de recopie tirer vers la droite, ensuite vers le bas.

Salutations
JJ

"MAVEAN" <hernout.martial@wanadoo.fr> a écrit dans le message de
news:437ed5fa$0$20150$8fcfb975@news.wanadoo.fr...

Bonjour
Un classeur avec 2 feuilles.
Feuille 1 avec 1000 lignes et 30 colones. A1 à AE30 et A1 a A1000. (
tableau que j'ai remplis entiérement )
Dans la feuille B qui sera vierge au départ (sauf les formules) je
souhaite

de que si l'intervenant tape le chiffre 875 en A5 par exemple et que
dans

la colone A de la feuille 1, le chiffre 875 existe alors la ligne compléte
se recopie.
Exemple: J'ai rentré ce genre d'infos
A25= 875 B25= FILM C25= 1985 D25= EN BOITE ETC....
Si dans la feuille 2 je tape 875 dans la celulle A 60 par exemple je
souhaite avoir en B60 FILM en C60 1985 et ansi de suite.

Il me faut donc une formule mise dans la colone B et surement une fonction
de recopie dans toutes les autres celulles.
Merci de vos aides.

Re...
Exemple ici:
http://cjoint.com/?ltj1yDVJHn
JJ

Bonjour Mavean,

Dans la feuille 2 où l'action se déroule, copie dans la feuille module ceci :

'---------------------------------------
Private Sub Worksheet_Change(ByVal Target As Range)
Dim R As Variant, T As Variant
On Error Resume Next
If Not Intersect(Target, Range("A:A")) Is Nothing Then
With Worksheets("Feuil1")
R = .Range("A:A").Find(What:=Target, LookIn:=xlValues, Lookat:=xlWhole).Row
If Err = 0 Then
Application.EnableEvents = False
Range("A" & Target.Row & ":AE" & Target.Row).Value = .Range("A" & R & ":AE" & R).Value
Application.EnableEvents = True
Else
Err = 0
T = Target
Application.EnableEvents = False
Range("A" & Target.Row & ":AE" & Target.Row).Value = ""
Range("A" & Target.Row) = T
Application.EnableEvents = True
End If
End With
End If

End Sub
'---------------------------------------


Salutations!




"MAVEAN" <hernout.martial@wanadoo.fr> a écrit dans le message de news: 437ed5fa$0$20150$8fcfb975@news.wanadoo.fr...
Bonjour
Un classeur avec 2 feuilles.
Feuille 1 avec 1000 lignes et 30 colones. A1 à AE30 et A1 a A1000. (
tableau que j'ai remplis entiérement )
Dans la feuille B qui sera vierge au départ (sauf les formules) je souhaite
de que si l'intervenant tape le chiffre 875 en A5 par exemple et que dans
la colone A de la feuille 1, le chiffre 875 existe alors la ligne compléte
se recopie.
Exemple: J'ai rentré ce genre d'infos
A25= 875 B25= FILM C25= 1985 D25= EN BOITE ETC....
Si dans la feuille 2 je tape 875 dans la celulle A 60 par exemple je
souhaite avoir en B60 FILM en C60 1985 et ansi de suite.

Il me faut donc une formule mise dans la colone B et surement une fonction
de recopie dans toutes les autres celulles.
Merci de vos aides.