Cela nécessitera VBA. Considérez ce scénario:
La validation des données dans la colonne D est alimentée par les valeurs LongList dans la colonne A.
Un événement de changement de feuille de travail agira sur la colonne D, effectuera un Vlookup pour obtenir la valeur courte et remplacera la valeur de la cellule en cours. Voici le code:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim short As String
If Not Intersect(Target, Range("D:D")) Is Nothing Then
short = Application.VLookup(Target.Value, Range("A1:B4"), 2, False)
Application.EnableEvents = False
Target = short
Application.EnableEvents = True
End If
End Sub
Cliquez avec le bouton droit sur l'onglet Feuille et sélectionnez "Afficher le code". Collez le code ci-dessus dans la fenêtre de code. Ajustez les références de cellule pour refléter votre classeur.