Discussion :

[nicolav]

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 ?
merci beaucoup

[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 ?

[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...

[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

[nicolav]

voici mon code pour inserer un bouton:

Code :

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

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

[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