Rechercher trouver et supprimer

Bonsoir à tous,

J'aimerais dans mon exemple de fichier avoir un code VBA pour pouvoir faire une "recherchev" ou autre fonction dans la colonne B de mon tableau Feuille 2 et lorsque les noms en rouge de cette colonne ont été repérés comme étant de trop, entre les deux colonnes des tableaux alors supprimer la ligne complète correspondante dans mon tableau Feuille 2.

Je pense que cela est possible mais je n'arrive pas à trouver la combinaison des deux fonctions jumelées sur le net.

Si quelqu'un pouvait m'aider cela m'aiderai beaucoup pour compléter mon projet.

Merci.

Bonjour toutes et touq

Un début, @ tester dans ta feuil2

Sub CouleurRouge()
' Déclaration variables
Dim MyRange As Range
Dim L As Long
On error resume next
With Sheets("Feuil2")
For L = [B65000].End(xlUp).Row To 1 Step -1
If Cells(L, 2).Font.Color = 255 Then Rows(L).Delete
Next
End With
End Sub

crdlt,

André

Bonsoir Andre13,

Tout d'abord merci pour ton retour rapide à mon problème.

Alors ton code fonctionne très bien, par contre ce n'est pas vraiment ce que je souhaite faire, car en effet le code que tu m'as fourni ne supprime que les noms en rouge.

En fait je les avaient mis en rouge pour bien les distinguer des autres.

Je me suis peut être mal expliqué, mais ma demande serait en fait que le code exécute une recherche dans les deux colonnes et trouve les noms qui sont en trop dans le tableau Feuille 2.

Et donc une fois trouvés supprimer le mot et sa ligne.

Voilà j'espère avoir été un peu plus clair dans mes explications.

Je garde tout de même sous le coude ton code car il peut aussi m'être utile.

Je continue à chercher de mon côté.

Merci.

Bonjour toutes et tous

re, j'ai un peu réussi en effectuant une comparaison de tes 2 onglets, la feuille2 va rapatrier les mots manquants de ta feuil1 vers feuil2 pour que la colonne A puisse comparer et mets en couleur rouge sur la colonne B

1/il ne reste plus qu'à trouver pour les filtres pour désactiver et activer une fois que le(s)macro(s) font leurs job

2/le problème si l'on clic sur le message de confirmation afin d'effacer les textes colorisés de la colonne B de ta feuil2 cela me remonte le tableau (à voir aussi ce petit problème minime mais embêtant)

ci-joint un aperçu (j'ai mis en copie feuille 1 et 2 pour mes tests)

@ tester remodeler, test à effectuer sur la Feuil2

mon niveau est encore trop faible hélas

zsupprtimered

Bonjour Andre13,

Ok très bien cool c'est déjà une avancée, merci de ta contribution, je testerai ça plus tard.

Bonne journée à toi.

Rechercher des sujets similaires à "rechercher trouver supprimer"