[VBA] Si contient alors supprime

tournskeud -
eriiic Messages postés 24603 Date d'inscription Statut Contributeur Dernière intervention - 7 mai 2014 à 19:23

Bonjour à tous,

Je ne m'en cache pas, je suis au niveau zéro de VBA et mon code compte même pas 10 lignes mais je n'arrive pas à les faire marcher...
J'aimerais faire une macro disant "si tu trouve ce mot dans une cellule, alors supprime la cellule entière.

Mon fichier fait plus de 72000 lignes et tout un tas de lignes sont des doublons.
Le mot est question : "&defid="

Voici mon code :

Sub test()
Do
On Error GoTo A1
Cells.Find(What:="&defid=").Activate
Selection.EntireRow.Delete
Loop
End Sub

Mon erreur : "etiquette non définie"

Quelqu'un d'aimable pourrait-il m'aider ? :)

Merci !

Afficher la suite

A voir également:

[VBA] Si contient alors supprime
Recuperer message whatsapp supprimé - Guide
Message supprimé whatsapp - Guide
Google sheet si cellule contient texte alors afficher ✓ - Forum Excel
Excel si contient alors ✓ - Forum Excel
Comment supprimer un fichier qui refuse d'être supprimé - Guide

1 réponse

Réponse 1 / 1

eriiic Messages postés 24603 Date d'inscription Statut Contributeur Dernière intervention 7 275

Bonjour,

essaie avec :

Sub test()
    Dim C As Range
    Set C = Cells.Find(What:="&defid=")
    Do While Not C Is Nothing
        C.EntireRow.Delete
        Set C = Cells.Find(What:="&defid=")
    Loop
End Sub

eric

Discussions similaires

Excel si cellule contient texte alors...

Excel formule : savoir si une cellule contient partie texte

Formule Excel : "SI" une cellule contient un mot, alors ?

Excel : si ma cellule contient tel texte ou tel texte

Que se passe-t-il quand on supprime un ami sur snapchat

Votre réponse

Discussions similaires