Erreur dans code VBA pour effacement de cellules

Bonjour

J'ai mis ce code sur un bouton ,j'ai une erreur et malheureusement ,je ne la trouve pas

Besoin de votre aide

Merci

Worksheets("Poule 1").Range("J2:K3"),("J6:K7"),("J10:K11"),("J14:K15"),("J18:K19").ClearContents

Bobjour

Essai

Worksheets("Poule 1").Range("J2:K3,J6:K7,J10:K11,J14:K15,J18:K19").ClearContents

A+ François

Bonjour fanfan38

Merci pour ta réponse tout fonctionne

en plus j'avais une protection de feuille qui me génait.

Cordialement