Discussion :

[Debutant10]

Bonjour,

J'ai une macro qui fonctionne bien dans un fichier excel elle se trouve dans mon ClasseurA, cette macro récupère 44 champs du fichier trameB de A1 :AT1 puis les transfert vers n'importe fichier à condition d'avoir ClasseurA ouvert


Le pb : Pour faire fonctionner cela je suis obligé d'avoir le classeur A ouvert si non rien retrouve pas la macro dans éxecuter macro .


1-/ je ne retrouve pas la macro pour faire fonctionner cela
2-/ Je souhaite pouvoir avec n'importe quelle fichier importer ou autre lancer cette macro sans avoir à chaque fois le classeur A car s'il est fermer je retrouve pas la macro dans éxecuter macro

Merci pour votre aide

[Gord21]

Bonjour,
Pour que ta macro apparaisse dans la liste de macros, il faut que ton fichier soit ouvert, par contre, tu peux le masquer en affectant True à la propriété IsAddin dans ThisWorkbook. Tu enregistres ton fichier (classeur A) dans ton répertoire d'ouverture ou dans XLSTART.

@+

[Debutant10]

Merci Gord 21

mais y-a-t-il une solution plus simple ?


si j'ouvre n'importe quelle fichier excel peut-on pas avoir cette macro par défaut ?

[Many31]

Merci Gord 21

mais y-a-t-il une solution plus simple ?


si j'ouvre n'importe quelle fichier excel peut-on pas avoir cette macro par défaut ?

Bonjour

Oui il existe une solution "plus simple" et permettant d'avoir ta macro "dans" Excel et non rattachée à un classeur particulier...

Il sagit des marco complémentaire. Mais cela nécessite quelques adaptation de la macro originale et de faire passer le fichier xls qui la contient en .xla
Une fois le fichier converti en xla tu peux aller dans l'onglet Outil -> Macro complémentaire et rattacher ton fichier xla.

Une fois cela fait tu peux lancer la macro complémentaire dès l'ouverture d'excel. Et même créer un bouton dans la barre de menu qui sera permanent et te permetra de lancer facilement ta macro

Un tour par le tutoriel en recherchant "Macro complémentaire" te donnera tout les détails

[Debutant10]

MERCI Many 31 pour votre explication,

Pouvez vous me dire comment faites vous pour le transformer en .xla et créer un bouton dans la barre de menu qui sera permanent et me permetra de lancer facilement la macro

merci pour votre aide

[patricktoulon]

bonjour envoie ton fichier ou ta macro complete

je te la metrais en xla avec un nouveau bouton dans la commandbar


au plaisir

[Debutant10]

Bonjour, voici la macro,

comment la mettre en xla puis avec un nouveau bouton dans la commandbar
toujours par défaut ?

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Sub Remplacer()
 
Dim exc As New Excel.Application
exc.Workbooks.Open ("E:\variables.xls")
 
Dim col As Integer
col = 1
Do While (col < 9)
Cells(1, col).Value = exc.Cells(1, col).Value
col = col + 1
Loop
 
exc.Workbooks.Close
exc.Quit
Set exc = Nothing
 
MsgBox "Fini"
 
End Sub

[patricktoulon]

bonjour debutant

excuse moi j'etais occupé

tiens voila ton complement en piece jointe

au plaisir

[Debutant10]

Merci patrickt pour votre aide cela fonctionne bien