Formatter une cellule pour ne pas accepter les majuscules

Bonjour Marie Claude, bonjour Forum

A moins qu'il n'existe une formule spécifique, je propose de le faire en VBA sur une macro évènementielle dans le Private Module de la Feuille en Question sur l'évènement "Change" comme ceci

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim LeTexte As String, Maj As String, Reste As Byte, Min As String
LeTexte = Range("A1")

If LeTexte <> "" Then
Maj = UCase(Left(LeTexte, 1))
Reste = Len(LeTexte) - 1
Min = LCase(Right(LeTexte, Reste))
Range("A1") = Maj & Min
End If
End Sub

A adapter pour la cellule où tu as besoin de ce format "texte en nom propre" (ici pour cet exemple "A1")

Bonne Journée
@+Thierry

Re Marie-Claude

Vu que juste après avoir testé cette macro et réalisé une autre pour Tranbi ("Doublon Checking") tu peux avoir un fichier exemple pour avec cette Macro "Format Nom Propre" si tu charges la mini démo qui se trouve dans Ce fil de discussion

@+Thierry