Discussion :

[AnozerOne]

Je suis un peu perdu avec le nouveau excel.
Où se trouve désormais la création de boutons pour excel 2007 ?

[SilkyRoad]

bonjour


Tu parles des boutons placés dans la feuille de calcul?

Dans l'onglet "Développeur"
Groupe "Contrôles"
Bouton "Insérer"

http://silkyroad.developpez.com/Exce...2007/#LIII-B-8




Ou des boutons dans les barres de menu?
Maintenant Office fonctionne sur le principe de ruban

http://silkyroad.developpez.com/Exce...xcel2007/#LIII

http://warin.developpez.com/access/ruban/
(Version Access)


Les boutons des anciens classeurs sont toujours accessibles depuis l'onglet complément

http://silkyroad.developpez.com/Exce...2007/#LIII-B-9


Il est toujours possible de créer des barres d'outils personnalisées par macro:

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
24
25
26
27
28
29
30
31
32
33
34
Private Sub Workbook_Open()
    Dim CmdBar As CommandBar
    Dim Bouton As CommandBarButton
 
    Set CmdBar = Application.CommandBars _
        .Add(Name:="MaBarrePerso", Position:=msoBarTop, _
        Temporary:=True)
 
    Set Bouton = CmdBar.Controls.Add(Type:=msoControlButton)
    With Bouton
        .FaceId = 133
        .OnAction = "Macro1"
    End With
 
    Set Bouton = CmdBar.Controls.Add(Type:=msoControlButton)
    With Bouton
        .FaceId = 134
        .OnAction = "Macro2"
    End With
 
    Set Bouton = CmdBar.Controls.Add(Type:=msoControlButton)
    With Bouton
         .FaceId = 135
        .OnAction = "Macro3"
    End With
 
    CmdBar.Visible = True
End Sub
 
 
Private Sub Workbook_BeforeClose(Cancel As Boolean)
    On Error Resume Next
    Application.CommandBars("MaBarrePerso").Delete
End Sub

michel

[AnozerOne]

c'est bien un bouton associé à une macro désolé je n'avais pas vu.
Merci pour les liens