Office 2010 Button per Makro

Zwicke

Lieutenant
Registriert
Aug. 2006
Beiträge
526
Bisher lief das ganze so(Office 2003):

Code:
Set oldCtrl = CommandBars.FindControl(, ID:=CommandBars("Standard").Controls("PDF").ID)
    If oldCtrl Is Nothing Then
        Dim cmb As CommandBar
        Set cmb = Application.CommandBars("Standard")
        
        With cmb.Controls.Add(Type:=msoControlButton, Before:=cmb.Controls("Seiten&ansicht").Index, Temporary:=False)
           .Caption = "PDF"
           .BeginGroup = True
           .FaceId = 59
           .Style = msoButtonCaption
           .OnAction = "PDF"
           .TooltipText = "PDF erzeugen..."
           
        End With

        
       
    Else
        If (oldCtrl.Caption = "PDF") Then
            oldCtrl.OnAction = "PDF"
            oldCtrl.TooltipText = "PDF erzeugen..."
        End If
    End If

In 2010 macht er mir aber einen neuen Reiter auf (Add-Ins). Ich würde den Button aber gerne unter Start haben.

Leider konnte mir Doktor Google nicht weiterhelfen.

mfg
Zwicke
 
hi,

also ich glaub das geht nur so, dass die makros usw. im reiter add-ins angezeigt werden. habs auch nicht anders hingekriegt.
 
Zurück
Oben