Faire correspondre contenu d'une cellule avec titre colonne

Bonjour,

J'ai un problème qui doit être simple à résoudre, mais sur lequel je bloque

J'ai un tableau à simple entrée avec seulemennt des titre de colonnes.

Dans ce tableau il ya plusieurs nom.

Je souhaiterai avoir la liste de tout les noms dans une colonne avec dans une 2eme colonne la correpsondance au titre de la colonne

J'ai mis un fichier excel joint très clair pour expliciter mon problème

Merci d'avance pour vos lumières

PS : j'ai excel 2007

bonjour

moi c'est du2000 (rustique)

avec une formule simple ;un essai a tester

cordialement

Bonjour, salut tulipe,

Sub Tableau()
Dim Cel As Range, c
  Application.ScreenUpdating = False
  Range("e18:f" & [e65000].End(xlUp).Row + 1).ClearContents 'efface

    For Each Cel In Range("e6:k14")
        Set c = Range("e18:e" & [e65000].End(xlUp).Row) _
        .Find(Cel, LookIn:=xlValues, lookat:=xlPart)
        If Not IsEmpty(Cel) And c Is Nothing Then
            With Range("e" & Rows.Count).End(xlUp)(2)
            .Value = Cel
            .Offset(0, 1) = Cells(5, Cel.Column)
            End With
        End If
    Next Cel
End Sub

Bonne journée

Claude

Merci Claude,

J'ai adapté la macro et ca marche parfaitement !

Merci beaucoup

Tulipe merci aussi ,

mais je n'avais pas bien compris ce que tu voulais dire

Merci quand même

Bonne journée

Lucas