Sélectionner et supprimer des colonnes entières

Bonsoir à tous,

Dans ma macro VBA, j'ai sélectionné une plage de cellules en vue d'étendre la sélection à leurs colonnes et les supprimer.

J'ai sélectionner avec

Range(strPlageSélectionnée).Activate

Je sais que pour sélectionner une colonne :

ActiveCell.EntireColumn.Select

et que pour supprimer

ActiveCell.EntireColumn.Delete

Mais comment puis je faire pour sélectionner puis supprimer toutes les colonnes qui contiennent la plage ?

Merci à l'avance pour votre aide.

PS: les images sont dans l'ordre du bas vers le haut

Bonjour

Plage.EntireColumn.Delete

Et inutile de sélectionner quoi que ce soit !

Cordialement.

Bonjour MFerrand et merci encore une fois pour votre réponse

J'ai mis ce code là et enlevé la sélection. ça marche exactement comme je le voulais.

Bonne journée