Supprimer toutes les lignes d'une plage sélectionnée

Bonjour,

Ca doit etre tout simple, mais comme je l'ai dit dans le titre je voudrais pouvoir supprimer toutes les lignes d'une plage de cellules sélectionnée.

Voici mon code pour l'instant

Sub Macro1()

Range("NOM1:NOM2").Select

End Sub

Alors au début je pensais à truc du genre

Row(ActiveCell.Row).EntireRow.Delete

mais ca ne me supprime que la première ligne.

Donc je ne sais pas trop comment faire.

Si quelqu'un a une idée merci d'avance

Tioch

bonjour,

Sub SupprLignes()
    Selection.EntireRow.Delete
End Sub

Amicalement

Claude

Bonjour claude,

Merci ça marche parfaitement bien, exactement ce que je voulais.

Bonne journée