Majuscule dans cellule

Bonjour,

je souhaiterais que lorsque je saisi un mot dans une cellule, qu'excel transforme automatiquement la première lettre en majuscule pour le cas où j'oublierais de le faire.Quelqu'un aurait-il une astuce ?

Je vous remercie de votre aide.

Bien cordialement

THIERRY

Bonjour

=NOMPROPRE(A1)

Bonne nuit

merci banza pour cette réponse si rapide

bien cordialement

THIERRY

Bonjour à tous,

Dans le VBE de la feuille concernée (plage à adapter, ici A3:A...)

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Application.Intersect(Target, Range("a3:a" & [a65536].End(xlUp).Row)) Is Nothing Then
        Application.EnableEvents = False
            Target = Application.Proper(Target)
        Application.EnableEvents = True
    End If
End Sub

Amicalement

Claude