patouman
XLDnaute Occasionnel
Bonjour a tous,
j'ai une erreur qui apparait pour ma macro
ci dessous en particulier la partie en rouge.
Quelqu'un aurait peut etre la gentillesse de m'eclairer ?
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("C4:AC7")) Is Nothing Then Target = UCase(Target)
End Sub
Merci par avance
j'ai une erreur qui apparait pour ma macro
ci dessous en particulier la partie en rouge.
Quelqu'un aurait peut etre la gentillesse de m'eclairer ?
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("C4:AC7")) Is Nothing Then Target = UCase(Target)
End Sub
Merci par avance