Problème de macro dans VB

[acaly]

Bonjour,

J'ai créé la macro suivante dans VB afin que tout le texte inscrit dans la colonne A soit en automatiquement en majuscule.

Private Sub Worksheet_Change(ByVal zz As Range)
If Intersect(zz, [A1:A1000]) Is Nothing Then Exit Sub
Application.EnableEvents = False
zz = UCase(zz)
Application.EnableEvents = True
End Sub

La macro a fonctionné normalement, mais Excel a détecté une erreur à la ligne zz = UCase(zz) et depuis ce temps, elle ne fonctionne plus.

Qu'est-ce que cela signifie et comment réparer l'erreur ?

Merci encore une fois pour votre aide

 

[Hellboy]

Bonjour acaly

J'ai essayé ta macro telquel et je n'ai pas d'erreur, même avec des nombres. Alors il pourrait être aventageux que tu nous attache ton fichier pour mieux y voir.

Merci !

a+