Recherche :

Il y a 71 utilisateurs connus et inconnus. Pour voir la liste des connectés connus, cliquez ici

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : Rajouter un onglet des la barre du menud'Excel

Backin

Profil : Jeune recrue

Bonjour,
j'ai fait une petite prog pour récupérer des données d'un export de progiciel dans Excel et pour les traiter.
Je voudrait pouvoir rajouter dans la barre des menus (Fichier, Edition, Afichage...) d'excel un onglet supplémentaire ouvrant ma userform àpartir de laquelle je lance ma petite appli. Je sais que c possible mais je ne sais pas comment ajoute ce menu (appelons-le Import d'Isamarge)

Merci pour vos réponse
A+
Sèb

---------------
Backin

Myta

Profil : Jeune recrue

Salut Backin

Voila une façon de faire

Code :

Private Sub Workbook_AddinInstall()
On Error Resume Next 'Just in case
'Delete any existing menu item that may have been left.
Application.CommandBars("Worksheet Menu Bar" ).Controls("Super Code" ).Delete
'Add the new menu item and Set a CommandBarButton Variable to it
Set cControl = Application.CommandBars("Worksheet Menu Bar" ).Controls.Add
'Work with the Variable
With cControl
.Caption = "Super Code"
.Style = msoButtonCaption
.OnAction = "MyGreatMacro"
'Macro stored in a Standard Module
End With
On Error GoTo 0
End Sub
Private Sub Workbook_AddinUninstall()
On Error Resume Next 'In case it has already gone.
Application.CommandBars("Worksheet Menu Bar" ).Controls("Super Code" ).Delete
On Error GoTo 0
End Sub

Mytå

FORUM

Programmation

VB - VBA

Rajouter un onglet des la barre du menud'Excel

Rajouter un onglet des la barre du menud'Excel

FORUM

Programmation

VB - VBA

Rajouter un onglet des la barre du menud'Excel