begin process at 2012 02 16 04:57:09
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Base de Donnees

 > TRIEUR DE DOUBLONS

TRIEUR DE DOUBLONS


 Information sur la source

Note :
9,13 / 10 - par 8 personnes
9,13 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Base de Donnees Classé sous :tri, doublon, bdd, access, excel Niveau :Débutant Date de création :17/06/2006 Date de mise à jour :30/06/2006 07:12:55 Vu / téléchargé :21 606 / 23 648

Auteur : mortalino

Ecrire un message privé
Site perso
Ce membre participe au partage de revenus publicitaires
Commentaire sur cette source (42)
Ajouter un commentaire et/ou une note


 Description

Cliquez pour voir la capture en taille normale
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

 Fichier Zip

Les Membres Club peuvent télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip


 Historique

18 juin 2006 19:17:26 :
Problème avec les OCX. Je les ai enlevé et je l'ai remplacé par le Manifest de PCPT (contrôles au format de votre environnement). Prochaine Mise à jour bientôt pour les Export.
23 juin 2006 20:31:44 :
Ajout des exports en Access, excel, et html. Ajout de l'impression (2 méthode proposées)
30 juin 2006 07:12:56 :
Nouvelle Mise à Jour : * multiples (et petites) modifications dans le code et dans certaines propriétés * ajout du ReyProgressBar.ocx de Renfield * annulation des demandes par MsgBox pour les exports, je l'ai remplacer par une demande sur From * ajout d'un export supplémentaire : *.xml (en plus de *.xls, *.txt, *.mdb, *.html) * ajout d'une icone pour l'application * création du reg.bat et unreg.bat pour enregistrer le CLSID (key) dans le RegServ32 (obligatoire sinon erreur) * ajout de bases de données 'test' => base excel, base access

 Sources du même auteur

Source avec Zip Source avec une capture MIDDLEBUTTON COPYPASTE [ADDIN VB6]
Source avec Zip Source avec une capture [CLASS] RESTREINDRE LE CURSEUR DE LA SOURIS À UNE ZONE DE CO...
Source avec Zip Source avec une capture [ADD-IN] COMPLÉMENT VB6 POUR CALCULER LE TEMPS D'EXÉCUTION D...
Source avec Zip Source avec une capture COMMONDIALOG AVEC PREVIEW IMAGE [USERCONTROL]
Source avec Zip Source avec une capture SUIVRE LE COURS D'UNE ACTION, POSSIBILITÉ D'AJOUTER LE MONTA...

 Sources de la même categorie

Source avec Zip Source avec une capture BIEN ADMINISTRER LES ETUDIANTS ET LEURS CÔTES par okosa
Source avec Zip VBA EXEL GESTION DE PERSONEL NOUVEAU CONTRAT DE TRAVAI par oudlarbi
Source avec Zip Source avec une capture CREATION D'UN OBJET D'ACCÈS AUX DONNÉES par okosa
Source avec Zip Source .NET (Dotnet) MISAHORAIRE par MdelM
Source avec Zip Source avec une capture BASEDEDONNEES,GESTIONDEMALADES,DATABASSE par shadkitenge

 Sources en rapport avec celle ci

Source avec Zip Source avec une capture LES BASES DE DONNÉES EN VB6 par ghuysmans99
EXPORT AUTOMATISÉ DONNÉES TABLE OU REQUÊTE ACCESS DANS UN CL... par houtas
Source avec Zip Source .NET (Dotnet) MISE À JOUR DE BASES DE DONÉES par l0r3nz1
Source avec Zip VBFACTURATION : LE CODE LE + SIMPLE POSSIBLE EN VBA POUR GÉR... par Patrice99
Source avec Zip Source avec une capture Source .NET (Dotnet) ACCESS TO ( XML,EXCEL ) par simo5963

Commentaires et avis

Commentaire de mortalino le 22/06/2006 18:55:38

Pour info, après création de l'exécutable, lors de sa 1ère utilisation, un fichier Manifest (xml) se crée automatiquement. D'ailleurs merci à PCPT de m'avoir expliqué le principe.
Donc pas d'inquiétude, c'est pour les contrôles de l'application, ce Manifest est lié à l'exécutable, pour "associer" le format des contrôles de votre système d'exploitation (ex. Windows XP) à mes contrôles.

Pour info, prochaine MAJ dans la nuit du 23 au 24 : + d'export.

Commentaire de PCPT le 23/06/2006 22:07:24 administrateur CS

un 9/10 surtout pour t'encourager.
des choses à revoir mais j'espère que tu feras évoluer cette source assez intéressante ;)
++
PCPT  [AFCK]

Commentaire de mortalino le 23/06/2006 22:09:55

Merci PCPT, ça motive c'est clair et je confirme que je ne laisserai pas tomber cette source pour la faire évoluer et lui rajouter des options supplémentaires.
Merci infiniment pour tes bons conseils !

@++ et bonne soirée.
mortalino

Commentaire de mortalino le 24/06/2006 04:56:49

Petite précision, dans le projet, il y a deux méthode d'impression, celle passant par un fichier .htm avec la function.imprim() je l'ai récupéré là :
http://www.vbfrance.com/code.aspx?ID=2908

Merci à jeromekj (je ne l'avais pas nommé car oubli de son pseudo)

Commentaire de econs le 24/06/2006 08:21:00 administrateur CS




Salut,

Source bien sympathique.


Bon, je vais pinailler. Pourquoi utiliser une variable temporaire j dans cette boucle (boucle reprise plusieurs fois) ?

For i = 1 To frmDoublons.lbxListeTriee.ListCount - 1
    j = i - 1
    Printer.Print frmDoublons.lbxListeTriee.List(j)
Next i

Alors que tu peux faire :


For i = 0 To frmDoublons.lbxListeTriee.ListCount - 2
    Printer.Print frmDoublons.lbxListeTriee.List(i)
Next i

C'est vraiment pour dire quelque chose. Ton code est bien structuré, on sent que tu as bien bossé dessus.
Tu peux maintenant rajouter la mention à jeromekj dans tes commentaires de modImpression.
Ah ... aussi : pas la peine de mettre des Declare que tu n'utilises pas dans modImpression2. Ca pourrait embrouiller ceux qui ne sont pas familiers avec Kernel32.

Commentaire de mortalino le 24/06/2006 08:57:22

Salut Manu !

Bien vu l'histoire du 'j', j'avais plusieurs soucis qui me tracassaient donc je suis passer à côté de choses évidentes comme celle-ci (et d'autres, qui ont été corrigé cette nuit).
Les Declare, c'est pareil, je n'ai pas encore l'habitude de les utiliser donc je vais regarder cela immédiatement et remplacer ces deux choses.

Pour la mention à jeromekj, c'est prévu que je remplace les '???', je n'ai récupéré son pseudo qu'après la MAJ.

Pour cette source, je vais essayer de rajouter d'autres possibilités, j'ai passé la nuit à chercher des codes interressants (dont ta source de tri, cf commentaire sur ta source) et PCPT m'a filé pleins d'idées.

Merci de ton encouragement.

++
mortalino

Commentaire de hourrane le 03/07/2006 14:19:00

bonjour
Bon Travail, ça serait plus intéréssant si tu ajoutes la liste des doublons.

Commentaire de mortalino le 03/07/2006 22:19:44

Salut Hourrane !

Merci pour ton commentaire et ton idée n'est pas bête du tout.
Ta demande est prise en compte.

Je suis en train de faire la version 2 !

@++

Mortalino

Commentaire de mokatir2006 le 22/08/2006 21:33:07

Je viens de découvrir ce site CodeS-sources.com que je trouve trés intéréssant. Cependant, je n'ai pas pu télécharger des fichiers ZIP. Faut-il obligatoirement passer par le coup de fil. Merci de me tenir informé.  
mokatir
Mail: mkatirk@yahoo.fr

Commentaire de mortalino le 22/08/2006 21:39:20

Salut Mokatir2006,

il n'est pas nécessaire d'être membre club (et donc d'appeler).
Il te suffit de cliquer sur télécharger le zip !

Si ça ne fonctionne pas (avec IE et FireFox) c'est que ton système d'exploitation à un problème.

Bon courage !

++

Commentaire de Rekeem le 29/08/2006 10:02:43

bonjour,

quelles sont les références nécessaires pour ce projet ?

Commentaire de mortalino le 29/08/2006 10:09:52

Bonjour Rekeem,

les références sont notées en entête de la Form principale, les voici :

' Références : /
' /
' >> Microsoft Common Dialog 6.0 (SP6) /
' >> Microsoft Internet Controls /
' >> Microsoft Common Controls 5.0 (SP2) /
' >> Microsoft Excel 11.0 Object Library /
' >> Microsoft DAO 3.6 Object Library /

Bonne journée
++

Commentaire de Rekeem le 29/08/2006 10:15:07

hum autant pour moi j'avais pas vu, vraiment désolé j'ai du mal ce matin :D

Commentaire de mortalino le 29/08/2006 10:25:41

lol
pas de problèmes !

@++

Commentaire de pomelet le 27/10/2006 09:45:31

Slt,

Manque des fichiers lors du téléchargement.
@+

Commentaire de mortalino le 27/10/2006 10:08:25

Salut,

je viens de  faire l'essai & je n'ai rencontré aucun problème.
++

Commentaire de PCPT le 27/10/2006 15:26:39 administrateur CS

pomelet -> il faut d'abord executer le reg.bat (la première fois), puis seulement lancer le projet

Commentaire de pomelet le 27/10/2006 15:48:01

Bonjour et merci de bien vouloir m'aider.
Voilà ce que j'ai lorsque je décompresse l'archive:
http://img118.imageshack.us/img118/6362/docis8.gif
Et je n'arrive à rien faire....!

Commentaire de helvet le 27/10/2006 18:11:46

Bonjour et merci,
même probème que pomelet pas exe après le avoir executer le reg.bat
salutations

Commentaire de PCPT le 27/10/2006 18:28:35 administrateur CS

les exe ne sont pas fournis (supprimés des zip pour raisons de sécurité).
il faut lancer "Projet Doublons.vbp", qui nécessite évidemment Visual Basic 6.0.
pas d'icône, pas de prog.
pas de prog... pas de prog!

au pire, sources éditables avec notepad (les extensions cls, frm, bas)...

Commentaire de thyphonfalcon le 21/11/2006 23:43:07

et un 10/10 de plus pour toi ! Non seulement cette source est nickel mais en plus de çà tu es vraiment hyper sympa. Un développeur sérieux à garder dans ces favoris lol

Je te remercie encore pour ton aide précieuse

@pluche

Thyphon

Commentaire de arwheen le 22/11/2006 21:45:05

     Bonjour

    je suis inculte en programmation. Serait-il possible d'avoir le processus pour créer le fichier éxécutable car ton petit programme pourrait m'aider à rechercher des doublons dans des bases de données de + 20 000 lignes.  
     Merci d'avance pour votre compréhension

Commentaire de mortalino le 22/11/2006 21:52:25

Salut,

il te faut Visual Basic 6.0 pour créer l'exécutable (indispensable).
Ouvre reg.bat (il va installer 1 ou 2 composants ocx)
Ouvre Projet Doublons.vbp, puis dans Fichier, faire créer Projet Doublons.exe.

Et voilà, le tour est joué. Si tu n'as pas VB6, file moi ton mail, je te compilerai l'exécutable et te l'enverrai en piève jointe.

@++  ;)

Commentaire de arwheen le 23/11/2006 19:37:29

   Bonjour

    Merci pour ta réponse

    Je te mets l'adresse mail pour que tu m'envoies le fichier exécutable : http://www.fabi.c@free.fr
    Bravo pour ton oeuvre et merci  c'est vraiment sympa

Commentaire de mortalino le 23/11/2006 20:12:50

Salut,

pas de problème.

Je serai chez moi ce soir, dès que j'arrive, je te le crée, te le place dans le zip avec la source entière.
Avant d'ouvrir l'executable, faudra que tu ouvres le Reg.bat (enregistrement des ocx).
Le fichier .exe sera lié à un Manifest (contrôles style XP si tu as cet OS), choisi donc bien l'emplacement du dossier, car une fois ouvert, tu ne peux plus déplacer l'executable (sinon, erreur avec le Manifest).
Tu n'auras qu'à placer un raccourci de l'exe à l'emplacement de ton choix.

@++

Commentaire de PCPT le 23/11/2006 20:31:57 administrateur CS

mortalino -> sisi, l'exe est déplacable, le manifest sera automatiquement recréé au nouvel emplacement, et registre modifié en conséquence
++

Commentaire de mortalino le 23/11/2006 20:39:27

Arf, oui ! Je viens de faire l'essai avec mon prog doublons, c'est vrai.


Beh jai déjà eu une erreur mais je n'arrive pas à la reproduire.
C'est peut-être autre chose (l'exe cherchait peut-être un fichier via App.Path)
D'ailleurs, c'est pour ça que j'évite de modifier l'emplacement des exe.

++

Commentaire de kornetmuse le 24/04/2007 16:47:07

Salut les loulous..

Moi j'ai une autre question :D

j'ai besoin de Microsoft Excel 11.0 Object Library

mais je n'ai que la 12.0 sur mon poste :(

comment retrouver l'ancienne siouplait !!

merci !

Commentaire de mortalino le 24/04/2007 17:47:20

Salut,

si tu as la 12, c'est que tu as la dernière version d'Excel (soit Excel 2007)
Normalement, cela ne gène en rien l'exploitation de tes codes établit sur les versions précédantes.

Seule possibilité afin d'avoir les 2, lorsque tu installes Office 2007, le Setup te coche par défaut la suppression des version Offices précédantes. A toi de faire (comme je l'ai fait) un décoche sur Excel :
Tu auras Excel 03 & Excel 07 sur ton poste ainsi que les références

++

Commentaire de kornetmuse le 24/04/2007 17:50:19

ok donc je dois absolument réinstaler Excel 03, y'a pas moyen de la choper autrement.

Un peu pénible.. m'enfin bon :)

merci a toi :)

et non ca ne pose pas de problème dans ce sens la en effet mais le problem c'est que je dois créer un document XML lisible par les anciennes version ;) et dans ce sens la ca ne marche plus :)

Mais merci je m'en vais réinstaler 03 comme je le craignais :)

Commentaire de Sinsitrus le 28/04/2007 17:23:43

Salut à tous !
C'est une belle idée ça et ça m'arrange assez ! Mes encouragements vieux !
Mais là j'ai un problème...
1- A l'exportation, vaut mieux laisser le choix du lien à l'utilisateur qu'au dossier de la source même
2- L'exportation s'exécute, mais le document créé est "vide".

Pourtant tout est dans le normes depuis le reg.bat et mon système et mes logiciel.
10/10 pour ton prog, vraiment bravo !

Commentaire de mortalino le 29/04/2007 15:13:09

Salut Sinsitrus,

Pour ton 1, oui, effectivement, ce serai mieux.
je rajouterai un commondialog.

Pour ton 2, quel type d'export est vide ? Tous ?

Sinon, sache que la version de ce "Trieur" va être refait completement différemment, à savoir, tri sur base d'origine (pas obligé de faire l'export), choix des champs / colonnes (ou lignes) à trier, pis d'autres choses certainement.
Faut juste que je m'y mette  ;)

++

Commentaire de Sinsitrus le 29/04/2007 21:46:05

On t'attends avec impatience alors ^^
La 2 est oui "toutes" les exportations sont vides.
C'est dommage, j'en ai vraiment besoin pour continuer mon projet :s
Bonne continuation et presse toi ;)

Commentaire de mortalino le 29/04/2007 22:05:28

Me presser, je garanti pas, mais ferai au mieux  ;)

Pour tes exports, c'est bizarre, je viens de tester un fichier Excel et un fichier Access, je n'éprouve aucune difficulté, à savoir, les exports xls, mdb, html, txt, xml se font sans problèmes.
Peux-tu m'en dire plus ?
(est ce que Doublon.exe est en local dans ton PC, où se situent les fichiers que tu souhaitent trier..)

++

Commentaire de Sinsitrus le 29/04/2007 22:15:53

Oui, j'ai un fichier excel d'une seule colonne et de 68000 ligne.
je fais skil fo (je suis si tu ve un peu branché vb)
Une fois terminé (100%) je clic sur exporter la liste et il m'ouvre le form pour choisir mon extention.
Mon document principal est excel. J'exporte tj en excel mais il me dit ok alors que le doc exporté est vide.

Commentaire de mortalino le 29/04/2007 22:24:44

68000 lignes, c'est impossible, excel n'en comporte que 65536. (valeur d'un Integer non signé)

Je refais les tests et te tiens au courant.
Avec quelle version d'Excel est -tu ? (et sous quelle version sont faites les fichiers à trier ?)
++

Commentaire de Sinsitrus le 29/04/2007 22:48:39

62746 dsl (excel office 2003)

Commentaire de mortalino le 29/04/2007 22:55:02

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)

Commentaire de mortalino le 29/04/2007 23:32:28

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.

++

Commentaire de jetpro le 14/12/2007 17:43:48

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

Commentaire de jetpro le 14/12/2007 17:53:31

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

Commentaire de frisk33 le 29/04/2009 12:20:37

bonjour

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

ça serait super

merci

CDT

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

Export bdd Access vers Excel avec VB6 [ par rems02 ] Comment exporter une bdd access vers un tableau excelavec un programme VB ?Rem'S Manipulation BDD Access avec Macro Excel [ par DragonicFlash ] Salut &#224; tous !!&nbsp; Je suis confront&#233; &#224; un probl&#232;me actuellement... Je voulais manipuler une Base de Donn&#233;es Access dans un cree une base de donnees acces [ par percoartemis ] Salut,voila, j utilise actuellement une bdd excel pour inserer de nouvelles données, pour me faire gagné du temps je voudrai cree une bdd access qui m BDD ACCESS ET EXCEL [ par DAMSTAKY ] Bonjour, Je travaille sur une base ACCESS existante et j'exporte régulierement mes tables ou requete vers excel pour faciliter le traitement pour d'au [Déplacé .Net --> VBA] Supression données d'une table via VBA Excel [ par yadla133 ] Bonjour, Je recherche à supprimer toutes les données d'une table access, dont le nom est celui du fichier Excel d'où le code suivant est lancé : [co Une connexion simple à excel... [ par TrafMaxime ] Voil&#224; le topo : - : sous access, vraie base de donn&#233;es, il est facile de cr&#233;er une bonne connexion avec Microsoft.jet.4.0 oledb comme ACCESS exportation excel, retour charriot [ par yo1333 ] Bonjour, je fais des exportations depuis ACCESS sur Excel, et j'ai un petit soucis de pr&#233;sentation...Dans ma textbox sur ACCESS, j'ai mis l'optio [vba] erreur Micosoft Jet (importatoin de excel vers access) [ par cokinoumasterflash ] Bonjour, Je suis en train d'essayer d'importer un fichier excel vers access mais je rencontre un message d'erreur : Le moteur de base de donn&#233;es Utiliser une macro Access avec un bouton dans Excel, est-ce possible? [ par karitchy ] Bonjour vous tous!J'ai encore un probl&#232;me par rapport &#224; Access et Excel. &nbsp;J'utilise une Macro Access en VBA pour transferer mes donn&#2 [VBA]erreur : Dépassement de capcacité (excel -> access) [ par cokinoumasterflash ] Bonjour, Lors de l'importation d'un tableau excel de 116 lignes par 23 colonnes vers Access j'obtiens un message d'erreur : <


Nos sponsors


Sondage...

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

Photothèque

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 7,426 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales