Problème macro quand on renomme le fichier excel
Résolu
Frantoc
Messages postés
5
Date d'inscription
Statut
Membre
Dernière intervention
-
Frantoc Messages postés 5 Date d'inscription Statut Membre Dernière intervention -
Frantoc Messages postés 5 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
Dans un fichier Excel qui se nomme "Fiche Ecoles", j'ai une macro qui appelle d'autres macros. Voici les lignes de programmation.
Sub Toutassembler()
' Application.Run _
"'Fiches Ecoles.xlsm'!Assemblagefeuilles1a9"
Application.Run _
"'Fiches Ecoles.xlsm'!Assemblagefeuilles10a20"
End Sub
Cette macro fonctionne parfaitement, à la seule condition qu'on ne renomme surtout pas le fichier "Fiches Ecoles"... Comment faire pour que cette macro fonctionne même si le nom du fichier qui héberge cette macro change ???
Je comprends bien que dans mes lignes de codes la partie 'Fiches Ecoles.xlsm' ne convient pas... mais par quoi la remplacer... J'ai essayé 'thisworkbook' sans succés...
help !!!
Dans un fichier Excel qui se nomme "Fiche Ecoles", j'ai une macro qui appelle d'autres macros. Voici les lignes de programmation.
Sub Toutassembler()
' Application.Run _
"'Fiches Ecoles.xlsm'!Assemblagefeuilles1a9"
Application.Run _
"'Fiches Ecoles.xlsm'!Assemblagefeuilles10a20"
End Sub
Cette macro fonctionne parfaitement, à la seule condition qu'on ne renomme surtout pas le fichier "Fiches Ecoles"... Comment faire pour que cette macro fonctionne même si le nom du fichier qui héberge cette macro change ???
Je comprends bien que dans mes lignes de codes la partie 'Fiches Ecoles.xlsm' ne convient pas... mais par quoi la remplacer... J'ai essayé 'thisworkbook' sans succés...
help !!!
A voir également:
- Problème macro quand on renomme le fichier excel
- Fichier epub - Guide
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Fichier bin - Guide
- Fichier rar - Guide
- Fichier .dat - Guide
2 réponses
Bonjour
Si les macros sont dans le fichier où elles s'exécutent, essaies en remplaçant
' Application.Run "'Fiches Ecoles.xlsm'!Assemblagefeuilles1a9"
par
Call Assemblagefeuilles1a9
RQ. tes macros doivent être déclarées Publiques
Public Sub Assemblagefeuilles1a9()
...
End Sub
Cdlmnt
Si les macros sont dans le fichier où elles s'exécutent, essaies en remplaçant
' Application.Run "'Fiches Ecoles.xlsm'!Assemblagefeuilles1a9"
par
Call Assemblagefeuilles1a9
RQ. tes macros doivent être déclarées Publiques
Public Sub Assemblagefeuilles1a9()
...
End Sub
Cdlmnt
Frantoc
Messages postés
5
Date d'inscription
Statut
Membre
Dernière intervention
Un très grand merci CCM81. Je viens de tester, c'est exactement la commande qui me manquait ! Ca marche impec !!!
