If button is clicked then....

Private Sub Command1_Click()
    
    Static blnClicked As Boolean

    Debug.Print "Clicked=" & blnClicked
    blnClicked = Not blnClicked

End Sub