Barre outils qui ne fonctionne pas

Bonjour,
J'ai cette macro tous marche sauf ce que j'ai modifie c'est a dire la
fonction triersauf2 qui decoule d'une autre macro qui porte le meme nom
quelqu'un pourrait me dire ce qui cloche?
Sub CreateBO()
Dim Bo As CommandBar
On Error Resume Next
DeleteBO 'en cas de plantage d'Excel :-)

Set Bo = Application.CommandBars.Add(nomBO)
With Bo.Controls.Add(msoControlButton)
.Caption = "Nouvelle Fiche"
.FaceId = 191
.OnAction = "Nouveau"
End With
With Bo.Controls.Add(msoControlButton)
.Caption = "Imprimer"
.FaceId = 4
.OnAction = "Imprime"
End With
BeginGroup = True
With Bo.Controls.Add(msoControlButton)
.Caption = "Enregistrer"
.FaceId = 3
.OnAction = "Save"
End With
With Bo.Controls.Add(msoControlButton)
.Caption = "Trier les Onglets"
.FaceId = 654
.OnAction = "TrierSauf2"
End With
With Bo.Controls.Add(msoControlButton)
.Caption = "Fermer"
.FaceId = 840
.OnAction = "Fermer"
End With
Bo.Visible = True
End Sub

bonjour,

je ne comprends pas ce que tu entends par "la fonction triersauf2 qui
decoule d'une autre macro " ? Est-ce à dire que triersauf2 est une fonction
. que c'est une macro ? que c'est une macro qui lance une autre macro ?
Par ailleurs, je pense que ce que voulait dite Pounet95 c'est qu'il peut y
avoir risque de confusion entre 2 macros si elles portent le même nom. En
conséquence, je te conseille d'écrire dans le Onaction le nom complet de ta
procédure à savoir si dans le Module1 tu as une macro qui s'appelle toto et
que dans le Module2 tu as une macro qui s'appelle toto aussi, et que tu veux
déclencher le ONaction sur la macro toto du module1, il te faut écrire
Onaction="Module1.toto"

A+

Pounet95 avait soumis l'idée :
Re,
Essaie de changer le nom de la fonction que tu as mis dans un module
standard, non ?

Je ne comprend pas ce que tu veux dire par changer le nom de la
fonction :-[

Il faut que je cahnge le nom TrierSauf2 c'est bien cela car c'est la
commande qui ne fonctionne pas >:|
--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/

Bonjour,
J'ai cette macro tous marche sauf ce que j'ai modifie c'est a dire la
fonction triersauf2 qui decoule d'une autre macro qui porte le meme nom
quelqu'un pourrait me dire ce qui cloche?
Sub CreateBO()
Dim Bo As CommandBar
On Error Resume Next
DeleteBO 'en cas de plantage d'Excel :-)

Set Bo = Application.CommandBars.Add(nomBO)
With Bo.Controls.Add(msoControlButton)
.Caption = "Nouvelle Fiche"
.FaceId = 191
.OnAction = "Nouveau"
End With
With Bo.Controls.Add(msoControlButton)
.Caption = "Imprimer"
.FaceId = 4
.OnAction = "Imprime"
End With
BeginGroup = True
With Bo.Controls.Add(msoControlButton)
.Caption = "Enregistrer"
.FaceId = 3
.OnAction = "Save"
End With
With Bo.Controls.Add(msoControlButton)
.Caption = "Trier les Onglets"
.FaceId = 654
.OnAction = "TrierSauf2"
End With
With Bo.Controls.Add(msoControlButton)
.Caption = "Fermer"
.FaceId = 840
.OnAction = "Fermer"
End With
Bo.Visible = True
End Sub

--
enlever lesurcitaire
La Vie n'est rien sans la joie de vivre

bonjour,

je ne comprends pas ce que tu entends par "la fonction triersauf2 qui
decoule d'une autre macro " ? Est-ce à dire que triersauf2 est une
fonction .
que c'est une macro ? que c'est une macro qui lance une autre macro ?
Par ailleurs, je pense que ce que voulait dite Pounet95 c'est qu'il peut y
avoir risque de confusion entre 2 macros si elles portent le même nom. En
conséquence, je te conseille d'écrire dans le Onaction le nom complet de
ta
procédure à savoir si dans le Module1 tu as une macro qui s'appelle toto
et
que dans le Module2 tu as une macro qui s'appelle toto aussi, et que tu
veux
déclencher le ONaction sur la macro toto du module1, il te faut écrire
Onaction="Module1.toto"

A+

Pounet95 avait soumis l'idée :
Re,
Essaie de changer le nom de la fonction que tu as mis dans un module
standard, non ?

Je ne comprend pas ce que tu veux dire par changer le nom de la
fonction :-[

Il faut que je cahnge le nom TrierSauf2 c'est bien cela car c'est la
commande qui ne fonctionne pas >:|
--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/

Bonjour,
J'ai cette macro tous marche sauf ce que j'ai modifie c'est a dire la
fonction triersauf2 qui decoule d'une autre macro qui porte le meme nom
quelqu'un pourrait me dire ce qui cloche?
Sub CreateBO()
Dim Bo As CommandBar
On Error Resume Next
DeleteBO 'en cas de plantage d'Excel :-)

Set Bo = Application.CommandBars.Add(nomBO)
With Bo.Controls.Add(msoControlButton)
.Caption = "Nouvelle Fiche"
.FaceId = 191
.OnAction = "Nouveau"
End With
With Bo.Controls.Add(msoControlButton)
.Caption = "Imprimer"
.FaceId = 4
.OnAction = "Imprime"
End With
BeginGroup = True
With Bo.Controls.Add(msoControlButton)
.Caption = "Enregistrer"
.FaceId = 3
.OnAction = "Save"
End With
With Bo.Controls.Add(msoControlButton)
.Caption = "Trier les Onglets"
.FaceId = 654
.OnAction = "TrierSauf2"
End With
With Bo.Controls.Add(msoControlButton)
.Caption = "Fermer"
.FaceId = 840
.OnAction = "Fermer"
End With
Bo.Visible = True
End Sub

--
enlever lesurcitaire
La Vie n'est rien sans la joie de vivre