Sub HelloWorld(control As IRibbonControl)
    MsgBox "Hello World!"
End Sub

Sub GoodbyeWorld(control As IRibbonControl)
    ThisWorkbook.Close
End Sub