VBA (Excel) - Supprimer une ligne comprenant un mot

  • Initiateur de la discussion Initiateur de la discussion piloute
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

P

piloute

Guest
Bonjour,

Je suis débutant en VBA et je souhaite programmer une macro qui me permette de rechercher un mot (qu'on appelera "mot") sur une feuille excel. Je ne sais pas d'avance sur quelle ligne ou colonne il sera.
Je souhaite rechercher en effacant chaque ligne précédant le mot et que la macro s'arrête à la ligne ou elle a trouvé ce mot.
J'ai essayé de reprendre différentes macros que j'ai pu trouver mais pas réussi à obtenir ce que je voulais car en général c'est pour effacer sur toute la feuille et non s'arrêter dès qu'il a trouvé en effacant ce qui est avant.

Merci par avance

Florent
 
Re : VBA (Excel) - Supprimer une ligne comprenant un mot

Salut Pierrot93,
Bonsoir Piloute et bienvenu sur le forum,


Tu brûle 😉

Il suffit d'utiliser l'une des nombreuses méthodes présentes sur le forum, mais changer la boucle.

Dans ton cas il faudrait utiliser la boucle :
Tant que la cellule analysée ne contient pas le mot : "mot", continuer la recherche.

Tu trouveras plus de détails ici.

Bon courage et bonne fin d'après midi
 
Re : VBA (Excel) - Supprimer une ligne comprenant un mot

Merci pour vos réponses au final, j'ai réalisé ce que je voulais

Voici la macro si jamais cela peut aider quelqu'un :

Sub supp()
'macro suppression lignes avant "*mot*"

With ActiveSheet
lig = .Cells.Find(what:="*mot*", LookIn:=xlValues).Row - 1
.Rows("1:" & lig).EntireRow.Delete
End With

End Sub
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
16
Affichages
2 K
Retour