Détecter un mot et le mettre en majuscule

[Sinistrus]

Bonjour à tous !

J'ai une liste de 13.000 article avec le nom des marques, tout en minuscule sur la colonne A.
Je sollicite votre aide afin de convertir la marque en majuscule.
Sachant que dans la colonne A1 j'ai ma liste d'articles et dans ma colonne E j'ai ma liste de marques, comment lui dire en Colonne B qu'il détecte la marque de E et met en majuscule ?


Eau de parfum incidence®
Eau de toilette incidence® bleue
Talc incidence® bleu
Eau de cologne marquise bleue
Déodorant marquise bleue
Eau de toilette marquise bleue
Crème p'tit chéri® bleu
Crème p'tit chéri® rose
Eau de cologne p'tit chéri® bleu


INCIDENCE
MARQUISE BLEU
P'TIT CHERI

Merci de votre aide

 

[vgendron]

Re : Détecter un mot et le mettre en majuscule

Bonjour

Voir PJ comme début de pise

 

[Sinistrus]

Re : Détecter un mot et le mettre en majuscule

Merci de ta réponse rapide vgendron

C'est long comme opération punaise !
Et si on dois passer par macro ? ca serait tout aussi complexe ?

 

[camarchepas]

Re : Détecter un mot et le mettre en majuscule

Bonjour Vgendron, Sinistrus

En vba ,

Sub Maj()
Dim Lignefin As Long, Tourne As Long
Lignefin = Range("A" & Rows.Count).End(xlUp).Row
For Tourne = 1 To Lignefin
Range("K" & Tourne) = Replace(Range("A" & Tourne), Range("E" & Tourne), UCase(Range("E" & Tourne)))
Next Tourne
End Sub