Sub MenuCommand2_OnAction() With CommandBars.ActionControl If .State = msoButtonDown Then .State = msoButtonUp Else .State = msoButtonDown End If End WithEnd Sub