colonne en majiscule

[faragim]

j'ai un tableau je veux que la colonne des noms soit toujour en majiscule chaque fois que je quitte la cellule saisie

 

[kjin]

Re : colonne en majiscule

Bonsoir,
Bonsoir, s'il vous plait, merci ne font pas partie de ton vocabulaire ?!
A l'inverse, je "veux" ne fait pas partie du mien
Macro événementielle dans le module de la feuille

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Target.Column = 1 And Target <> "" Then
    Application.EnableEvents = False
    Target = UCase(Target)
    Application.EnableEvents = True
End If

End Sub

A+
kjin