Bonjour,
En fait j'ai contourné le problème en demandant à l'utilisateur de choisir à la souris plusieurs cellules avec la touche Ctrl
(cellules récupérées via Application.inputbox) , puis c'est ma macro qui supprime les lignes demandées :
Dim cell1 As Range
Set cell1 = Application.InputBox _
("Sélectionner une OU PLUSIEURS cellules avec la souris", , , , , , , 8) 'ça donne par ex. :$A$3,$A$5,$A$12
cell1.EntireRow.Delete shift:=xlUp
J'avais cru comprendre dans des forums que Application.Inputbox ne pouvait remonter qu'une cellule, en fait ce n'est pas le cas.
Merci en tout cas de vos retours
Michael