Problème de macro entre fichiers

Version imprimable

20/07/2009, 11h23
nicolav

Problème de macro entre fichiers

Bonjour,

J'ai un problème assez bizarre.

En fait une de mes macros créee un nouveau fichier du style 200709.xls. Ensuite ma macro ouvre un fichier 190709.xls déjà existant et copie des infos pour les coller dans mon fichier 200709.xls.

Ma macro creee deux boutons dans le nouveau fichier puis insere du code macro notamment le code correspondant aux actions à effectuer lors du clic sur les boutons dans ce nouveau fichier à l'aide des vbcomponents...

Le problème est le suivant, lorsque je clique sur le bouton dans le nouveau fichier (200709.xls) c'est la macro (du même nom) du fichier précédent (190709.xls) qui s'actionne !!!!
Et ceci pour les 2 boutons présents dans le fichier. En gros quand je clique sur le boutons du fichier 200709.xls, c'est la macro 190709!macro2 qui s'exécute !!!

Est ce que vous comprenez ce qui se passe ? :calim2:
merci beaucoup
20/07/2009, 12h06
aalex_38

Sans le code pour illustrer, difficile de répondre, as-tu essayé le débogage pas à pas pour y voir un peu plus clair ?
20/07/2009, 12h24
nicolav

Le truc c'est que je ne vois pas trop quoi debugguer...
Quand je clique sur le bouton c'est la macro du fichier précédent qui s'enclenche donc...
20/07/2009, 12h41
Krovax

Tes boutons sont des activex ou des bouton formulaire?

Montre nous comment tu créé les bouton et comment tu affect le code.

Car la tout ce que je peux te dire c'est que lors de ta création des bouton tu ne leur affect pas la bonne macro :roll:

voici mon code pour inserer un bouton:

Code:

1
2
3
4
5
6
7
8
9
 
       .InsertLines X + 1, "Sub InsertionBoutonDansVueGlobale()"
        .InsertLines X + 2, " Dim TonBouton2 As Shape "
        .InsertLines X + 3, " With Worksheets(""donnees"") "
        .InsertLines X + 4, " Set Bouton2 = .Shapes.AddFormControl(xlButtonControl, 35.25, 7.5, 147, 22.5) "
        .InsertLines X + 5, "Bouton2.OnAction = ""creationOnglets"" "
        .InsertLines X + 6, "Bouton2.TextFrame.Characters.Text = ""MAJ Des Onglets"" "
        .InsertLines X + 7, "End With"
        .InsertLines X + 8, "End Sub"

Et quand je clique sur le bouton, c'est creationOnglets de l'autre fichier qui se lance :(

20/07/2009, 13h05
Krovax

Donc ce n'est pas un bouton activex mais un bouton formulaire, le souci doit venir de la. Par contre je n'utilise pas ce genre de bouton du coup je passe la main :oops:
20/07/2009, 13h20
nicolav

Je n'arrive vraiment pas à comprendre ce truc !:(

Dans mes modules j'ai bien la fonction creationOnglets définie. Le bouton appelle bien cette fonction, pourquoi va t'il chercher cette macro dans le fichier précédent :aie:
20/07/2009, 14h30
nicolav

Je viens de trouver le problème. :D

En fait je faisais des copies entière de lignes et en fait la copie copiait aussi le bouton du fichier précédent. Du coup que je le collais, il se superposait au bouton du fichier nouveau. Par conséquent c'était la macro du fichier précédent qui était appelée !:mouarf: