Bonjour le forum
Bonjour Jean-Paul, Chris & Jean-Marie
Et enfin par code VBA
Private Sub Worksheet_Change (ByVal Target as Excel.Range)
Application.EnableEvents = False
Target = Ucase(Left$(Target, 1)) & Mid$ (Target, 2)
Application.EnableEvents = true
End Sub
C'est ce que l'on appelle avoir l'embaras du choix...
@ + Eric C