Trieur de doublons

Soyez le premier à donner votre avis sur cette source.

Vue 25 044 fois - Téléchargée 23 996 fois

Description

Ce programme tri des doublons. Vous indiquez quelle Base de Données est à trier (Access ou Excel pour l'instant), vous déterminé la table et le champs pour access ; la feuille et la plage de cellule pour Excel.

Et vous avez le résultat : nombre total de données et nombre sans les doublons ; et ces données s'insèrent dans 2 listes distinctes.
Une Option : tri alphabtique et numérique (attention, si les données sont trop dispersées, le tri alphanumérique risque de ne pas être trié à 100%)
Un autre Option : vous pouvez exporter le résultat en fichier Texte + rajout (voir MAJ)

Conclusion :


Pour le moment, il n'y a que les BDD Access et Excel mais par la suite je rajouterai les fichiers Textes.
Pareil pour l'export (fichier texte seulement), je ferai en sorte de faire des Export en .xls et .bdd

Je tiens également à remercier notre ami et admin Renfield, pour ses contrôles (CheckBox, OptionButton, Command et Progress) qui sont beaucoup plus joli que ceux de VB.

Dernière chose, c'est mon 1er Prog en VB. Je ne faisais jusqu'à présent que du VBA Excel

Codes Sources

A voir également

Ajouter un commentaire Commentaires
frisk33
Messages postés
1
Date d'inscription
mercredi 29 avril 2009
Statut
Membre
Dernière intervention
29 avril 2009

29 avril 2009 à 12:20
bonjour

je n'ai pas VB6, est-ce que quelqu'un peut me compiler ce code svp

ça serait super

merci

CDT
jetpro
Messages postés
2
Date d'inscription
lundi 16 octobre 2006
Statut
Membre
Dernière intervention
14 décembre 2007

14 déc. 2007 à 17:53
Re bonsoir à tous

google a été mon amis sur ce coup la

en tous les cas merci quand même

bon week end
@pluche
jetpro
jetpro
Messages postés
2
Date d'inscription
lundi 16 octobre 2006
Statut
Membre
Dernière intervention
14 décembre 2007

14 déc. 2007 à 17:43
Bonjour à tous

est ce que quelqu'un pourrais me compiler le programme car je n'ai pas vb.

par avance merci
on week end a tout le monde
@pluche
mon mail : jetpro(at)hotmail(dot)com
mortalino
Messages postés
6786
Date d'inscription
vendredi 16 décembre 2005
Statut
Membre
Dernière intervention
21 décembre 2011
18
29 avril 2007 à 23:32
Bah non, pas de soucis !!

Rentres-tu bien les bonnes plage de données ?
dans cellule de départ : C1
"" "" d'arrivée : C62746

Sinon, je vois pas, essaie de regarder le code :

Ligne 216 de la form frmDoublons, tu as :
If Not CellN.Value = "" Then

Rajoute au-dessus
Debug.Print "<" & CellN.Address & ">"
Debug.Print "<" & CellN.Value & ">"

et vérifie ce qui s'inscrit dans la fenêtre exécution.

De plus, il faut rentrer dans la condition de la ligne 216 (If Not CellN.Value = "" Then).
Si tu ne rentres pas dedans, c'est que les cellules sont vides.

++
mortalino
Messages postés
6786
Date d'inscription
vendredi 16 décembre 2005
Statut
Membre
Dernière intervention
21 décembre 2011
18
29 avril 2007 à 22:55
Oui, ok, et avec Office 2007, je viens de découvrir que l'on peut mettre plus de 100 000 lignes :D

Bon, là je teste avec 65000 lignes, (prend un peu de temps..) mais avec tous mes tests, j'ai aucune erreur et le doc n'est pas vide.
Te tiens au courant après celui là (même nombre de lignes que toi, et en colonne C)


*** Pour les utilisateurs de Excel 2007 ***
Il faut rajouter l'extension xlsx pour le bouton "rechercher fichier" ainsi que dans les Exports.
(ferai en sorte de gérer l'exception dans la MAJ future)
Afficher les 42 commentaires

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.