VBA pour mettre en majuscule uniquement dans une zone précise

Bonjour

J'ai un code VBA qui me permet de mettre en majuscule les lettres dans toute la feuille, j'aimerais que ça soit uniquement dans une plage de cellule : C1 : F10

Code actuel

With Target.Cells(1, 1)

.Value = UCase(.Value)

Merci

Belle matinée

Cdt

N

Bonjour

Essaie ça :

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Range("C1:F10")) Is Nothing Then
        Target.Value = UCase(Target.Value)
    End If
End Sub

Bonjour norberlingo, gmb,

Je te propose ce code VBA :

Private Sub Worksheet_Change(ByVal Target As Range)
  With Target
    If .Count > 1 Then Exit Sub
    If Intersect(Target, [C1:F10]) Is Nothing Then Exit Sub
    Application.EnableEvents = False
    .Value = UCase$(.Value)
    Application.EnableEvents = True
  End With
End Sub

dhany

Bonjour et merci pour les solution apportées.

Ça à l'air de très fonctionner. Super

Merci et bonne continuation

A une prochaine

No

Merci pour ton retour ! bonne continuation à toi aussi !

dhany

Rechercher des sujets similaires à "vba mettre majuscule uniquement zone precise"