J'ai des textes dans las celulles de I9 à I466.
Les texes son des fois en minuscules, des fois en majuscules et même des fois une partie en minuscules ou majuscles.
Bref, c'est le bazard
1- Est-il possible de mettre tout en minuscule avec la 1ère lettre du mot en majuscule.
Ou
2- Tout mettre en majuscules
Ou
3- Tout mettre en majuscules
Sub test()
Dim C As Range
For Each C In Range("I9:I466")
If C.Value <> "" Then
C.Value = UCase(Left(C.Value, 1)) & LCase(Mid(C.Value, 2, Len(C.Value) - 1))
End If
Next C
End Sub
mettra la première lettre du texte en majuscule et le reste en minuscule. Si ensuite tu souhaites que ton texte modifié reste en A1 tu fais un copier/coller/collage spécial/valeurs de B1 vers A1.