XL pour MAC Fonction recherche

[gxnpli]

Bonjour j'aimerais pouvoir remplacer automatiquement lorsque je met par exemple la lettre A par un mot se trouvant dans un autre tableau, et faire également une combinaison. Par exemple voici le tableau concerné :

A= Post
B= Image
C= Vidéo

J'aimerais mettre A+B et ca m'écrit automatiquement Poste + image

Merci d'avance !

 

[sylvanu]

Bonjour Gxnpli,
Un essai en PJ avec :

Sub Worksheet_Change(ByVal Target As Range)
On Error GoTo Fin: If Target.Count > 1 Then Exit Sub
    If Not Intersect(Target, Range("C8:C10")) Is Nothing Then   ' Palge à ajuster
         Application.ScreenUpdating = False
         tablo = Split(Target, "+")
         Chaine = ""
         For L = LBound(tablo) To UBound(tablo)
            If Application.CountIf(Sheets("Tableau").[A:A], tablo(L)) > 0 Then
                N = Application.Match(tablo(L), Sheets("Tableau").[A:A], 0)
                Chaine = Chaine & "+" & Sheets("Tableau").Cells(N, "B")
            End If
         Next L
    End If
Fin:
Application.EnableEvents = False
Target = Mid(Chaine, 2)
Application.EnableEvents = True
End Sub