[VBA/Excel] ListBox in Add-In bar

[Verwijderd]

Ik vroeg mij af of er een manier bestaat om een ListBox, waarbij je meerdere waarden kan selecteren, in een Ribbon/Add-InToolbar kan krijgen in Excel. Ik weet dat dit mogelijk is voor Userforms, maar ik wil het in een toolbar krijgen

Onderstaande code geeft me jammer genoeg slechts een dropdown...

code:

Sub addSelectControls()
    Dim newBar As Office.CommandBar
    Set newBar = CommandBars.Add(Name:="testing CommandBar", temporary:=True)
    Dim newCombo As Office.CommandBarComboBox
    Set newCombo = newBar.Controls.Add(Type:=msoControlDropdown, temporary:=True)
    With newCombo

        .AddItem "Blocks"
        .AddItem "Hardware"
        .AddItem "Aircraft Hardware"
        .AddItem "Vehical Hardware"
        .AddItem "Machinery"
        .AddItem "Wood Products"
        .AddItem "Miscellaneous Products"
        .AddItem "Miscellaneous Metal"
        .AddItem "Precast Metal"
        .AddItem "Forged Metal"
        .AddItem "Structural Steel"
        .AddItem "Fabricated Steel"
        .AddItem "Prebent Steel"
        .AddItem "Stock Steel"
        .ListIndex = 13
        .Width = 200
        .Caption = "Category"
        .Style = msoComboLabel
        .BeginGroup = True
        .OnAction = "Category_Select"

    End With
    'ctlComboBoxHandler.SyncBox newCombo
    newBar.Visible = True
End Sub

Indien je een andere manier weet of een betere suggestie hebt: ook welkom!