Majuscule dans une cellule

bonjour,

ma requette est simple, je voudrais seulement avoir automatiquement des majuscules dans une colonne sélectionnées ( colonne c1 )

merci de votre réponse

Cordialement

merci de la réponse mais je voudrais que ça le fait directement sans passer par le bouton

Bonjour le forum,

Par le choix de certaines polices :

Bonjour,

Une proposition VBA avec une procédure évènementielle.

Cdlt.

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Count = 1 Then
        If Not Intersect(Target, Me.Range("C1:C25")) Is Nothing Then
            Application.EnableEvents = False
            If Not IsEmpty(Target) Then Target.Value = UCase$(Target.Value)
            Application.EnableEvents = True
        End If
    End If
End Sub

je remet un fichier,

et je voudrais que ça soit la colonne d qui soit en majuscule,

au lieu de la colonne a

merci de votre réponse

oups pas vu la réponse éric !

Re,

Essaie ainsi, en sachant que A=1, B=2, C=3, etc... !?

If Target.Count = 1 And Target.Column = 4 Then

merci à tous j'ai adapté le code VBA de jean-Eric

ça fonctionne parfaitement

je met en résolu

merci encore