technicobjects
Messages postés9Date d'inscriptionvendredi 16 avril 2004StatutMembreDernière intervention 2 janvier 2009 23 août 2006 à 14:47
bonjour et merci pour l'info.
Cela fonctionne.
Renfield
Messages postés17287Date d'inscriptionmercredi 2 janvier 2002StatutModérateurDernière intervention27 septembre 202174 23 août 2006 à 14:30
Outils > Macro > Sécurité > Sources Fiables
et tu coches les deux options
technicobjects
Messages postés9Date d'inscriptionvendredi 16 avril 2004StatutMembreDernière intervention 2 janvier 2009 23 août 2006 à 14:16
Pour être plus précis mon projet à pour but de faire la liste de tous les fichiers de type MSOFFICE (word excel ppt access ) de lister toutes les macros pour chaque type de fichiers et d'afficher le nom des projets, modules, nbre lignes et autres propriétés et de comptabiliser le total.
Voila et ton exemple me semble très interressant.
Merci de ton support.
technicobjects
Messages postés9Date d'inscriptionvendredi 16 avril 2004StatutMembreDernière intervention 2 janvier 2009 23 août 2006 à 14:06
Merci
Je continue de chercher une explication.
mortalino
Messages postés6786Date d'inscriptionvendredi 16 décembre 2005StatutMembreDernière intervention21 décembre 201118 23 août 2006 à 14:04
Et bien c'est que c'est lié soit à la sécurité Xp, soit à MSOffice 2003.
Le truc, c'est que n'ayant pus reproduire ce message, je ne sais pas pourquoi il apparait !
technicobjects
Messages postés9Date d'inscriptionvendredi 16 avril 2004StatutMembreDernière intervention 2 janvier 2009 23 août 2006 à 14:00
oui je confirme
l'arret se produit dans ton module1 ligne :
Set VBP = MonBook.VBProject
mortalino
Messages postés6786Date d'inscriptionvendredi 16 décembre 2005StatutMembreDernière intervention21 décembre 201118 23 août 2006 à 13:51
Le truc c'est que je n'ai jamais eu ce message et je ne sais pas d'où il pourrait provenir.
Peut-être que ton fichier que tu essaies d'ouvrir est lui en version inférieure.
Tu as ce message avec mon fichier exemple ?
++
technicobjects
Messages postés9Date d'inscriptionvendredi 16 avril 2004StatutMembreDernière intervention 2 janvier 2009 23 août 2006 à 13:40
pour la version Win XP et XL 2003
J'ai trouvé d'autres scripts sur le web et le meme message apparait !!!
Merci de ton aide
technicobjects
Messages postés9Date d'inscriptionvendredi 16 avril 2004StatutMembreDernière intervention 2 janvier 2009 23 août 2006 à 13:11
merci de me répondre je confirme niveau securite macro mini
mortalino
Messages postés6786Date d'inscriptionvendredi 16 décembre 2005StatutMembreDernière intervention21 décembre 201118 23 août 2006 à 12:57
Salut,
et avec mon fichier exemple, tu as aussi ce message ?
Sinon, la sécurité de tes macros sont peut-être à un niveau élevé ?
Sinon, tu as quelle version d'Excel, et quel système d'exploitation ?
++
technicobjects
Messages postés9Date d'inscriptionvendredi 16 avril 2004StatutMembreDernière intervention 2 janvier 2009 23 août 2006 à 12:52
Bonjour
ce code me serait très utile, mais j'obtiens une erreur de type :
1004 "l'acces par programme au projet visual basic n'est pas fiable"
merci de ton aide
mortalino
Messages postés6786Date d'inscriptionvendredi 16 décembre 2005StatutMembreDernière intervention21 décembre 201118 13 juil. 2006 à 11:00
Salut Rey,
comme promis, la MAJ est faite. Encore du boulot dessus mais je pense que ça peut-être interressant. ;-)
@+
mortalino
Messages postés6786Date d'inscriptionvendredi 16 décembre 2005StatutMembreDernière intervention21 décembre 201118 11 juil. 2006 à 12:11
D'ailleurs Rey, en plus du code je mettrai un fichier.xls en exemple, avec des UserForms... ;-)
++
mortalino
Messages postés6786Date d'inscriptionvendredi 16 décembre 2005StatutMembreDernière intervention21 décembre 201118 11 juil. 2006 à 11:49
Salut Rey.
Merci pour ton commentaire. Je vais voir ça cet après midi.
Faut aussi que je rajoute le calcul de lignes dans un module et le nom / type des composants liés au VBProject.
Je mettrai la boite de dialogue pour le choix du fichier, comme dans ma source doublons.
A++ Rey et merci du conseil
Mortalino
Renfield
Messages postés17287Date d'inscriptionmercredi 2 janvier 2002StatutModérateurDernière intervention27 septembre 202174 11 juil. 2006 à 11:39
dommage que tes fonctions ne prennent pas de paramètre... ici, les noms et chemins sont en dur...
3 sept. 2006 à 02:52
y'a pas grand chose a faire, le code de l'un et l'autre sont très similaires...
(1ère étape, Projet > Références > Microsoft Excel X.0)
2 sept. 2006 à 18:46
Je reviens sur ce code et essaye de l'adapter en VB6.
Y a t'il des sources vb6 traitant ce type d'objet (excel)?
Je cherche en vain.
Merci
27 août 2006 à 15:18
suite à une demande sur le forum :
Si vous souhaitez traiter un classeur protégé, il faut connaître le mot de passe, dans ce cas, faite ceci :
il faut aller dans cette procédure :
Sub Cherche_Composants()
' *** 2ème dernière procédure du module Module1
Ensuite, modifier l'instrucion Workbooks.Open (FichierATraiter) par
Workbooks.Open Filename:=FichierATraiter, Password:="mot de passe"
++
23 août 2006 à 19:32
C'est ce que j'allais mettre en lien, comme quoi le dernier message de ce Topic répondait certainement à sa demande :
http://www.vbfrance.com/infomsg_FAIRE-APPARAITRE-USERFORM_800977.aspx#7
++
23 août 2006 à 14:47
Cela fonctionne.
23 août 2006 à 14:30
et tu coches les deux options
23 août 2006 à 14:16
Voila et ton exemple me semble très interressant.
Merci de ton support.
23 août 2006 à 14:06
Je continue de chercher une explication.
23 août 2006 à 14:04
Le truc, c'est que n'ayant pus reproduire ce message, je ne sais pas pourquoi il apparait !
23 août 2006 à 14:00
l'arret se produit dans ton module1 ligne :
Set VBP = MonBook.VBProject
23 août 2006 à 13:51
Peut-être que ton fichier que tu essaies d'ouvrir est lui en version inférieure.
Tu as ce message avec mon fichier exemple ?
++
23 août 2006 à 13:40
J'ai trouvé d'autres scripts sur le web et le meme message apparait !!!
Merci de ton aide
23 août 2006 à 13:11
23 août 2006 à 12:57
et avec mon fichier exemple, tu as aussi ce message ?
Sinon, la sécurité de tes macros sont peut-être à un niveau élevé ?
Sinon, tu as quelle version d'Excel, et quel système d'exploitation ?
++
23 août 2006 à 12:52
ce code me serait très utile, mais j'obtiens une erreur de type :
1004 "l'acces par programme au projet visual basic n'est pas fiable"
merci de ton aide
13 juil. 2006 à 11:00
comme promis, la MAJ est faite. Encore du boulot dessus mais je pense que ça peut-être interressant. ;-)
@+
11 juil. 2006 à 12:11
++
11 juil. 2006 à 11:49
Merci pour ton commentaire. Je vais voir ça cet après midi.
Faut aussi que je rajoute le calcul de lignes dans un module et le nom / type des composants liés au VBProject.
Je mettrai la boite de dialogue pour le choix du fichier, comme dans ma source doublons.
A++ Rey et merci du conseil
Mortalino
11 juil. 2006 à 11:39