Evenement Workbook_Open

  • Initiateur de la discussion Initiateur de la discussion Jacques
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

J

Jacques

Guest
Bonjour à tous...

Voici mon petit problème...

A partir d'un classeur nommé Classeur1.xls j'ouvre une classeur nommé Classeur2.xls en utilisant la méthode Workbooks("Classeur2.xls").Open

Le classeur que j'ouvre (Classeur2.xls) a dans son événement Workbook_Open la ligne suivante:

Workbooks("Classeur1.xls).Activate

afin de me permettre de récupérer cetaines données contenue dans le classeur1.xls

Mon code fonctionne parfaitement quand je l'exécute pas à pas depuis le Classeur2.xls mais quand je laisse le programme s'exécuter tout seul, la commande Workbooks("Classeur1.xls).Activate est exécutée mais sans auncun effet. Le classeur2.xls reste actif.

De même, avant d'ouvrir le classeur2.xls, j'initialise des variables globales auxquelles ne j'ai plus accès une fois le classeur2.xls ouvert.

J'ai cru comprendre que ce qui est défini dans l'événement Workbook_Open ne s'applique qu'au fichier ouvert...

Y-aurait'il par hasard moyen d'ouvrir un deuxième fichier et de voyager de l'un à l'autre?

Pour info, j'utilise Excel 97.

D'avance merci...

Jacques
 
Bonjour Jeacques et le Forum
pour ma part (mais en Excel 98) j'utilise les formules suivantes sans problèmes
Workbooks.Open Filename:="C:\Mes documents\Classeur2.xls"
Workbooks("Classeur1.xls").Activate
Maintenant, quand tu es dans classeur1 et que tu veux entrer des valeur sur le 2 tu peux essayer ceci, ce qui t'évite de selectionner le classeur récepteur , donc de perdre tes variables
Workbooks("Classeur2.xls").Worksheets("feuil1").Range("B20") = ta valeur
Bon courage @+
Denis
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
10
Affichages
2 K
Retour