Macro VBA + retour arrière indisponible

Bonjour,

J'ai cherché sur des forums une astuce afin de forcer des textes à se mettre en majuscule automatiquement.

J'ai trouvé le code suivant en vba (c'est ma première "vrai" macro en VBA) :

Private Sub Worksheet_Change(ByVal Target As Range)
Dim zz
Dim c As Range
Set zz = Intersect(Target, [D:D])
If zz Is Nothing Then Exit Sub
Application.EnableEvents = False
 For Each c In zz.Cells
   c = UCase(c)
 Next
Application.EnableEvents = True
End Sub

Tout fonctionne, sauf que lorsque l'on tape un texte dans une des cellules, on a plus la possibilité de retour en arrière (flèche bleue).

Est-ce ça vient d'un mauvais code, du VBA en lui-meme ?

Existe-t'il une autre méthode ?

Merci par avance

Bonjour,

Il n'y a pas de possibilité d'annuler ce qu'a fait une macro.

Par contre tu peux faire une autre macro pour mettre en minuscule...

A+

Merci Galopin01,

Est-ce qu'il y aurait une autre solution que le VBA pour forcer le passage en majuscule ?

Je souhaiterais garder la possibilité de revenir en arrière en cas d'erreur pour l'utilisateur du tableau.

@+