Discussion :

[tzehani]

Bonjour à toute la communauté de developpez.com

Au fait j'ai fait une macro sur vb sur excel et je voudrais que cette macro soit utilisable par n'importe quel fichier excel et pas non seulement le fichier excel où j'ai réalisé la macro.
Je voudrais dès que j'ouvre un fichier excel avoir la possibilité de lancer la macro.

Voila Merci par avance pour votre Aide !

[ouskel'n'or]

Tu places ta macro dans un fichier ouvert au démarage d'Excel. Ce fichier, souvent nommé Perso.xls, est à placer dans le répertoire XLOuvrir, généralement situé ici "C:\Program Files\Microsoft Office\Office\XLOuvrir"
A+

Edit
Il te restera à créer le bouton qui lance la macro dans une barre d'outils qui peut être une barre d'outils existante. Se fait facilement sans macro.

[tzehani]

Merci beaucoup pour ton aide mais la macro s'execute sur Perso.xls au lieu de s'executer sur le fichier excel que je veux.
Je comprends pas pourquoi ?

Au fait dans ma macro j'ai besoin d'activer le fichier excel courant et il active Perso.xls, moi j'ai mis Feuil1.activate parce que le nom du fichier sur lequel je veux executer ma macro n'est pas toujours le meme
Pourtant j'ai bien fait comme tu m'as dit

[ouskel'n'or]

Tu dois simplement exécuter la macro sur ActiveWorkbook et non sur ThisWorkBook
Je suppose la macro InsérerUneValeur() placée dans Perso.xls et que le classeur dans lequel tu veux exécuter la macro est le classeur actif :

Code :

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

1
2
3
Sub InsérerUneValeur()
ActiveWorkbook.Worksheets("Feuil1").Cells(5, 6) = "coucou !"
End Sub

A+

Edit
Si tu as toujours un pb, montre le code de ta macro

[tzehani]

Malheureusement j'ai toujours un problème voici le code

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
20
21
22
 
 
Sub CompteRendu()
....
....
....
     Windows("BD.xls").Activate
    Application.Goto Reference:="BaseProjets"
    Selection.Copy
 
    Feuil1.Activate   " ==========> c'est cette ligne la qui active Perso.xls au lieu du fichier courant "
 
    ActiveWindow.SmallScroll ToRight:=8
    Range("AP1").Select
    ActiveSheet.Paste
    Columns("AP:AP").EntireColumn.AutoFit
    Application.CutCopyMode = False
    ActiveWorkbook.Save
......
......
.....
End Sub

Ce code je l'ai mis dans Perso.xls qui se lance lorsque j'ouvre un fichier excel.
Quand je fais alt + F8 pour executer ma macro sur un fichier par exemple qui s'appelle JUILLET2007.xls et bien le nom de la macro est Perso.xls!Feuil1.CompteRendu
Bref
au lieu d'activer la feuille courante, la macro active Perso.xls et je tiens à te préciser que ma macro est présente uniquement dans Perso.xls

Voila merci infiniment de ton aide

[ouskel'n'or]

Comme je te l'ai mis...

Code :

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

ActiveWorkbook.Worksheets("Feuil1").Select

A+

[tzehani]

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
20
21
22
23
 
 
Sub CompteRendu()
....
....
ChDir "C:\Documents and Settings\AMENSI\Bureau\Projet GL TRADE"
    Workbooks.Open Filename:= _
    "C:\Documents and Settings\AMENSI\Bureau\Projet GL TRADE\BD.xls"
 
    Windows("BD.xls").Activate
    Application.Goto Reference:="BaseProjets"
    Selection.Copy
    ActiveWorkbook.Sheets(1).Activate
    ActiveWindow.SmallScroll ToRight:=8
    Range("AP1").Select
    ActiveSheet.Paste
    Columns("AP:AP").EntireColumn.AutoFit
    Application.CutCopyMode = False
    ActiveWorkbook.Save
......
......
.....
End Sub

Merci la j'y suis presque, le plus gros pas est fait sauf que quand on regarde bien mon code, j'active dans mon code ma Base de Données et au fait cette ligne ci dessous :

Code :

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

1
2
 
ActiveWorkbook.Sheets(1).Activate

va activer le fichier BD.xls au lieu du fichier courant à cause du Windows("BD.xls").Activate

et moi je veux pas réactiver celui la (BD.xls) mais le fichier sur lequel j'ai lancé ma macro.

Il n y a pas une fonction qui désactive car comme peut être que quand le code arrive à la fameuse ligne, ca sera le bon fichier qui sera activé

Merci mille fois