bonjour 
j ai des macros complementaires qui normalement doivent créés des boutons dans l onglets complement par cette syntaxe
	
	
	
	
	
		
 est ce que quelqu un peut me dire ce qui cloche car cela fonctionnait sur 2003
merci d avance
	
		
			
		
		
	
				
			j ai des macros complementaires qui normalement doivent créés des boutons dans l onglets complement par cette syntaxe
		Code:
	
	
	Private Sub Workbook_Open()
Dim bouton As CommandBarButton
On Error Resume Next
Set bouton = Application.CommandBars("Standard").Controls("Fichier Uwin")
On Error GoTo 0
If Not bouton Is Nothing Then Exit Sub
With Application.CommandBars("Standard").Controls.Add(msoControlButton)
        .Caption = "Fichier Uwin"
        .OnAction = "USF_portable"
        .FaceId = 1062
        .TooltipText = "Ctrl+u"
        .Style = msoButtonIconAndCaption
        .BeginGroup = True
'Application.MacroOptions Macro:=.OnAction, HasShortcutKey:=True, ShortcutKey:="e"
End With
End Sub
	merci d avance