Bonjour à tous,

J'ai besoin d'une astuce pour pouvoir sélectionner une plage de données dynamiquement.
En fait, je dois rechercher le mot "COTEX" et dés que je le trouve, je sélectionne les colonnes A, B, C, D jusqu'à ce mot et supprimer le tout (toutes les lignes).

Voici le bout de code déjà fait qui me sélectione que la colonne A (reste à prendre B, C, D mais je n'y arrive pas).

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
Sub SuppBloc()
 
'Supp Bloc
 
Dim a As Range
Set a = Range("A:D").Find("COTEX", lookat:=xlWhole)
 
Range("A1:" & a.Address(0, 0)).Select
 
Ens Sub
Merci à vous !!