Résolu ; Enfin (USF pour détection des doublons, plusieurs méthodes)

  • Initiateur de la discussion Initiateur de la discussion papapaul
  • 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 !

papapaul

XLDnaute Impliqué
🙄 Je résiste pas, je me fais plaisir.(Un petit peu fier moi 😛 )
Donc je joins la dernière version de mon truc.
Je pense avoir enfin terminé, mais comme il est trop gros.
j'ai enlevé les codes des labels 1 à 8 (sauf le 7) avant de zipper
et j'ai mis ces codes dans le 2ème fichier (word_zippé).
Donc, pour ceux que ca pourrait intéresser,
il faut recopier les codes et les remettre sur les labels adéquats.
Y a encore 2 ou 3 petites choses à voir mais c'est pas trés grave.
J'explique tout ca dans la feuille Donald.
Sinon pour le reste, ca devrait aller, y a peut-être des erreurs ou même carrément des bugs que j'ai pas vus.😕
Alors si vous constatez des choses qui clochent ou qu'on peut améliorer,
faites le moi savoir, j'essaierai d'y remédier.
Bon courage, bonne soirée à tous, milles mercis à ceux qui m'ont aidé
et je le dirais jamais assez : Vive XLD🙂
 

Pièces jointes

Re : Résolu ; Enfin (USF pour détection des doublons, plusieurs méthodes)

Bonsoir Papapaul et le Forum,

Je viens de me connecter et je trouve ton fichier, je n'ai pas eu le temps de le tester. Mon courrier c'est juste pour te dire que dans VB tu peux exporter un module, une Userform en cliquant dessus dans l'explotateur de projet. Tu retrouveras deux fichier pour une Userform et un seul pour un module. Tu peux les mettre dans un dossier et zipper le dossier. Avantage tu ouvres de nouveau VB et tu fais importer un ficher et tu cliques sur le nom et ton module ou ta Userform et son code se retrouve dans VB. Manipulation simple et efficace, pas de risque de faire des erreurs. de cette façon tu peux supprimer également un module d'un classeur.

Je vais jeter un oeil à ton classeur. au plaisr de te lire et quel temps dans le secteur du pla-teau, ici gros coup de vent et mer très agitée. (temps breton).
 
Re : Résolu ; Enfin (USF pour détection des doublons, plusieurs méthodes)

🙂 Salut Jean-Yves,
T'inquiète pas, le plateau a aussi les pieds dans l'eau.
Surtout dans le bas😀
C'est tout le temps comme ca.
Pour ton explication, je connais pas du tout ces manips.
Je vais essayer ce que tu m'indiques dès ce soir.
Pour mon fichier, si tu vois des bêtises, dis le moi.
J'en ai constaté une petite. Si on clique sur le bouton "toute la
feuille" ca laisse les cases cochées. Du coup, si on clique ensuite sur
le bouton "sur les colonnes" ca marche plus. (Il faut d'abord tout décocher).
Je vais y remédier en ajoutant quelquechose comme ;
With activesheet
.UsedRange.Interior.ColorIndex = -4142
Je pense que ca ira.
Petite précision, j'ai tjs pas compris pourquoi on peut mettre -4142
au lieu de xlnone. C'est du ASCII ??

Je rappelle aussi qu'en vrai, les fichiers que je travaille
ont des centaines de lignes. C'est pour ca que j'ai modifié
l'apparition de la feuille Liste par rapport aux versions précédentes
(plus de copie intégrale de la colonne choisie) et que j'ai mis les deux
boutons en dessous de "non cochés". Ca peut faire gagner du temps
si beaucoup de détections.

Encore bavard moi,😱 Bonsoir à tous
 
Re : Résolu ; Enfin (USF pour détection des doublons, plusieurs méthodes)

Bonjour Papapaul, Jyll,
Histoire de me perfectionner sur les USF, je me suis amusé à tout reprendre à zéro, comme je l'avais laissé entendre précédemment.
Comme je suis assez content du résultat, je te l'envoies sans prétention.
(Je n'ai pas traité l'aspect liste, uniquement le coloriage et le dénombrement).
Tu remarqueras que j'ai fait simple, mais efficace.
En effet, pas de with, ni de tableaux, et une certaine ressemblance du traitement dans les macros.
Je déplore une certaine lenteur aussi. (un vieux PC, un vieil Excel, un vieux Gruick encore plus vieux depuis hier)

Le -4142 n'est pas reservé aux couleurs, je l'ai rencontré dans les cellules aussi. C'est excel qui génère ça quant il trouve un truc non conforme, mais non rédhibitoire. Je me méfie de ces trucs là et préfère le xlnone officiel.

Comment fais-tu pour faire disparaitre et réapparaitre le bouton Valider ?

Je t'envoies encore mes félicitations, et aussi pour la partie artistique.
A plus,
Gruick
 

Pièces jointes

Re : Résolu ; Enfin (USF pour détection des doublons, plusieurs méthodes)

🙂 ReSalut le forum, bonjour Gruick.
Content que ca t'intéresse. Je vais regarder tout ca
mais c'est un peu (beaucoup) compliqué, je garantis pas de réponse rapide.
Pour -4142, j'ai tjs pas compris mais on peut faire autrement.
Pour le bouton valider ??? J'ai inventer ca
Label8.Visible = True . Surement pas orthodoxe mais...

Par précaution, j'ai aussi mis ca tout en bas du code inilistbox2,
Mais aussi dans le code de private sub listbox1_change()
et surtout ici
Private Sub Listbox2_Click()
Label8.Visible = True
End sub

Un seul endroit devrait suffire je pense (le rouge), j'en suis pas très sur
j'ai pas eu le temps de bien faire le ménage.

En tout cas merci beaucoup de tes félicitations.
Tant qu' a ramer sérieux, autant faire joli😀
mais j'apprends et je découvre.

N'est-ca pas le but du jeu ??🙄 Donc j'essaye de continuer
mes améliorations.

Vive vous tous , @+ sur XLD
 
Re : Résolu ; Enfin (USF pour détection des doublons, plusieurs méthodes)

😱 Oups,
Je viens de regarder vite fait.
Pour le bouton Valider (Label8)
C'est tout en bas dans Private Sub Listbox1_Change()
après End With
qu'il faut mettre : Label8.Visible = True
En espèrant que tu t'y retrouves.
Milles excuses, @+😉
 
Re : Résolu ; Enfin (USF pour détection des doublons, plusieurs méthodes)

EDIT : Ne pas lire ce message, il est HS.
Désolé 🙁

Bonjour à tous,

Excusez mon incruste ...
Mais c'est pour un "appel au secours" de débutant ... 🙄
En cherchant sur le forum, je trouve des formules concernant les doublons avec des matrices, des trucs que je ne comprends même pas, ou encore ce sujet-ci ...

Existe-t-il une fonction "toute simple" pour surligner les doublons ?

Car si je veux vérifier "le pourquoi" de la présence de doublons, je suis obligé de :

■ dupliquer la colonne concernée
■ d'y supprimer les doublons sans étendre la sélection
■ de faire défiler l'écran et de m'arrêter de temps à autre pour comparer
■ lorsque je constate un écart, j'insère une cellulle (et je décalle vers le bas)
■ je met en valeur la ligne correspondante
■ quand j'ai fini (parfois 10,20 ... doublons) je peux reprendre ligne par ligne les "erreurs" et essayer de comprendre pourquoi des doublons
■ c'est très fastidieux ...

Désolé pour le "HS".
Par avance, merci.
 
Dernière édition:
Re : Résolu ; Enfin (USF pour détection des doublons, plusieurs méthodes)

🙄 Bonsoir,
Sur le forum, il y a plein de méthodes simples pour la recherche
ou le tri, détection, couleur etc... sur les doublons.
(Dans 1 colonne précise chez toi ??)
Utilise le moteur recherche est écrit simplement: doublons colonne
Tu devrais trouver ton bonheur.
Sinon, dans un nouveau fil, joins nous un fichier en exemple
de ce que tu veux faire (on comprendra mieux)
Bonne recherche, bonsoir à tous😉
 
Re : Résolu ; Enfin (USF pour détection des doublons, plusieurs méthodes)

HS /ON

Désolé, je pensais bien faire en poursuivant sur un sujet récent "un peu près" équivalent à mon interrogation.
Étant modérateur sur plusieurs forums, notre politique est de plutôt "trop regrouper" que pas assez ... ça évite de dilapider les informations.
Par ailleurs, mes 1ères recherches n'avaient rien données ... vu le nombre de résultat pour " doublons ".
J'ai cherché avec " colonnes " en plus, et j'ai trouvé mon bonheur.
Même si j'ai cru à l'usine à gaz, en fait non, ça me convient très bien.

Si un modo passe dans le coin, qu'il n'hésites pas à supprimer ces qq derniers messages.

HS /OFF
 
- 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
Retour