Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

lien hypertexte et fermeture excel

thalyan13

XLDnaute Nouveau
bonjour à tous...

voilà, je travaille sur plusieurs fichiers excel qui comportent tous de nombreuses pages, ce qui ferait trop lourd à intégrer en un seul fichier excel.
je cherche une macro ou un lien hypertexte qui me permettrait d'ouvrir un deuxième fichier excel (jusque là j'ai trouvé) mais qui me ferme le premier fichier excel.

en résumé, si j'ai un bouton macro sur BOOK1, je veux que cela puisse m'ouvrir BOOK2 mais aussi me fermer BOOK1

merci d'avance pour le coup de main

bonne journée à vous tous

nathalie
 

soft

XLDnaute Occasionnel
Bonjour thalyan13, le forum,

Exemple :

Sub ChangeFichier()
Dim W As String
W = ActiveWorkbook.Name
Workbooks.Open Filename:='C:\\Fichier.xls'
Workbooks(W).Close
End Sub
 

Lagache

XLDnaute Occasionnel
Bonjour le Forum
Salut à toi Nathalie

Code associé à un bouton

Workbooks('Ton fichier.xls').Activate
ThisWorkbook.close


Ton fichier = le fichier que tu veux ouvrir

@ +++
Bonne journée
Lagache
 

Blunet

XLDnaute Occasionnel
Salut le fil, autre méthode

Sub OuvrirEtFermer()
'Bien sûr Adpter le chemin et ne pas permuter l'ordre
Workbooks.Open ('C:\\Book2.xls')
Workbooks.Close ('C:\\Book1.xls')
End Sub
 
T

thalyan13

Guest


merci à vous tous, avec vos indications et surtout votre aide, j'ai nettement amélioré mon projet.
encore merci, et à la prochaine
slts
nathalie
 

Discussions similaires

Réponses
5
Affichages
250
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…