Supprimer les informations d'une plage de cellule

[lanoe]

Bonjour,

Je cherche à effacer (supprimer) le contenu des cellules D16 😀25 quand j'écris dans la cellule J3 après des recherches sur le forum je suis arrivé à :

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address(0, 0) = "J3" Then
Range("D16" & Target.Row & "😀25" & Target.Row).ClearContents
End If
End Sub

Mais je dois faire une erreur car il ne se passe rien.

Merci d’avance

Lanoe

 

[Creepy]

Re : Supprimer les informations d'une plage de cellule

Bonjour,

Si j'ai bien suivi essaie ca :

If Target.Address(0, 0) = "J3" Then
    Range("D16:D25").ClearContents
End If

@+

Creepy

 

[lanoe]

Re : Supprimer les informations d'une plage de cellule

Re bonjour,

simple, et surtout merci

Lanoe