Contenu récent par Robidic

For Each myKey In Dico Selection.Replace What:=myKey, Replacement:="XXX", LookAt:=xlPart, _ SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _ ReplaceFormat:=False Next Voilà c est fait , Merci ;)

Une petite question complémentaire je voudrai maintenant que j ai filtré remplacer ces codes qui ne ne sont bon par XXX et donc me servir du dico qui a récupérer ces codes erronés. je ne sais pas comment faire ;) ce code ci-dessous ne remplace bien évidemment que le premier code...

Merci de ton aide , mais je ne comprend pas trop ton code....c est pour que le filtre ne fasse pas de différence entre Majuscule et Minuscule ? si tu as 5 mn pour m éclairer...et c est à placer où ? ça peut servir pour d autre situation.;)

Super! :)Merci maintenant je comprend pourquoi ce blocage....

on voit que SSC et CNA ne sont pas exclus du filtre.... Pourquoi ? Par contre si je diminue en ligne moins de 2000 à la louche toutes les exclusions fonctionnent....🤔

si vous faites le test vous verrez ça dans le filtre 😢

En KDO un ptit fichier d amusement ;)

Je me suis inspiré de ce code...qui fonctionne très bien comme je le disais mais au delà de 2000 lignes environ il n exclus plus ce que je lui demande ou plutôt à moitié.. Option Explicit Sub Exclude_3() Dim d As Object, c As Range, tmp As String, x, i As Long, ws As Worksheet Set ws =...

Bonjour Comme on ne peut pas exclure plusieurs valeurs par un autofiltre j utilise un dictionnaire pour en exclure certaines valeurs sauf que je me suis rendu compte que mon code fonctionne sur une quantité de ligne et je ne comprend pas pourquoi... Au delà de 2000 lignes mon code n exclus lus...