Comment trouver rapidement la position de la première lettre en majuscule dans une chaîne de texte Excel ?
Supposons qu'il y ait une liste de chaînes de texte mélangées avec des chiffres, des lettres majuscules et minuscules. Comment pouvez-vous rapidement trouver la position de la première lettre majuscule dans ces chaînes ? Dans cet article, je présente des astuces qui permettent de spécifier rapidement la position de la première lettre en majuscule sans compter manuellement une par une dans Excel.
Trouver la position de la première majuscule dans une chaîne avec une formule
Trouver la position de la première majuscule dans une chaîne avec une fonction définie
Changer toutes les lettres en MAJUSCULES ou en Casse Adaptée avec Kutools pour Excel
Trouver la position de la première majuscule dans une chaîne avec une formule
Voici une formule qui peut vous aider à trouver rapidement la position de la première lettre en majuscule dans une chaîne. Veuillez suivre les étapes ci-dessous :
Sélectionnez une cellule vide à côté de la chaîne où vous souhaitez trouver la première majuscule, B1 par exemple, puis entrez cette formule =MIN(SI(ESTERR(TROUVE(CAR(LIGNE(INDIRECT("65:90")));A1));"";TROUVE(CAR(LIGNE(INDIRECT("65:90")));A1)))
Appuyez sur Maj + Ctrl + Entrée pour obtenir le résultat correct, puis faites glisser la poignée de remplissage automatique sur les cellules où vous devez appliquer cette formule. Voir capture d'écran :
Trouver la position de la première majuscule dans une chaîne avec une fonction définie
En plus des formules, vous pouvez également utiliser une fonction définie pour trouver la position de la première majuscule dans la chaîne.
1. Activez la feuille contenant la chaîne où vous souhaitez trouver la majuscule, puis appuyez sur Alt + F11 pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.
2. Cliquez avec le bouton droit sur la feuille que vous souhaitez utiliser dans le volet Explorateur de projets, puis cliquez sur Insérer > Module, et collez le code ci-dessous dans le script du module vierge. Voir capture d'écran :
Code : Trouver la position de la première majuscule dans une chaîne.
Function GetFirstUpper(Rg As Range) As Integer
'UpdatebyExtendoffice20160726
Dim xStr As String
Dim I As Integer
Application.Volatile
GetFirstUpper = -1
On Error Resume Next
xStr = Trim(Rg.Value)
For I = 1 To Len(xStr)
If (Asc(Mid(xStr, I, 1)) < 91) And (Asc(Mid(xStr, I, 1)) > 64) Then
GetFirstUpper = I
Exit Function
End If
Next
End Function
3. Enregistrez le code et revenez à la feuille que vous utilisez, puis sélectionnez une cellule vide à côté de la chaîne où vous souhaitez trouver la majuscule, entrez cette formule =GetFirstUpper(F1), puis appuyez sur Entrée et faites ensuite glisser la poignée de remplissage automatique sur les cellules nécessitant cette formule. Voir capture d'écran :
Astuce : S'il n'y a pas de lettre majuscule dans la chaîne, le résultat affichera -1.
Changer toutes les lettres en MAJUSCULES ou en Casse Adaptée avec Kutools pour Excel
Dans le travail quotidien sous Excel, vous devrez peut-être souvent changer des chaînes de lettres en MAJUSCULES, Casse Adaptée, minuscules, casse de phrase ou AlTeRnEr La CaSsE comme illustré dans la capture d'écran ci-dessous.
Avec Kutools pour Excel, vous pouvez utiliser son utilitaire Changer la Casse pour modifier rapidement la casse des lettres selon vos besoins.
Après avoir installé gratuitement Kutools pour Excel, veuillez procéder comme suit :
1. Sélectionnez les chaînes dont vous souhaitez modifier la casse, puis cliquez sur Kutools > Texte > Changer la Casse. Voir capture d'écran :
2. Ensuite, dans la fenêtre contextuelle Changer la Casse de dialogue, cochez l'option souhaitée dans la section Changer le type et vous pouvez prévisualiser le résultat dans le volet Aperçu. Voir capture d'écran :
3. Cliquez ensuite sur OK ou Appliquer pour changer la casse.
Kutools pour Excel - Boostez Excel avec plus de 300 outils essentiels. Profitez de fonctionnalités IA gratuites en permanence ! Obtenez-le maintenant
Meilleurs outils de productivité Office
Dynamisez vos compétences Excel avec Kutools pour Excel et découvrez une efficacité inégalée. Kutools pour Excel propose plus de300 fonctionnalités avancées pour booster votre productivité et gagner du temps. Cliquez ici pour obtenir la fonctionnalité la plus essentielle pour vous...
Office Tab apporte une interface à onglets à Office, et facilite grandement votre travail
- Activez la modification et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
- Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, au lieu d’ouvrir de nouvelles fenêtres.
- Augmentez votre productivité de50% et réduisez des centaines de clics de souris chaque jour!