casse bloquee

tototiti2008 à dit:

Bonjour 306225,

A ma connaissance seulement en VBA
une solution annexe pourrait être de mettre la cellule dans une police qui ne permet pas de saisir des minuscules, il me semble que ça existe...

Dans le code de la feuille (exemple avec la cellule A1)

Code:

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Count = 1 Then
        If Target.Address = "$A$1" Then
            Target.Value = UCase(Target.Value)
        End If
    End If
End Sub

Edit : Bonjour Victor, Mireille 🙂

Cliquez pour agrandir...