viperazSpyq
Messages postés5Date d'inscriptionlundi 16 juillet 2007StatutMembreDernière intervention11 août 2007
-
18 juil. 2007 à 15:04
mortalino
Messages postés6786Date d'inscriptionvendredi 16 décembre 2005StatutMembreDernière intervention21 décembre 2011
-
18 juil. 2007 à 15:56
Salut tout le monde (j'espére qu'il y en aura en effet beaucoup de monde pour m'aider)
Ca fait pas mal de temps que je galère sur un problème que je n'arrive pas à résoudre, explications :
J'ai créé un programme en VB6.0 qui, à un moment donnée, a pour rôle le lancement d'une macro écrite en VBA.
Cette macro, en temps normal, se lance par l'intermédiaire d'un bouton qui appel la fonction suivante : "Call Main.Module_Principal.Main" Dans mon programme VB j'ai créé un objet grâce à la référence "microsoft excel object librairy", ce qui donne :
Dim accesAppExcel As Object
'Appel de la fonction ramenant le chemin de la macro
repertoireMacro = Replace(modAdministration.RecupereChemin("CHEMIN_MACRO_CC"), """", "")
'Jusqu'ici tout va bien
cheminComplet = repertoireMacro & "macro.xls"
Set accesAppExcel = GetObject(cheminComplet)
'Ici tout va très mal
accesAppExcel.RunMacro "Main.Module_Principal.Main"
Je ne sais pas comment appeler cette macro .....
Merci à tous pour votre aide !!!!