Supprimer des lignes avec macro

Bonjour,

La dernière fois je voulais supprimer les lignes que je voulais, maintenant je voudrais supprimer des lignes que je ne veux pas.

Exemple :

Code
20401
28003
20702
26601
26602
26603
26604
26605

Je voudrais supprimer toutes les lignes qui ne sont pas 266..

Est ce qu'il y a un moyen simple de le faire sans passer par des algorithmes lourd en définissant chaque code qu'on voudrait garder ?

Peut on faire par exemple : si la cellule ne contient pas 266 alors on la supprime.

Salut,

un petit fichier en pièce jointe.

Explication:

se placer sur la première cellule à checker. dans l'exemple: A1

Cliquer sur le bouton pour ouvrir l'userform

dans la textbox, entrer la chaine de caractère à chercher

choisir l'option en début de chaine / fin de chaine (en fonction de si la chaine entrée dans la textbox est à chercher au début ou à la fin de la cellule)

cliquer sur le bouton supprimer les lignes

Si tu as des soucis, demandes moi,

Le code est accessible à l'endroit habituel

A te lire,

fichier joint

Souri84

Edit 2: enregistres le fichier sur ton ordinateur pour le tester sinon il mets la boite de débogage (en tout cas chez moi...)

Salut souri84,

Très jolie cette text box.

Ca réponds exactement à ce que j'ai demandé.

Pour aller plus loin, est-il possible d'effectuer une recherche de chaine de caractère au milieu d'une cellule ?

Merci souri84