=MAJUSCULE("maman")
=NOMPROPRE("maman")
[A11] = UCase("maman")
[A11] = UCase(Left("MAMAN", 1)) & LCase(Mid("MAMAN", 2, 9 ^ 9))
[A11] = Application.WorksheetFunction.Proper([E6])
Cells(1, 1) = StrConv(Cells(1, 1), 3)
With Sheets("Feuil1")
.Range("A1").Value = StrConv(.Range("A1").Value, 3)
End With