Salut Philippe,
Merci pour tes réponses. Mais je ne trouve toujours pas la solution à mon
problème. Si tu as le courage de te pencher sur mes macros, peux-tu
m'expliquer pourquoi mon traitement s'arrête systématiquement avant que la
macro "Clôture" ne soit exécutée.
Voici la macro appelante :
Sub Macro2()
' Lancement du traitement des fichiers de CA
Application.Run "'Lancement.xls'!CA"
' Lancement de la suppression des fichiers requis et fermeture du fichier
Application.Run "'Lancement.xls'!Clôture"
' Fermeture de l'Applicatif
ActiveWorkbook.Save
ActiveWorkbook.Close
End Sub
Les macros appelées sont les suivantes :
Macro "CA" :
Sub CA()
' Macro enregistrée le 20/09/2004 par INTERSPORT FRANCE S.A.
' Copie du fichier Achve20.xls
FileCopy "I:DEPARTCENTRALEACHVE20.XLS",
"Gestion2cProfessionnelBases de donnéesExtractionsCA.xls"
' Ouverture du fichier Traitement des Extractions
ChDir "Gestion2cProfessionnelBases de donnéesExtractions"
Workbooks.Open Filename:= _
"Gestion2cProfessionnelBases de donnéesExtractionsTraitements
Quotidiens.xls"
Application.Run "'Traitements Quotidiens.xls'!Chiffres"
End Sub
Macro "Clôture" :
Sub Clôture()
' Macro enregistrée le 23/09/2004 par SPORT LEADER
Kill "Gestion2CProfessionnelBases de donnéesExtractionsGlisse.xls"
Kill "Gestion2CProfessionnelBases de
donnéesExtractionsSportswear.xls"
Kill "Gestion2CProfessionnelBases de
donnéesExtractionsMultisport.xls"
Kill "Gestion2CProfessionnelBases de
donnéesExtractionsChaussures.xls"
Kill "Gestion2CProfessionnelBases de donnéesExtractionsCA.xls"
Kill "I:DEPARTCENTRALEACHVE16.XLS"
Kill "I:DEPARTCENTRALEACHVE17.XLS"
Kill "I:DEPARTCENTRALEACHVE18.XLS"
Kill "I:DEPARTCENTRALEACHVE19.XLS"
Kill "I:DEPARTCENTRALEACHVE20.XLS"
End Sub
C'est donc cette dernière macro qui n'est jamais exécutée. Identifies-tu un
problème ???
Est-ce que cela peut venir de la macro "Chiffres" lancée par la macro "CA" ???
Merci d'avance,
Yvan.Bonjour Yvan,
Il existe plusieurs types de modules.
Celui dans lequel l'enregistreur de macros range les procédures que tu lui dictes est appelé module
standard il peut recevoir, outre les procédures, les fonctions personnalisées.
Il existe aussi les modules de feuille, qui ne peuvent pas accueillir de fonction et qui peuvent en
revanche abriter des procédures événementielles de feuille (change, sélection_change...) ou encore un
module propre au classeur : Thisworkbook() qui abrite les procédures événementielles du classeur
(Open,
Beforesave....)
Il existe enfin les modules de classe qui permettent de gérer des objets en leur attribuant des
propriétés.
Les procédures peuvent être appelées indifféremment d'un module à l'autre, avec pour restriction que
les
variables doivent être déclarées publiques (public maVar as ...) pour être utilisables dans tout le
classeur.
--
Amicales Salutations
XL 97 / 2000 / 2002
Retirer A_S_ pour répondre en privé.
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"Yvan" a écrit dans le message de news:Bonjour,
Quelqu'un peut-il m'éclairer sur la notion de Module ???
Lorsque je crée une macro, celle-ci vient se loger dans un module.
Quelle est la fonction exacte du module ???
Si j'enchaine plusieurs macros (une macro appelante et des macros appelées)
les unes à la suite des autres, doivent-elles être obligatoirement dans le
même module. Si oui, quelles peuvent être les incidences qu'elles soient
stockées dans des modules différents.
Est-il possible de gérer les modules à sa guise ??? Si oui, comment ???
--
Merci pour vos réponses.
Salut Philippe,
Merci pour tes réponses. Mais je ne trouve toujours pas la solution à mon
problème. Si tu as le courage de te pencher sur mes macros, peux-tu
m'expliquer pourquoi mon traitement s'arrête systématiquement avant que la
macro "Clôture" ne soit exécutée.
Voici la macro appelante :
Sub Macro2()
' Lancement du traitement des fichiers de CA
Application.Run "'Lancement.xls'!CA"
' Lancement de la suppression des fichiers requis et fermeture du fichier
Application.Run "'Lancement.xls'!Clôture"
' Fermeture de l'Applicatif
ActiveWorkbook.Save
ActiveWorkbook.Close
End Sub
Les macros appelées sont les suivantes :
Macro "CA" :
Sub CA()
' Macro enregistrée le 20/09/2004 par INTERSPORT FRANCE S.A.
' Copie du fichier Achve20.xls
FileCopy "I:DEPARTCENTRALEACHVE20.XLS",
"\Gestion2cProfessionnelBases de donnéesExtractionsCA.xls"
' Ouverture du fichier Traitement des Extractions
ChDir "\Gestion2cProfessionnelBases de donnéesExtractions"
Workbooks.Open Filename:= _
"\Gestion2cProfessionnelBases de donnéesExtractionsTraitements
Quotidiens.xls"
Application.Run "'Traitements Quotidiens.xls'!Chiffres"
End Sub
Macro "Clôture" :
Sub Clôture()
' Macro enregistrée le 23/09/2004 par SPORT LEADER
Kill "\Gestion2CProfessionnelBases de donnéesExtractionsGlisse.xls"
Kill "\Gestion2CProfessionnelBases de
donnéesExtractionsSportswear.xls"
Kill "\Gestion2CProfessionnelBases de
donnéesExtractionsMultisport.xls"
Kill "\Gestion2CProfessionnelBases de
donnéesExtractionsChaussures.xls"
Kill "\Gestion2CProfessionnelBases de donnéesExtractionsCA.xls"
Kill "I:DEPARTCENTRALEACHVE16.XLS"
Kill "I:DEPARTCENTRALEACHVE17.XLS"
Kill "I:DEPARTCENTRALEACHVE18.XLS"
Kill "I:DEPARTCENTRALEACHVE19.XLS"
Kill "I:DEPARTCENTRALEACHVE20.XLS"
End Sub
C'est donc cette dernière macro qui n'est jamais exécutée. Identifies-tu un
problème ???
Est-ce que cela peut venir de la macro "Chiffres" lancée par la macro "CA" ???
Merci d'avance,
Yvan.
Bonjour Yvan,
Il existe plusieurs types de modules.
Celui dans lequel l'enregistreur de macros range les procédures que tu lui dictes est appelé module
standard il peut recevoir, outre les procédures, les fonctions personnalisées.
Il existe aussi les modules de feuille, qui ne peuvent pas accueillir de fonction et qui peuvent en
revanche abriter des procédures événementielles de feuille (change, sélection_change...) ou encore un
module propre au classeur : Thisworkbook() qui abrite les procédures événementielles du classeur
(Open,
Beforesave....)
Il existe enfin les modules de classe qui permettent de gérer des objets en leur attribuant des
propriétés.
Les procédures peuvent être appelées indifféremment d'un module à l'autre, avec pour restriction que
les
variables doivent être déclarées publiques (public maVar as ...) pour être utilisables dans tout le
classeur.
--
Amicales Salutations
XL 97 / 2000 / 2002
Retirer A_S_ pour répondre en privé.
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"Yvan" <Yvan@discussions.microsoft.com> a écrit dans le message de news:
FF9FEC60-D8F8-4587-AC47-173305930A3B@microsoft.com...
Bonjour,
Quelqu'un peut-il m'éclairer sur la notion de Module ???
Lorsque je crée une macro, celle-ci vient se loger dans un module.
Quelle est la fonction exacte du module ???
Si j'enchaine plusieurs macros (une macro appelante et des macros appelées)
les unes à la suite des autres, doivent-elles être obligatoirement dans le
même module. Si oui, quelles peuvent être les incidences qu'elles soient
stockées dans des modules différents.
Est-il possible de gérer les modules à sa guise ??? Si oui, comment ???
--
Merci pour vos réponses.
Salut Philippe,
Merci pour tes réponses. Mais je ne trouve toujours pas la solution à mon
problème. Si tu as le courage de te pencher sur mes macros, peux-tu
m'expliquer pourquoi mon traitement s'arrête systématiquement avant que la
macro "Clôture" ne soit exécutée.
Voici la macro appelante :
Sub Macro2()
' Lancement du traitement des fichiers de CA
Application.Run "'Lancement.xls'!CA"
' Lancement de la suppression des fichiers requis et fermeture du fichier
Application.Run "'Lancement.xls'!Clôture"
' Fermeture de l'Applicatif
ActiveWorkbook.Save
ActiveWorkbook.Close
End Sub
Les macros appelées sont les suivantes :
Macro "CA" :
Sub CA()
' Macro enregistrée le 20/09/2004 par INTERSPORT FRANCE S.A.
' Copie du fichier Achve20.xls
FileCopy "I:DEPARTCENTRALEACHVE20.XLS",
"Gestion2cProfessionnelBases de donnéesExtractionsCA.xls"
' Ouverture du fichier Traitement des Extractions
ChDir "Gestion2cProfessionnelBases de donnéesExtractions"
Workbooks.Open Filename:= _
"Gestion2cProfessionnelBases de donnéesExtractionsTraitements
Quotidiens.xls"
Application.Run "'Traitements Quotidiens.xls'!Chiffres"
End Sub
Macro "Clôture" :
Sub Clôture()
' Macro enregistrée le 23/09/2004 par SPORT LEADER
Kill "Gestion2CProfessionnelBases de donnéesExtractionsGlisse.xls"
Kill "Gestion2CProfessionnelBases de
donnéesExtractionsSportswear.xls"
Kill "Gestion2CProfessionnelBases de
donnéesExtractionsMultisport.xls"
Kill "Gestion2CProfessionnelBases de
donnéesExtractionsChaussures.xls"
Kill "Gestion2CProfessionnelBases de donnéesExtractionsCA.xls"
Kill "I:DEPARTCENTRALEACHVE16.XLS"
Kill "I:DEPARTCENTRALEACHVE17.XLS"
Kill "I:DEPARTCENTRALEACHVE18.XLS"
Kill "I:DEPARTCENTRALEACHVE19.XLS"
Kill "I:DEPARTCENTRALEACHVE20.XLS"
End Sub
C'est donc cette dernière macro qui n'est jamais exécutée. Identifies-tu un
problème ???
Est-ce que cela peut venir de la macro "Chiffres" lancée par la macro "CA" ???
Merci d'avance,
Yvan.Bonjour Yvan,
Il existe plusieurs types de modules.
Celui dans lequel l'enregistreur de macros range les procédures que tu lui dictes est appelé module
standard il peut recevoir, outre les procédures, les fonctions personnalisées.
Il existe aussi les modules de feuille, qui ne peuvent pas accueillir de fonction et qui peuvent en
revanche abriter des procédures événementielles de feuille (change, sélection_change...) ou encore un
module propre au classeur : Thisworkbook() qui abrite les procédures événementielles du classeur
(Open,
Beforesave....)
Il existe enfin les modules de classe qui permettent de gérer des objets en leur attribuant des
propriétés.
Les procédures peuvent être appelées indifféremment d'un module à l'autre, avec pour restriction que
les
variables doivent être déclarées publiques (public maVar as ...) pour être utilisables dans tout le
classeur.
--
Amicales Salutations
XL 97 / 2000 / 2002
Retirer A_S_ pour répondre en privé.
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"Yvan" a écrit dans le message de news:Bonjour,
Quelqu'un peut-il m'éclairer sur la notion de Module ???
Lorsque je crée une macro, celle-ci vient se loger dans un module.
Quelle est la fonction exacte du module ???
Si j'enchaine plusieurs macros (une macro appelante et des macros appelées)
les unes à la suite des autres, doivent-elles être obligatoirement dans le
même module. Si oui, quelles peuvent être les incidences qu'elles soient
stockées dans des modules différents.
Est-il possible de gérer les modules à sa guise ??? Si oui, comment ???
--
Merci pour vos réponses.
Re Yvan,
A tout hasard, je tenterais bien un truc comme ça :
' Lancement du traitement des fichiers de CA
doevents
Application.Run "'Lancement.xls'!CA"
this workbook.activate
' Lancement de la suppression des fichiers requis et fermeture du fichier
Application.Run "'Lancement.xls'!Clôture"
--
Amicales Salutations
XL 97 / 2000 / 2002
Retirer A_S_ pour répondre en privé.
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"Yvan" a écrit dans le message de news:Salut Philippe,
Merci pour tes réponses. Mais je ne trouve toujours pas la solution à mon
problème. Si tu as le courage de te pencher sur mes macros, peux-tu
m'expliquer pourquoi mon traitement s'arrête systématiquement avant que la
macro "Clôture" ne soit exécutée.
Voici la macro appelante :
Sub Macro2()
' Lancement du traitement des fichiers de CA
Application.Run "'Lancement.xls'!CA"
' Lancement de la suppression des fichiers requis et fermeture du fichier
Application.Run "'Lancement.xls'!Clôture"
' Fermeture de l'Applicatif
ActiveWorkbook.Save
ActiveWorkbook.Close
End Sub
Les macros appelées sont les suivantes :
Macro "CA" :
Sub CA()
' Macro enregistrée le 20/09/2004 par INTERSPORT FRANCE S.A.
' Copie du fichier Achve20.xls
FileCopy "I:DEPARTCENTRALEACHVE20.XLS",
"Gestion2cProfessionnelBases de donnéesExtractionsCA.xls"
' Ouverture du fichier Traitement des Extractions
ChDir "Gestion2cProfessionnelBases de donnéesExtractions"
Workbooks.Open Filename:= _
"Gestion2cProfessionnelBases de donnéesExtractionsTraitements
Quotidiens.xls"
Application.Run "'Traitements Quotidiens.xls'!Chiffres"
End Sub
Macro "Clôture" :
Sub Clôture()
' Macro enregistrée le 23/09/2004 par SPORT LEADER
Kill "Gestion2CProfessionnelBases de donnéesExtractionsGlisse.xls"
Kill "Gestion2CProfessionnelBases de
donnéesExtractionsSportswear.xls"
Kill "Gestion2CProfessionnelBases de
donnéesExtractionsMultisport.xls"
Kill "Gestion2CProfessionnelBases de
donnéesExtractionsChaussures.xls"
Kill "Gestion2CProfessionnelBases de donnéesExtractionsCA.xls"
Kill "I:DEPARTCENTRALEACHVE16.XLS"
Kill "I:DEPARTCENTRALEACHVE17.XLS"
Kill "I:DEPARTCENTRALEACHVE18.XLS"
Kill "I:DEPARTCENTRALEACHVE19.XLS"
Kill "I:DEPARTCENTRALEACHVE20.XLS"
End Sub
C'est donc cette dernière macro qui n'est jamais exécutée. Identifies-tu un
problème ???
Est-ce que cela peut venir de la macro "Chiffres" lancée par la macro "CA" ???
Merci d'avance,
Yvan.Bonjour Yvan,
Il existe plusieurs types de modules.
Celui dans lequel l'enregistreur de macros range les procédures que tu lui dictes est appelé module
standard il peut recevoir, outre les procédures, les fonctions personnalisées.
Il existe aussi les modules de feuille, qui ne peuvent pas accueillir de fonction et qui peuvent en
revanche abriter des procédures événementielles de feuille (change, sélection_change...) ou encore un
module propre au classeur : Thisworkbook() qui abrite les procédures événementielles du classeur
(Open,
Beforesave....)
Il existe enfin les modules de classe qui permettent de gérer des objets en leur attribuant des
propriétés.
Les procédures peuvent être appelées indifféremment d'un module à l'autre, avec pour restriction que
les
variables doivent être déclarées publiques (public maVar as ...) pour être utilisables dans tout le
classeur.
--
Amicales Salutations
XL 97 / 2000 / 2002
Retirer A_S_ pour répondre en privé.
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"Yvan" a écrit dans le message de news:Bonjour,
Quelqu'un peut-il m'éclairer sur la notion de Module ???
Lorsque je crée une macro, celle-ci vient se loger dans un module.
Quelle est la fonction exacte du module ???
Si j'enchaine plusieurs macros (une macro appelante et des macros appelées)
les unes à la suite des autres, doivent-elles être obligatoirement dans le
même module. Si oui, quelles peuvent être les incidences qu'elles soient
stockées dans des modules différents.
Est-il possible de gérer les modules à sa guise ??? Si oui, comment ???
--
Merci pour vos réponses.
Re Yvan,
A tout hasard, je tenterais bien un truc comme ça :
' Lancement du traitement des fichiers de CA
doevents
Application.Run "'Lancement.xls'!CA"
this workbook.activate
' Lancement de la suppression des fichiers requis et fermeture du fichier
Application.Run "'Lancement.xls'!Clôture"
--
Amicales Salutations
XL 97 / 2000 / 2002
Retirer A_S_ pour répondre en privé.
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"Yvan" <Yvan@discussions.microsoft.com> a écrit dans le message de news:
1DDC588D-593B-4937-B659-C1D90CC1B22C@microsoft.com...
Salut Philippe,
Merci pour tes réponses. Mais je ne trouve toujours pas la solution à mon
problème. Si tu as le courage de te pencher sur mes macros, peux-tu
m'expliquer pourquoi mon traitement s'arrête systématiquement avant que la
macro "Clôture" ne soit exécutée.
Voici la macro appelante :
Sub Macro2()
' Lancement du traitement des fichiers de CA
Application.Run "'Lancement.xls'!CA"
' Lancement de la suppression des fichiers requis et fermeture du fichier
Application.Run "'Lancement.xls'!Clôture"
' Fermeture de l'Applicatif
ActiveWorkbook.Save
ActiveWorkbook.Close
End Sub
Les macros appelées sont les suivantes :
Macro "CA" :
Sub CA()
' Macro enregistrée le 20/09/2004 par INTERSPORT FRANCE S.A.
' Copie du fichier Achve20.xls
FileCopy "I:DEPARTCENTRALEACHVE20.XLS",
"\Gestion2cProfessionnelBases de donnéesExtractionsCA.xls"
' Ouverture du fichier Traitement des Extractions
ChDir "\Gestion2cProfessionnelBases de donnéesExtractions"
Workbooks.Open Filename:= _
"\Gestion2cProfessionnelBases de donnéesExtractionsTraitements
Quotidiens.xls"
Application.Run "'Traitements Quotidiens.xls'!Chiffres"
End Sub
Macro "Clôture" :
Sub Clôture()
' Macro enregistrée le 23/09/2004 par SPORT LEADER
Kill "\Gestion2CProfessionnelBases de donnéesExtractionsGlisse.xls"
Kill "\Gestion2CProfessionnelBases de
donnéesExtractionsSportswear.xls"
Kill "\Gestion2CProfessionnelBases de
donnéesExtractionsMultisport.xls"
Kill "\Gestion2CProfessionnelBases de
donnéesExtractionsChaussures.xls"
Kill "\Gestion2CProfessionnelBases de donnéesExtractionsCA.xls"
Kill "I:DEPARTCENTRALEACHVE16.XLS"
Kill "I:DEPARTCENTRALEACHVE17.XLS"
Kill "I:DEPARTCENTRALEACHVE18.XLS"
Kill "I:DEPARTCENTRALEACHVE19.XLS"
Kill "I:DEPARTCENTRALEACHVE20.XLS"
End Sub
C'est donc cette dernière macro qui n'est jamais exécutée. Identifies-tu un
problème ???
Est-ce que cela peut venir de la macro "Chiffres" lancée par la macro "CA" ???
Merci d'avance,
Yvan.
Bonjour Yvan,
Il existe plusieurs types de modules.
Celui dans lequel l'enregistreur de macros range les procédures que tu lui dictes est appelé module
standard il peut recevoir, outre les procédures, les fonctions personnalisées.
Il existe aussi les modules de feuille, qui ne peuvent pas accueillir de fonction et qui peuvent en
revanche abriter des procédures événementielles de feuille (change, sélection_change...) ou encore un
module propre au classeur : Thisworkbook() qui abrite les procédures événementielles du classeur
(Open,
Beforesave....)
Il existe enfin les modules de classe qui permettent de gérer des objets en leur attribuant des
propriétés.
Les procédures peuvent être appelées indifféremment d'un module à l'autre, avec pour restriction que
les
variables doivent être déclarées publiques (public maVar as ...) pour être utilisables dans tout le
classeur.
--
Amicales Salutations
XL 97 / 2000 / 2002
Retirer A_S_ pour répondre en privé.
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"Yvan" <Yvan@discussions.microsoft.com> a écrit dans le message de news:
FF9FEC60-D8F8-4587-AC47-173305930A3B@microsoft.com...
Bonjour,
Quelqu'un peut-il m'éclairer sur la notion de Module ???
Lorsque je crée une macro, celle-ci vient se loger dans un module.
Quelle est la fonction exacte du module ???
Si j'enchaine plusieurs macros (une macro appelante et des macros appelées)
les unes à la suite des autres, doivent-elles être obligatoirement dans le
même module. Si oui, quelles peuvent être les incidences qu'elles soient
stockées dans des modules différents.
Est-il possible de gérer les modules à sa guise ??? Si oui, comment ???
--
Merci pour vos réponses.
Re Yvan,
A tout hasard, je tenterais bien un truc comme ça :
' Lancement du traitement des fichiers de CA
doevents
Application.Run "'Lancement.xls'!CA"
this workbook.activate
' Lancement de la suppression des fichiers requis et fermeture du fichier
Application.Run "'Lancement.xls'!Clôture"
--
Amicales Salutations
XL 97 / 2000 / 2002
Retirer A_S_ pour répondre en privé.
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"Yvan" a écrit dans le message de news:Salut Philippe,
Merci pour tes réponses. Mais je ne trouve toujours pas la solution à mon
problème. Si tu as le courage de te pencher sur mes macros, peux-tu
m'expliquer pourquoi mon traitement s'arrête systématiquement avant que la
macro "Clôture" ne soit exécutée.
Voici la macro appelante :
Sub Macro2()
' Lancement du traitement des fichiers de CA
Application.Run "'Lancement.xls'!CA"
' Lancement de la suppression des fichiers requis et fermeture du fichier
Application.Run "'Lancement.xls'!Clôture"
' Fermeture de l'Applicatif
ActiveWorkbook.Save
ActiveWorkbook.Close
End Sub
Les macros appelées sont les suivantes :
Macro "CA" :
Sub CA()
' Macro enregistrée le 20/09/2004 par INTERSPORT FRANCE S.A.
' Copie du fichier Achve20.xls
FileCopy "I:DEPARTCENTRALEACHVE20.XLS",
"Gestion2cProfessionnelBases de donnéesExtractionsCA.xls"
' Ouverture du fichier Traitement des Extractions
ChDir "Gestion2cProfessionnelBases de donnéesExtractions"
Workbooks.Open Filename:= _
"Gestion2cProfessionnelBases de donnéesExtractionsTraitements
Quotidiens.xls"
Application.Run "'Traitements Quotidiens.xls'!Chiffres"
End Sub
Macro "Clôture" :
Sub Clôture()
' Macro enregistrée le 23/09/2004 par SPORT LEADER
Kill "Gestion2CProfessionnelBases de donnéesExtractionsGlisse.xls"
Kill "Gestion2CProfessionnelBases de
donnéesExtractionsSportswear.xls"
Kill "Gestion2CProfessionnelBases de
donnéesExtractionsMultisport.xls"
Kill "Gestion2CProfessionnelBases de
donnéesExtractionsChaussures.xls"
Kill "Gestion2CProfessionnelBases de donnéesExtractionsCA.xls"
Kill "I:DEPARTCENTRALEACHVE16.XLS"
Kill "I:DEPARTCENTRALEACHVE17.XLS"
Kill "I:DEPARTCENTRALEACHVE18.XLS"
Kill "I:DEPARTCENTRALEACHVE19.XLS"
Kill "I:DEPARTCENTRALEACHVE20.XLS"
End Sub
C'est donc cette dernière macro qui n'est jamais exécutée. Identifies-tu un
problème ???
Est-ce que cela peut venir de la macro "Chiffres" lancée par la macro "CA" ???
Merci d'avance,
Yvan.Bonjour Yvan,
Il existe plusieurs types de modules.
Celui dans lequel l'enregistreur de macros range les procédures que tu lui dictes est appelé module
standard il peut recevoir, outre les procédures, les fonctions personnalisées.
Il existe aussi les modules de feuille, qui ne peuvent pas accueillir de fonction et qui peuvent en
revanche abriter des procédures événementielles de feuille (change, sélection_change...) ou encore un
module propre au classeur : Thisworkbook() qui abrite les procédures événementielles du classeur
(Open,
Beforesave....)
Il existe enfin les modules de classe qui permettent de gérer des objets en leur attribuant des
propriétés.
Les procédures peuvent être appelées indifféremment d'un module à l'autre, avec pour restriction que
les
variables doivent être déclarées publiques (public maVar as ...) pour être utilisables dans tout le
classeur.
--
Amicales Salutations
XL 97 / 2000 / 2002
Retirer A_S_ pour répondre en privé.
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"Yvan" a écrit dans le message de news:Bonjour,
Quelqu'un peut-il m'éclairer sur la notion de Module ???
Lorsque je crée une macro, celle-ci vient se loger dans un module.
Quelle est la fonction exacte du module ???
Si j'enchaine plusieurs macros (une macro appelante et des macros appelées)
les unes à la suite des autres, doivent-elles être obligatoirement dans le
même module. Si oui, quelles peuvent être les incidences qu'elles soient
stockées dans des modules différents.
Est-il possible de gérer les modules à sa guise ??? Si oui, comment ???
--
Merci pour vos réponses.
Salut Philippe,
Suite à ta suggestion, j'ai réduit le nombre de fichiers ouverts par la
macro appelante, et comme par hasard, tout se déroule correctement.
Bravo et à bientôt.
Yvan.Re Yvan,
A tout hasard, je tenterais bien un truc comme ça :
' Lancement du traitement des fichiers de CA
doevents
Application.Run "'Lancement.xls'!CA"
this workbook.activate
' Lancement de la suppression des fichiers requis et fermeture du fichier
Application.Run "'Lancement.xls'!Clôture"
--
Amicales Salutations
XL 97 / 2000 / 2002
Retirer A_S_ pour répondre en privé.
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"Yvan" a écrit dans le message de news:Salut Philippe,
Merci pour tes réponses. Mais je ne trouve toujours pas la solution à mon
problème. Si tu as le courage de te pencher sur mes macros, peux-tu
m'expliquer pourquoi mon traitement s'arrête systématiquement avant que la
macro "Clôture" ne soit exécutée.
Voici la macro appelante :
Sub Macro2()
' Lancement du traitement des fichiers de CA
Application.Run "'Lancement.xls'!CA"
' Lancement de la suppression des fichiers requis et fermeture du fichier
Application.Run "'Lancement.xls'!Clôture"
' Fermeture de l'Applicatif
ActiveWorkbook.Save
ActiveWorkbook.Close
End Sub
Les macros appelées sont les suivantes :
Macro "CA" :
Sub CA()
' Macro enregistrée le 20/09/2004 par INTERSPORT FRANCE S.A.
' Copie du fichier Achve20.xls
FileCopy "I:DEPARTCENTRALEACHVE20.XLS",
"Gestion2cProfessionnelBases de donnéesExtractionsCA.xls"
' Ouverture du fichier Traitement des Extractions
ChDir "Gestion2cProfessionnelBases de donnéesExtractions"
Workbooks.Open Filename:= _
"Gestion2cProfessionnelBases de donnéesExtractionsTraitements
Quotidiens.xls"
Application.Run "'Traitements Quotidiens.xls'!Chiffres"
End Sub
Macro "Clôture" :
Sub Clôture()
' Macro enregistrée le 23/09/2004 par SPORT LEADER
Kill "Gestion2CProfessionnelBases de donnéesExtractionsGlisse.xls"
Kill "Gestion2CProfessionnelBases de
donnéesExtractionsSportswear.xls"
Kill "Gestion2CProfessionnelBases de
donnéesExtractionsMultisport.xls"
Kill "Gestion2CProfessionnelBases de
donnéesExtractionsChaussures.xls"
Kill "Gestion2CProfessionnelBases de donnéesExtractionsCA.xls"
Kill "I:DEPARTCENTRALEACHVE16.XLS"
Kill "I:DEPARTCENTRALEACHVE17.XLS"
Kill "I:DEPARTCENTRALEACHVE18.XLS"
Kill "I:DEPARTCENTRALEACHVE19.XLS"
Kill "I:DEPARTCENTRALEACHVE20.XLS"
End Sub
C'est donc cette dernière macro qui n'est jamais exécutée. Identifies-tu un
problème ???
Est-ce que cela peut venir de la macro "Chiffres" lancée par la macro "CA" ???
Merci d'avance,
Yvan.Bonjour Yvan,
Il existe plusieurs types de modules.
Celui dans lequel l'enregistreur de macros range les procédures que tu lui dictes est appelé
module
standard il peut recevoir, outre les procédures, les fonctions personnalisées.
Il existe aussi les modules de feuille, qui ne peuvent pas accueillir de fonction et qui peuvent
en
revanche abriter des procédures événementielles de feuille (change, sélection_change...) ou encore
un
module propre au classeur : Thisworkbook() qui abrite les procédures événementielles du classeur
(Open,
Beforesave....)
Il existe enfin les modules de classe qui permettent de gérer des objets en leur attribuant des
propriétés.
Les procédures peuvent être appelées indifféremment d'un module à l'autre, avec pour restriction
que
les
variables doivent être déclarées publiques (public maVar as ...) pour être utilisables dans tout
le
classeur.
--
Amicales Salutations
XL 97 / 2000 / 2002
Retirer A_S_ pour répondre en privé.
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"Yvan" a écrit dans le message de news:Bonjour,
Quelqu'un peut-il m'éclairer sur la notion de Module ???
Lorsque je crée une macro, celle-ci vient se loger dans un module.
Quelle est la fonction exacte du module ???
Si j'enchaine plusieurs macros (une macro appelante et des macros appelées)
les unes à la suite des autres, doivent-elles être obligatoirement dans le
même module. Si oui, quelles peuvent être les incidences qu'elles soient
stockées dans des modules différents.
Est-il possible de gérer les modules à sa guise ??? Si oui, comment ???
--
Merci pour vos réponses.
Salut Philippe,
Suite à ta suggestion, j'ai réduit le nombre de fichiers ouverts par la
macro appelante, et comme par hasard, tout se déroule correctement.
Bravo et à bientôt.
Yvan.
Re Yvan,
A tout hasard, je tenterais bien un truc comme ça :
' Lancement du traitement des fichiers de CA
doevents
Application.Run "'Lancement.xls'!CA"
this workbook.activate
' Lancement de la suppression des fichiers requis et fermeture du fichier
Application.Run "'Lancement.xls'!Clôture"
--
Amicales Salutations
XL 97 / 2000 / 2002
Retirer A_S_ pour répondre en privé.
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"Yvan" <Yvan@discussions.microsoft.com> a écrit dans le message de news:
1DDC588D-593B-4937-B659-C1D90CC1B22C@microsoft.com...
Salut Philippe,
Merci pour tes réponses. Mais je ne trouve toujours pas la solution à mon
problème. Si tu as le courage de te pencher sur mes macros, peux-tu
m'expliquer pourquoi mon traitement s'arrête systématiquement avant que la
macro "Clôture" ne soit exécutée.
Voici la macro appelante :
Sub Macro2()
' Lancement du traitement des fichiers de CA
Application.Run "'Lancement.xls'!CA"
' Lancement de la suppression des fichiers requis et fermeture du fichier
Application.Run "'Lancement.xls'!Clôture"
' Fermeture de l'Applicatif
ActiveWorkbook.Save
ActiveWorkbook.Close
End Sub
Les macros appelées sont les suivantes :
Macro "CA" :
Sub CA()
' Macro enregistrée le 20/09/2004 par INTERSPORT FRANCE S.A.
' Copie du fichier Achve20.xls
FileCopy "I:DEPARTCENTRALEACHVE20.XLS",
"\Gestion2cProfessionnelBases de donnéesExtractionsCA.xls"
' Ouverture du fichier Traitement des Extractions
ChDir "\Gestion2cProfessionnelBases de donnéesExtractions"
Workbooks.Open Filename:= _
"\Gestion2cProfessionnelBases de donnéesExtractionsTraitements
Quotidiens.xls"
Application.Run "'Traitements Quotidiens.xls'!Chiffres"
End Sub
Macro "Clôture" :
Sub Clôture()
' Macro enregistrée le 23/09/2004 par SPORT LEADER
Kill "\Gestion2CProfessionnelBases de donnéesExtractionsGlisse.xls"
Kill "\Gestion2CProfessionnelBases de
donnéesExtractionsSportswear.xls"
Kill "\Gestion2CProfessionnelBases de
donnéesExtractionsMultisport.xls"
Kill "\Gestion2CProfessionnelBases de
donnéesExtractionsChaussures.xls"
Kill "\Gestion2CProfessionnelBases de donnéesExtractionsCA.xls"
Kill "I:DEPARTCENTRALEACHVE16.XLS"
Kill "I:DEPARTCENTRALEACHVE17.XLS"
Kill "I:DEPARTCENTRALEACHVE18.XLS"
Kill "I:DEPARTCENTRALEACHVE19.XLS"
Kill "I:DEPARTCENTRALEACHVE20.XLS"
End Sub
C'est donc cette dernière macro qui n'est jamais exécutée. Identifies-tu un
problème ???
Est-ce que cela peut venir de la macro "Chiffres" lancée par la macro "CA" ???
Merci d'avance,
Yvan.
Bonjour Yvan,
Il existe plusieurs types de modules.
Celui dans lequel l'enregistreur de macros range les procédures que tu lui dictes est appelé
module
standard il peut recevoir, outre les procédures, les fonctions personnalisées.
Il existe aussi les modules de feuille, qui ne peuvent pas accueillir de fonction et qui peuvent
en
revanche abriter des procédures événementielles de feuille (change, sélection_change...) ou encore
un
module propre au classeur : Thisworkbook() qui abrite les procédures événementielles du classeur
(Open,
Beforesave....)
Il existe enfin les modules de classe qui permettent de gérer des objets en leur attribuant des
propriétés.
Les procédures peuvent être appelées indifféremment d'un module à l'autre, avec pour restriction
que
les
variables doivent être déclarées publiques (public maVar as ...) pour être utilisables dans tout
le
classeur.
--
Amicales Salutations
XL 97 / 2000 / 2002
Retirer A_S_ pour répondre en privé.
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"Yvan" <Yvan@discussions.microsoft.com> a écrit dans le message de news:
FF9FEC60-D8F8-4587-AC47-173305930A3B@microsoft.com...
Bonjour,
Quelqu'un peut-il m'éclairer sur la notion de Module ???
Lorsque je crée une macro, celle-ci vient se loger dans un module.
Quelle est la fonction exacte du module ???
Si j'enchaine plusieurs macros (une macro appelante et des macros appelées)
les unes à la suite des autres, doivent-elles être obligatoirement dans le
même module. Si oui, quelles peuvent être les incidences qu'elles soient
stockées dans des modules différents.
Est-il possible de gérer les modules à sa guise ??? Si oui, comment ???
--
Merci pour vos réponses.
Salut Philippe,
Suite à ta suggestion, j'ai réduit le nombre de fichiers ouverts par la
macro appelante, et comme par hasard, tout se déroule correctement.
Bravo et à bientôt.
Yvan.Re Yvan,
A tout hasard, je tenterais bien un truc comme ça :
' Lancement du traitement des fichiers de CA
doevents
Application.Run "'Lancement.xls'!CA"
this workbook.activate
' Lancement de la suppression des fichiers requis et fermeture du fichier
Application.Run "'Lancement.xls'!Clôture"
--
Amicales Salutations
XL 97 / 2000 / 2002
Retirer A_S_ pour répondre en privé.
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"Yvan" a écrit dans le message de news:Salut Philippe,
Merci pour tes réponses. Mais je ne trouve toujours pas la solution à mon
problème. Si tu as le courage de te pencher sur mes macros, peux-tu
m'expliquer pourquoi mon traitement s'arrête systématiquement avant que la
macro "Clôture" ne soit exécutée.
Voici la macro appelante :
Sub Macro2()
' Lancement du traitement des fichiers de CA
Application.Run "'Lancement.xls'!CA"
' Lancement de la suppression des fichiers requis et fermeture du fichier
Application.Run "'Lancement.xls'!Clôture"
' Fermeture de l'Applicatif
ActiveWorkbook.Save
ActiveWorkbook.Close
End Sub
Les macros appelées sont les suivantes :
Macro "CA" :
Sub CA()
' Macro enregistrée le 20/09/2004 par INTERSPORT FRANCE S.A.
' Copie du fichier Achve20.xls
FileCopy "I:DEPARTCENTRALEACHVE20.XLS",
"Gestion2cProfessionnelBases de donnéesExtractionsCA.xls"
' Ouverture du fichier Traitement des Extractions
ChDir "Gestion2cProfessionnelBases de donnéesExtractions"
Workbooks.Open Filename:= _
"Gestion2cProfessionnelBases de donnéesExtractionsTraitements
Quotidiens.xls"
Application.Run "'Traitements Quotidiens.xls'!Chiffres"
End Sub
Macro "Clôture" :
Sub Clôture()
' Macro enregistrée le 23/09/2004 par SPORT LEADER
Kill "Gestion2CProfessionnelBases de donnéesExtractionsGlisse.xls"
Kill "Gestion2CProfessionnelBases de
donnéesExtractionsSportswear.xls"
Kill "Gestion2CProfessionnelBases de
donnéesExtractionsMultisport.xls"
Kill "Gestion2CProfessionnelBases de
donnéesExtractionsChaussures.xls"
Kill "Gestion2CProfessionnelBases de donnéesExtractionsCA.xls"
Kill "I:DEPARTCENTRALEACHVE16.XLS"
Kill "I:DEPARTCENTRALEACHVE17.XLS"
Kill "I:DEPARTCENTRALEACHVE18.XLS"
Kill "I:DEPARTCENTRALEACHVE19.XLS"
Kill "I:DEPARTCENTRALEACHVE20.XLS"
End Sub
C'est donc cette dernière macro qui n'est jamais exécutée. Identifies-tu un
problème ???
Est-ce que cela peut venir de la macro "Chiffres" lancée par la macro "CA" ???
Merci d'avance,
Yvan.Bonjour Yvan,
Il existe plusieurs types de modules.
Celui dans lequel l'enregistreur de macros range les procédures que tu lui dictes est appelé
module
standard il peut recevoir, outre les procédures, les fonctions personnalisées.
Il existe aussi les modules de feuille, qui ne peuvent pas accueillir de fonction et qui peuvent
en
revanche abriter des procédures événementielles de feuille (change, sélection_change...) ou encore
un
module propre au classeur : Thisworkbook() qui abrite les procédures événementielles du classeur
(Open,
Beforesave....)
Il existe enfin les modules de classe qui permettent de gérer des objets en leur attribuant des
propriétés.
Les procédures peuvent être appelées indifféremment d'un module à l'autre, avec pour restriction
que
les
variables doivent être déclarées publiques (public maVar as ...) pour être utilisables dans tout
le
classeur.
--
Amicales Salutations
XL 97 / 2000 / 2002
Retirer A_S_ pour répondre en privé.
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"Yvan" a écrit dans le message de news:Bonjour,
Quelqu'un peut-il m'éclairer sur la notion de Module ???
Lorsque je crée une macro, celle-ci vient se loger dans un module.
Quelle est la fonction exacte du module ???
Si j'enchaine plusieurs macros (une macro appelante et des macros appelées)
les unes à la suite des autres, doivent-elles être obligatoirement dans le
même module. Si oui, quelles peuvent être les incidences qu'elles soient
stockées dans des modules différents.
Est-il possible de gérer les modules à sa guise ??? Si oui, comment ???
--
Merci pour vos réponses.
