Intitulé complet en fonction de son abréviation
Bonjour
En A1 j'ai une abreviation qui se met automatiquement par rechercheV
en A2 je voudrais que s'inscrive l'intitulé complet à partir ce l'abréviation en A1
chaque fois que j'ai un résultat en A1, l'intitulé complet doit s'afficher en A2 sans action quelconque.
Voici la liste
ATAV = ALARME TECHNIQUE
ATCAV = ALARME TECHNIQUE
BAMA = MULTIPONCTUEL GEMINI
BMAL = DM
MBASV = DM
OA-O = OPTIQUE ADRESSABLE CONVENTION
OA-T VELO = THERMIQUE VELO
SOLAR = DETECTEUR LINEAIRE
SOLARION = LINEAIRE DE FUMEE
VIA = IONIQUE ADRESSABLE DETECTEUR DE FUMEE
VIRA = IR de FLAMME
VOA = OPTIQUE DE FUMEE
VOTA = DETECTEUR CHALEUR + FUMEE
VTVA DETECTEUR THERMIQUE
Ps Si un code VBA est donné, pouvez vous m'expliquer comment l'inserrer et le faire fonctionner.
Je sais faire une macro mais avec un bouton pour la commande de réponse
Merci
Avec du VBA,
Alt + F11 pour voir le code (dans la feuille)
edit 1: Pour avoir une cellule vide si il n'y a pas d'abréviation, un petit
Else: Sheets(1).Cells(2, 1).Value = ""
avant la fin du if devrait régler l'affaire
Bonjour
Houla que de monde
Bonjour Amadéus
Bonjour Guitouille
En A2 tu fais une RECHERCHEV()
Voir fichier
Edit Amadéus: Banzai, bonjour. C'est ce que j'ai fait dans ma réponse
Edit : Oui j'ai vu après (mais comme j'avais un peu bossé dessus j'ai posté)
Merci à Tous