Hi,

I'm a new joiner on VBA and I created now the button to clearing 5 dropdowns.
For example, I have a dropdown in which you can select 1,2,3,4,5. When I select all value and click Button "Clear". Values of dropdowns should be blank but the list should be maintained.
Is it possible to implement it?

My Code is below
----------------------------------------------------------------------------------------------------------------------------------------
Sub Prio1_getItemCount(control As IRibbonControl, ByRef ItemCount)
Dim WKSstamm As Worksheet
Dim LZ As Long
Dim Counter As Long
Set WKSstamm = tab_kriterium
LZ = WKSstamm.Cells(WKSstamm.Rows.Count, 1).End(xlUp).Row
ItemCount = IIf(LZ > 1, LZ - 1, 0)
End Sub

Sub Prio1_getItemLabel(control As IRibbonControl, index As Integer, ByRef Label)
Dim WKSstamm As Worksheet
Set WKSstamm = tab_kriterium
Label = WKSstamm.Cells(index + 2, 1).Value
End Sub

Sub Prio1_onAction(control As IRibbonControl, id As String, index As Integer)

Call Priorisierung(tab_kriterium.Cells(index + 2, 1).Value, 1)

End Sub

Sub Prio2_getItemCount(control As IRibbonControl, ByRef ItemCount)
Dim WKSstamm As Worksheet
Dim LZ As Long
Dim Counter As Long
Set WKSstamm = tab_kriterium
LZ = WKSstamm.Cells(WKSstamm.Rows.Count, 1).End(xlUp).Row
ItemCount = IIf(LZ > 1, LZ - 1, 0)
End Sub

Sub Prio2_getItemLabel(control As IRibbonControl, index As Integer, ByRef Label)
Dim WKSstamm As Worksheet
Set WKSstamm = tab_kriterium
Label = WKSstamm.Cells(index + 2, 1).Value
End Sub

Sub Prio2_onAction(control As IRibbonControl, id As String, index As Integer)

Call Priorisierung(tab_kriterium.Cells(index + 2, 1).Value, 2)

End Sub

Sub RibGondelKURZ_Clear_onAction(control As IRibbonControl)
Call PrioZurueck

End Sub
---------------------------------------------------------------------------------------------------------
XML

<group id="grpRibGondelKURZ_4" label="Priorisierung/Aufbau Planen">
<dropDown id="Prio1"
label="Prio1:"
getItemCount="Prio1_getItemCount"
getItemLabel="Prio1_getItemLabel"
onAction="Prio1_onAction"/>

<dropDown id="Prio2"
label="Prio2:"
getItemCount="Prio1_getItemCount"
getItemLabel="Prio1_getItemLabel"
onAction="Prio2_onAction"/>

<button id="b_RibGondelKURZ_Priozurueck"
label="Prio Zur?cksetzen"
size="large" imageMso="Undo"
onAction="RibGondelKURZ_Clear_onAction"/>