Discussion :

[johan89]

Bonjour,

J'ai d'un côté ma macro VBA exportée en fichier .bas.
De l'autre côté un fichier Excel défini par un nom.

Mon objectif est simple : créer un script pour importer ma macro dans mon fichier Excel puis l'exécuter sans toucher au fichier Excel.

J'ai essayé en VBScript, sans succès : l'import de la macro est impossible, VBComponents me renvoie une erreur. Connaissez-vous un autre moyen ?

[Daniel.C]

Bonjour,

J'ai cette macro - qu'il faut ajouter au fichier cible - pour copier un module et l'importer. Le passage par un fichier intermédiaire n'est utile que pour importer un seul des modules alors que le fichier source en comporte plusieurs.
Source :http://www.exceltip.com :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
Sub CopieModules()
    Set SourceWB = Workbooks("c:\porte.xls")
    Set CibleWB = ThisWorkbook
    FichTemp = "d:\donnees\daniel\mpfe\~tmpexport.bas"
    On Error Resume Next
    NomModule = "Module21"
    SourceWB.VBProject.VBComponents(NomModule).Export FichTemp
    CibleWB.VBProject.VBComponents.Import FichTemp
    Kill FichTemp
    On Error GoTo 0
End Sub

[johan89]

Bonjour,

Je ne peux pas accéder au fichier cible, qui est généré après l’exécution de la macro.

J'ai un fichier Excel que je ne peux pas toucher directement et mon fichier .bas. Le fichier .bas doit être importé par n'importe quel moyen dans le fichier Excel puis être exécuté. Cette macro donne lieu à la génération d'un nouveau fichier Excel ensuite.

Une idée qui me vient de m'être donnée est d'importer la macro directement dans Excel. Je vais chercher de ce côté. Ainsi, l'utilisateur aura accès à tout moment à la macro. Il n'aura qu'à ouvrir le fichier Excel puis exécuter la macro.

[Daniel.C]

Tant mieux si tu as trouvé une solution. Je me suis trompé dans mes explications :

J'ai cette macro - qu'il faut ajouter au fichier cible

Il fallait comprendre :
J'ai cette macro - qu'il faut ajouter au fichier important la macro.

[johan89]

Je n'ai pas testé ta solution, mais j'ai alloué la macro à un bouton dans Excel directement.

Clic droit dans barre d'outils -> Personnaliser -> Commande -> Macros -> cliquer-glisser de "Bouton personnalisé" vers la barre d'outils
Ne pas quitter la fenêtre "Personnalisation" pour configurer le bouton.
Donc ensuite, clic droit sur le bouton -> Affecter Macro
On affecte la bonne macro et c'est gagné.
J'ai expliqué l'essentiel. Pour tout ce qui est personnalisation (graphique) du bouton, il faut fouiller dans les paramètres du bouton.