Références qui renvoie aux désignations.....

Bonjour,

http://boisgontierjacques.free.fr/pages_site/recherchev.htm

JB
http://boisgontierjacques.free.fr

On 8 jan, 16:16, Moyo <M...@discussions.microsoft.com> wrote:

bonjours à toutes et à tous.

Je possède sur une feuille exel, 1er onglet, une liste
(réf+désignations+tarif). sur un deuxième onglet, je souhaiterai qu and je
tape la référence, que la désignations et le tarif s'inscrivent
automatiquement......
Quels conseils s'il vous plait pourriezvous me donner ?
merci d'avance
Chirs

Salut à toi

Dans le VBA de la feuille de saisie des références mets ce bout de code :

Private Sub Worksheet_Change(ByVal Target As Range)
Ligne = Sheets("Feuil1").Range("A1", "A" &
Sheets("Feuil1").Range("A65535").End(xlUp).Row).Find(What:=Target,
After:=Sheets("Feuil1").Range("A1"), LookIn:=xlValues, _
LookAt:=xlWhole).Row
Range(ActiveCell.Address, ActiveCell.Offset(0, 2).Address).Value =
Sheets("Feuil1").Range("A" & Ligne, "C" & Ligne).Value
End Sub

Les données à recopier doivent être en Feuil1 colonne A/B/C


Celà devrait convenir
Dis moi !!!!

Merci JB pour ta réponse rapide......mais je ne suis pas aussi experte que
toi....j'ai du mal à appliquer ce que tu m'a indiquée....
moyo

"FFO" a écrit :

Salut à toi

Dans le VBA de la feuille de saisie des références mets ce bout de code :

Private Sub Worksheet_Change(ByVal Target As Range)
Ligne = Sheets("Feuil1").Range("A1", "A" &
Sheets("Feuil1").Range("A65535").End(xlUp).Row).Find(What:=Target,
After:=Sheets("Feuil1").Range("A1"), LookIn:=xlValues, _
LookAt:=xlWhole).Row
Range(ActiveCell.Address, ActiveCell.Offset(0, 2).Address).Value =
Sheets("Feuil1").Range("A" & Ligne, "C" & Ligne).Value
End Sub

Les données à recopier doivent être en Feuil1 colonne A/B/C


Celà devrait convenir
Dis moi !!!!

Bonjour,

Vas voir là :
http://cjoint.com/?bjrH032rz6

Ça te convient ?


Serge



"Moyo" <Moyo@discussions.microsoft.com> a écrit dans le message de news:
941740DA-63A5-43DB-93FE-A8F0BDB0D667@microsoft.com...

bonjours à toutes et à tous.

Je possède sur une feuille exel, 1er onglet, une liste
(réf+désignations+tarif). sur un deuxième onglet, je souhaiterai quand je
tape la référence, que la désignations et le tarif s'inscrivent
automatiquement......
Quels conseils s'il vous plait pourriezvous me donner ?
merci d'avance
Chirs