[XL-2003] Demande d'aide VBA Excel

[popo2009]

Salut tout le monde
j'ai une liste dans une feuille excel (code+Désignation)
ce que je voulais faire dans la 2ème feuille c'est d'avoir un programme pour que j'aie la possibilité de taper seulement le code puis la touche entrée et la désignation apprait automatiquement
merci d'avance
j'attend vos aides

[imsse]

Tu devrais mettre le code que tu as fais pour que l'on comprenne exactement ce que tu veux.

Car comme ca c'est un peu difficile de te donner des pistes

BON COURAGE.

[popo2009]

Ok, j'ai dans le même classeur 2 feuilles.
la première est sous forme d'un tableau de 2 colonnes (code & Désignation)
Exemple du tableau :
------------------------------
code | Codification
------------------------------
T001 | Fabrication Tube
B001 | Bobinage
------------------------------
la 2ème c'est pour la saisie des infos de la 1ère feuille
Exemple:
je vaudrais taper par exemple le code B001 dans la cellue A1 en appuyant sur la touche Entrée la désignation 'Bobinage' apparaît automatiquemet dans la cellule B1.

j'espère que c'est clai maintenant
merci encore

[mercatog]

Problème récurrent, dans l'évènement change de ta 2 feuille

Private Sub Worksheet_Change(ByVal Target As Range)
Dim c As Range
If Target.Cells.Count = 1 And Target.Column = 1 Then
    Set c = Sheets("Feuil1").Range("A2:A" & Sheets("Feuil1").Cells(Rows.Count, 1).End(xlUp).Row).Find(Target, LookIn:=xlValues, lookat:=xlWhole)  'adapter le nom de la première feuille
    If Not c Is Nothing Then Target.Offset(0, 1) = c.Offset(0, 1)
    Set c = Nothing
End If
End Sub

[popo2009]

ça na pas marché
sinon comment créer une liste contenant tous les codes et les désignations
en sélectionnant une cellule de la feuille, quand je double clique sur un code de la liste, automatiquement le code et la désignation s'affichent sur la cellule
et ainsi de suite pour d'autres sélections des codes et désignations
merci d'avance

[mercatog]

as tu adapté à ton cas ou bien faisait un simple copier coller en attendant le miracle. ça m'étonne
En plus, tu ne dis pas où ça coince!