Re Salut,
Tu trouveras un fichier reprenant ce que je souhaite faire, j'ai réussi en partie à faire ce que je voulais avec une intruction With / End With, mais je ne peux
supprimer qu'un seul destinataire à la fois. La ListBox est en multiselect,
si tu pouvais jetter un oeil dessus et voir ce que tu peux faire pour que je puisse en supprimer plusieurs en une seule fois. Je me suis servi de la ligne de code que tu n'as donné
Range("A1").offset(i,0).entirerow.delete en l'adaptant
Merci,
A+
Pom