XL 2016 effacer le contenu de deux colonnes après une copie

[blackjack]

Bonjour à tous,
Job75 m'a bien aidé pour recopier des colonnes à la suite
j'ai avancé , j'ai créé un code pour affecter un bouton volant pour activer la macro
j'ai mis un code pour effacer le contenu des cellules des colonnes copiées contenant des dates saisies.
Le résultat après pas mal de recherches, c'est que j'efface tout le contenu des nouvelles colonnes créées alors que je voudrais garder les titres et les formules
Voici mon code
Sub Macro2()
' Macro2 Macro
With ActiveSheet.UsedRange
[P:S].Copy .Columns(.Columns.Count + 1).EntireColumn
[L:N].ClearContents

End With
End Sub

ci-joint mon tableau
Merci de l'aide
cordialement
Blackjack

 

[blackjack]

Finalement ce qu'il manque c'est l'instruction : après la copie des colonnes, effacer le contenu des cellules l5 : n25
voilà voilà
merci d'avance

 

[blackjack]

Bonjour à tous,
J'avance bien sur mon projet et je voudrais savoir s'il y a une instruction qui permettrait de coller les colonnes (ça c'est impeccable et le code fonctionne bien) mais sans les 3 ou 4 premières lignes du tableau ?
Merci d'avance et bonne journée