TRIEUR DE DOUBLONS

mortalino Messages postés 6786 Date d'inscription vendredi 16 décembre 2005 Statut Membre Dernière intervention 21 décembre 2011 - 18 juin 2006 à 19:20
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
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/38162-trieur-de-doublons

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)
Sinsitrus Messages postés 849 Date d'inscription samedi 11 juin 2005 Statut Membre Dernière intervention 21 août 2015
29 avril 2007 à 22:48
62746 dsl (excel office 2003)
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:24
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 ?)
++
Sinsitrus Messages postés 849 Date d'inscription samedi 11 juin 2005 Statut Membre Dernière intervention 21 août 2015
29 avril 2007 à 22:15
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.
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:05
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..)

++
Sinsitrus Messages postés 849 Date d'inscription samedi 11 juin 2005 Statut Membre Dernière intervention 21 août 2015
29 avril 2007 à 21:46
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 ;)
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 à 15:13
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 ;)

++
Sinsitrus Messages postés 849 Date d'inscription samedi 11 juin 2005 Statut Membre Dernière intervention 21 août 2015
28 avril 2007 à 17:23
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 !
kornetmuse Messages postés 38 Date d'inscription samedi 17 juillet 2004 Statut Membre Dernière intervention 19 octobre 2010
24 avril 2007 à 17:50
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 :)
mortalino Messages postés 6786 Date d'inscription vendredi 16 décembre 2005 Statut Membre Dernière intervention 21 décembre 2011 18
24 avril 2007 à 17:47
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

++
kornetmuse Messages postés 38 Date d'inscription samedi 17 juillet 2004 Statut Membre Dernière intervention 19 octobre 2010
24 avril 2007 à 16:47
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 !
mortalino Messages postés 6786 Date d'inscription vendredi 16 décembre 2005 Statut Membre Dernière intervention 21 décembre 2011 18
23 nov. 2006 à 20:39
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.

++
PCPT Messages postés 13272 Date d'inscription lundi 13 décembre 2004 Statut Membre Dernière intervention 3 février 2018 47
23 nov. 2006 à 20:31
mortalino -> sisi, l'exe est déplacable, le manifest sera automatiquement recréé au nouvel emplacement, et registre modifié en conséquence
++
mortalino Messages postés 6786 Date d'inscription vendredi 16 décembre 2005 Statut Membre Dernière intervention 21 décembre 2011 18
23 nov. 2006 à 20:12
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.

@++
arwheen Messages postés 2 Date d'inscription mercredi 22 novembre 2006 Statut Membre Dernière intervention 23 novembre 2006
23 nov. 2006 à 19:37
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
mortalino Messages postés 6786 Date d'inscription vendredi 16 décembre 2005 Statut Membre Dernière intervention 21 décembre 2011 18
22 nov. 2006 à 21:52
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.

@++ ;)
arwheen Messages postés 2 Date d'inscription mercredi 22 novembre 2006 Statut Membre Dernière intervention 23 novembre 2006
22 nov. 2006 à 21:45
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
thyphonfalcon Messages postés 41 Date d'inscription vendredi 27 octobre 2006 Statut Membre Dernière intervention 12 mai 2007
21 nov. 2006 à 23:43
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
PCPT Messages postés 13272 Date d'inscription lundi 13 décembre 2004 Statut Membre Dernière intervention 3 février 2018 47
27 oct. 2006 à 18:28
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)...
cs_helvet Messages postés 1 Date d'inscription vendredi 27 octobre 2006 Statut Membre Dernière intervention 27 octobre 2006
27 oct. 2006 à 18:11
Bonjour et merci,
même probème que pomelet pas exe après le avoir executer le reg.bat
salutations
pomelet Messages postés 2 Date d'inscription vendredi 27 octobre 2006 Statut Membre Dernière intervention 27 octobre 2006
27 oct. 2006 à 15:48
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....!
PCPT Messages postés 13272 Date d'inscription lundi 13 décembre 2004 Statut Membre Dernière intervention 3 février 2018 47
27 oct. 2006 à 15:26
pomelet -> il faut d'abord executer le reg.bat (la première fois), puis seulement lancer le projet
mortalino Messages postés 6786 Date d'inscription vendredi 16 décembre 2005 Statut Membre Dernière intervention 21 décembre 2011 18
27 oct. 2006 à 10:08
Salut,

je viens de faire l'essai & je n'ai rencontré aucun problème.
++
pomelet Messages postés 2 Date d'inscription vendredi 27 octobre 2006 Statut Membre Dernière intervention 27 octobre 2006
27 oct. 2006 à 09:45
Slt,

Manque des fichiers lors du téléchargement.
@+
mortalino Messages postés 6786 Date d'inscription vendredi 16 décembre 2005 Statut Membre Dernière intervention 21 décembre 2011 18
29 août 2006 à 10:25
lol
pas de problèmes !

@++
Rekeem Messages postés 2 Date d'inscription jeudi 21 avril 2005 Statut Membre Dernière intervention 29 août 2006
29 août 2006 à 10:15
hum autant pour moi j'avais pas vu, vraiment désolé j'ai du mal ce matin :D
mortalino Messages postés 6786 Date d'inscription vendredi 16 décembre 2005 Statut Membre Dernière intervention 21 décembre 2011 18
29 août 2006 à 10:09
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
++
Rekeem Messages postés 2 Date d'inscription jeudi 21 avril 2005 Statut Membre Dernière intervention 29 août 2006
29 août 2006 à 10:02
bonjour,

quelles sont les références nécessaires pour ce projet ?
mortalino Messages postés 6786 Date d'inscription vendredi 16 décembre 2005 Statut Membre Dernière intervention 21 décembre 2011 18
22 août 2006 à 21:39
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 !

++
mokatir2006 Messages postés 1 Date d'inscription lundi 21 août 2006 Statut Membre Dernière intervention 22 août 2006
22 août 2006 à 21:33
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
mortalino Messages postés 6786 Date d'inscription vendredi 16 décembre 2005 Statut Membre Dernière intervention 21 décembre 2011 18
3 juil. 2006 à 22:19
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
hourrane Messages postés 29 Date d'inscription dimanche 8 juin 2003 Statut Membre Dernière intervention 2 février 2009
3 juil. 2006 à 14:19
bonjour
Bon Travail, ça serait plus intéréssant si tu ajoutes la liste des doublons.
mortalino Messages postés 6786 Date d'inscription vendredi 16 décembre 2005 Statut Membre Dernière intervention 21 décembre 2011 18
24 juin 2006 à 08:57
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
econs Messages postés 4030 Date d'inscription mardi 13 mai 2003 Statut Membre Dernière intervention 23 décembre 2008 24
24 juin 2006 à 08:21
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.
mortalino Messages postés 6786 Date d'inscription vendredi 16 décembre 2005 Statut Membre Dernière intervention 21 décembre 2011 18
24 juin 2006 à 04:56
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)
mortalino Messages postés 6786 Date d'inscription vendredi 16 décembre 2005 Statut Membre Dernière intervention 21 décembre 2011 18
23 juin 2006 à 22:09
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
PCPT Messages postés 13272 Date d'inscription lundi 13 décembre 2004 Statut Membre Dernière intervention 3 février 2018 47
23 juin 2006 à 22:07
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]
mortalino Messages postés 6786 Date d'inscription vendredi 16 décembre 2005 Statut Membre Dernière intervention 21 décembre 2011 18
22 juin 2006 à 18:55
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.
Rejoignez-nous