Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1320 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Executer une macro d'un autre classeur excel

 
 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

Executer une macro d'un autre classeur excel

n°229205
xtoune
Posté le 17-10-2002 à 10:03:26  profilanswer
 


voila j'aimerai executer une macro d'un autre classeur excel mais je c pas comment il faut faire pour l'appeller.
 
Pour l'instant je clik sur un bouton du classeur1 ki execute une macro et dans cette macro j'ouvre un autre classeur (classeur2) et je voudrai lancer une macro ki appartient a ce classeur2...........;
 
merci


---------------
heu...
mood
Publicité
Posté le 17-10-2002 à 10:03:26  profilanswer
 

n°229222
xtoune
Posté le 17-10-2002 à 10:15:42  profilanswer
 

pleazzzzzzzzzzzzzzzzzzzzzzz c urgent !!!!!!!!!!


---------------
heu...
n°229231
[SDF]Poire
Vive Grumly
Posté le 17-10-2002 à 10:24:23  profilanswer
 

Sub AutomationPowerPointExcel()
Dim AppExcel As Excel.Application
 
Set AppExcel = New Excel.Application
 
AppExcel.Visible = True
 
AppExcel.Workbooks.Open "C:\Chemin\NomClasseur.xls"
 
AppExcel.Run "NomClasseur.xls!Message"
 
Set AppExcel = Nothing
 
End Sub
 


Trouvé sur http://groups.google.fr/groups?hl= [...] 6rnum%3D12
 
avec recherche http://groups.google.fr/groups?q=E [...] rt=10&sa=N
 
 :hello:


---------------
Des bons sites pour Delphi? http://forum.hardware.fr/forum2.php3?post=16838&cat=10 -- informaticien -- http://www.z0rglub.com/phpwebgallery/ -- Delphi :love:
n°229261
xtoune
Posté le 17-10-2002 à 10:53:31  profilanswer
 

ca marche pas tro, jprefereré kelkun ki c comment faire et ki la deja fé, ca doit pas etre bien compliké suffit d'avoir la bonne syntaxe et d'etre deja tombé dans les vieux piege a la con ki nous font tjs perdre un temps fou !!!!!!!!!!!!!!
 
 
merci qd meme  
 
 
help me !!!!!!!!!!!


---------------
heu...
n°229263
[SDF]Poire
Vive Grumly
Posté le 17-10-2002 à 10:57:19  profilanswer
 

Pour appeler ta macro tu dois faire un truc du genre
NomClasseur.xls!NomMacro
 
Et le code VBA doit marcher je pense... même si je l'ai pas testé...  :D


---------------
Des bons sites pour Delphi? http://forum.hardware.fr/forum2.php3?post=16838&cat=10 -- informaticien -- http://www.z0rglub.com/phpwebgallery/ -- Delphi :love:
n°229266
xtoune
Posté le 17-10-2002 à 10:59:21  profilanswer
 

ben c ce que j'essaye depuis tout a l'heure
 
nomduclasseur.xls!Module1.macro
nomduclasseur.xls!macro
...
...
 
 
 
marche pôôôôôôô
 


---------------
heu...
n°229268
xtoune
Posté le 17-10-2002 à 11:01:01  profilanswer
 

voila ce que je met
 
Application.Run ("LISTE DES PROJETS CTM1.xls!Module1.MAJFdP" )


---------------
heu...
n°229271
[SDF]Poire
Vive Grumly
Posté le 17-10-2002 à 11:05:54  profilanswer
 

xtoune a écrit a écrit :

ben c ce que j'essaye depuis tout a l'heure
 
nomduclasseur.xls!Module1.macro
nomduclasseur.xls!macro
...
...
 
 
 
marche pôôôôôôô
 
 




Tu rajoute un boutton macro
tu fous nom.xls!macro
et voilou
Tested
 
Pour que ça marche il fo que le document soit ouvert


Message édité par [SDF]Poire le 17-10-2002 à 11:06:51

---------------
Des bons sites pour Delphi? http://forum.hardware.fr/forum2.php3?post=16838&cat=10 -- informaticien -- http://www.z0rglub.com/phpwebgallery/ -- Delphi :love:
n°229278
xtoune
Posté le 17-10-2002 à 11:14:56  profilanswer
 

oui je c ca, j'avé deja testé. Mais moi il faut kune macro soit excuté depuis le classeur d'origine justement pour ( entre autre ) verifier que le deuxieme classeur n'est pas deja utilisé par kulkun d'autre ( il ne faut pas ecraser les données, ou réouvrir le classeur sans sauvegarder ce que la personne été en train de faire)
 
donc je ve faire la meme chose que attcher une macro a un bouton mais le lancé depuis une macro


---------------
heu...
n°229313
[SDF]Poire
Vive Grumly
Posté le 17-10-2002 à 11:43:20  profilanswer
 

Application.Workbooks.Open "C:\Chemin\NomClasseur.xls"  
Application.Run "NomClasseur.xls!Message"


 
non ?


---------------
Des bons sites pour Delphi? http://forum.hardware.fr/forum2.php3?post=16838&cat=10 -- informaticien -- http://www.z0rglub.com/phpwebgallery/ -- Delphi :love:
mood
Publicité
Posté le 17-10-2002 à 11:43:20  profilanswer
 

n°229316
xtoune
Posté le 17-10-2002 à 11:44:24  profilanswer
 

ben non  
???????????????????????????????????????????????
 
fé ch..


---------------
heu...
n°229342
xtoune
Posté le 17-10-2002 à 12:03:24  profilanswer
 

pourtant ca devrait etre ca


---------------
heu...
n°229400
xtoune
Posté le 17-10-2002 à 13:45:12  profilanswer
 

p...... de sa .....r....


---------------
heu...
n°229538
xtoune
Posté le 17-10-2002 à 16:19:50  profilanswer
 

bon !!!!!!!
 
voila je suis viré si demain soir sa marche pas .............................................................................................  .        .          .                      .                             .                                                                                                                   .. .... pfffffuuuuuuuu merci a ceux ki ont essayé de m'aider ..
 
BYe


---------------
heu...
n°229558
[SDF]Poire
Vive Grumly
Posté le 17-10-2002 à 16:31:23  profilanswer
 

Désolé...
G luté pendant 2j pour un truc du même genre...
fo pas oublier que C du krosoft
 
 :hello:


---------------
Des bons sites pour Delphi? http://forum.hardware.fr/forum2.php3?post=16838&cat=10 -- informaticien -- http://www.z0rglub.com/phpwebgallery/ -- Delphi :love:
n°229586
xtoune
Posté le 17-10-2002 à 17:11:35  profilanswer
 

bah c pas grave jva allé travailler au mac do ...............


---------------
heu...
n°229591
[SDF]Poire
Vive Grumly
Posté le 17-10-2002 à 17:15:37  profilanswer
 

:sweat:  
Tu bosses où ? A quel nivo ?


---------------
Des bons sites pour Delphi? http://forum.hardware.fr/forum2.php3?post=16838&cat=10 -- informaticien -- http://www.z0rglub.com/phpwebgallery/ -- Delphi :love:
n°229626
xtoune
Posté le 17-10-2002 à 18:01:14  profilanswer
 

je suis en ecole d'ingenieur en 3 ieme anné par aprentissage. Mon entreprise est une SSII et la je travail pour un bureau d'etude de piece automobile.  
 
Sinon nivo prog j'ai commencé par le qbasic puis java pdt 2 ans en DUT( j'aime assez ce langage) et pi un pe de VB ( j'aime pôôôô, c pas assez strict comparais au java).
 
et je c pas si je pousse du coté de java ou si j'essaye le C# ou l'asp
 
voili voilou et toi tu fé koi ??


---------------
heu...
n°229648
[SDF]Poire
Vive Grumly
Posté le 17-10-2002 à 18:42:39  profilanswer
 

Moi suis en alternace pour diplome de chargé de projet (Bac + 4)
ds une société de service


---------------
Des bons sites pour Delphi? http://forum.hardware.fr/forum2.php3?post=16838&cat=10 -- informaticien -- http://www.z0rglub.com/phpwebgallery/ -- Delphi :love:
n°229902
xtoune
Posté le 18-10-2002 à 08:59:26  profilanswer
 

ben c cool !!
 
mais ca m'aide pas pour mon pb a 0.3 euro


---------------
heu...
n°229949
xtoune
Posté le 18-10-2002 à 10:37:48  profilanswer
 

ou a 2 fr pour les anciens


---------------
heu...
n°229950
xtoune
Posté le 18-10-2002 à 10:38:06  profilanswer
 

ou a 200 fr pour les tres anciens


---------------
heu...
n°229957
[SDF]Poire
Vive Grumly
Posté le 18-10-2002 à 10:47:14  profilanswer
 

Déslé mais fo que je bosse aussi...
regarde ds les groupes google...
 
 :hello:


---------------
Des bons sites pour Delphi? http://forum.hardware.fr/forum2.php3?post=16838&cat=10 -- informaticien -- http://www.z0rglub.com/phpwebgallery/ -- Delphi :love:
n°229959
ZeT
Ze Eternal Thrasher! 1st class
Posté le 18-10-2002 à 11:07:31  profilanswer
 

Salut, voila j'ai eut ce probleme, j'ai cherche et j'ai trouve dans l'aide de Excel, je te livre la macro que j'ai réalisé.
 
Le principe :  
un fichier index.xls qui contient une liste de fichiers de statistiques a mettre a jour.
A cote du nom du fichier la macro qu'il contient et que je dois lancer.
 
Donc je lance mon fichier excel et ensuite j'appelle la macro dudit fichier.
 
Ca marche trés bien, je fais des mises a jours toutes les semaines.

Code :
  1. OffsetMacro = 2
  2.     OffsetImpression = 2
  3.     MyDebug = 0
  4.     Ligne_Depart = 6
  5.     Ligne_Arrive = 22
  6.     Colonne = 3 'soit la lettre C
  7.     Rep_Source = "r:\stats\info\"
  8.     Rep_Dest = "s:\service\trans400\info\"
  9.     'Worksheets(1).Activate
  10.     For Ligne = Ligne_Depart To Ligne_Arrive
  11.         If Worksheets(1).Cells(Ligne, Colonne).Value <> "" Then
  12.             If MyDebug <> 0 Then MsgBox Cells(Ligne, Colonne).Value
  13.             'ouverture du fichier
  14.             Fichier_Source = Cells(Ligne, Colonne).Value
  15.             'récupération du nom de la macro dans le fichier index
  16.             NomMacro = Cells(Ligne, Colonne + OffsetMacro)
  17.             'ouverture du fichier -> il devient le classeur actif
  18.             Workbooks.Open Filename:=Rep_Source & Fichier_Source
  19.             If MyDebug <> 0 Then MsgBox "ouverture du fichier " & Fichier_Source
  20.             'si une macro est spécifique à ce classeur
  21.             If NomMacro <> "" Then
  22.             'je l'appelle
  23.                 If MyDebug <> 0 Then MsgBox "appel de macro " & NomMacro
  24.                 ControleImpression = Cells(Ligne, Colonne + OffsetMacro)
  25.                 'ControleImpression = 1
  26.                 'MsgBox ControleImpression
  27.                 If (ControleImpression = 1) Then
  28.                     If MyDebug <> 0 Then MsgBox "Appel avec impression"
  29.                     If MyDebug = 0 Then Application.Run Fichier_Source & "!" & NomMacro, impression
  30.                 Else
  31.                     If MyDebug <> 0 Then MsgBox "Appel sans impression"
  32.                              ******c'est ici que ça se passe*********************
  33.                     If MyDebug = 0 Then Application.Run Fichier_Source & "!" & NomMacro, vbNo
  34.                 End If
  35.             Else 'sinon je fais mon traitement par défaut
  36.                 'activer le classeur que je viens d'ouvrir
  37. ...
  38. ...


 
les reste de la macro on s'en tape le coquillard avecd une pelle à gateaux  :o  
En esperant que cela puisse t'aider  ;)


Message édité par ZeT le 18-10-2002 à 11:10:37

---------------
Membre du mouvement [:mossieurpropre] L'un dans l'autre, vaut mieux être l'un !
n°229996
xtoune
Posté le 18-10-2002 à 12:10:50  profilanswer
 


alors la j'hallucine grave !!!!
 
now sa marche pourtant je fé comme hier :
 
Application.Run "destination.xls!test"
 
jva manger et je regarderai si ca marche avec les vrai fichier et pas kavec les fichier de test  :--)))
 
 
MERCI les GARS !!!
 
.......................jva garder mon job lol
 


---------------
heu...
n°230000
xtoune
Posté le 18-10-2002 à 12:11:52  profilanswer
 

deja moi je mettais des parenthese on dirai ..................


---------------
heu...
n°230057
xtoune
Posté le 18-10-2002 à 13:54:51  profilanswer
 

non en fait j'en mettais pas
 


---------------
heu...
n°230090
xtoune
Posté le 18-10-2002 à 14:45:03  profilanswer
 

le pb c paske le nom du fichier ou se trouvait la macro que je voulais lancer comporté des espaces.
 
c bizarre, mais on dirai bien que c ca
 
voili voilou !!
merci


---------------
heu...
mood
Publicité
Posté le   profilanswer
 


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Executer une macro d'un autre classeur excel

 

Sujets relatifs
[VB]Sauvegarde d'une sheet excel sous VBRendre disponible une macro sur plusieur machine d'un meme reseau
Commen faire une comparaison de date dans excel XPPetite macro sous excel
exécuter script sql avec access[VBA] Possible de recuperer du telnet sous Excel en temps reel ?
[Access] Lancer une macro à une heure défini ?Fonction Excel Personnalisée?
pb vba Excel 
Plus de sujets relatifs à : Executer une macro d'un autre classeur excel

Forum MesDiscussions.Net, Version 2010.2
(c) 2000-2011 Doctissimo
Page générée en 0.060 secondes

Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR