fenec
XLDnaute Impliqué
Bonjour le forum
Besoin de votre aide
J’utilise une macro qui fonctionne très bien pour sauvegarder ma feuille le problème viens du fait que je viens de rajouter :
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("F6:F49,F55:F98,F104:F147,F153:F196,F202:F236")) Is Nothing Then Target = UCase(Target)
If Not Intersect(Target, Range("C6😀49,C55😀98,C104😀147,C153😀196,C202😀236")) Is Nothing Then Target = Application.Proper(Target)
End Sub
Et maintenant ca bloque sur Ucase(target)
Vous joint un exemple qui sera plus simple
Cordialement
Fenec
Besoin de votre aide
J’utilise une macro qui fonctionne très bien pour sauvegarder ma feuille le problème viens du fait que je viens de rajouter :
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("F6:F49,F55:F98,F104:F147,F153:F196,F202:F236")) Is Nothing Then Target = UCase(Target)
If Not Intersect(Target, Range("C6😀49,C55😀98,C104😀147,C153😀196,C202😀236")) Is Nothing Then Target = Application.Proper(Target)
End Sub
Et maintenant ca bloque sur Ucase(target)
Vous joint un exemple qui sera plus simple
Cordialement
Fenec