Catch The Click Event On "Increase Indent" Command Bar Button

I want to catch the click event on "Increase Indent" commandbar button.

I have this reference- http://msdn.microsoft.com/en-us/libr...ffice.10).aspx

But not able to execute properly:

Till now I have generated below

Class Module "clsCBEvents"


Public WithEvents colCBars As Office.CommandBars
Public WithEvents cmdDecreseEndent As Office.CommandBarButton

Private Sub cmdDecreseEndent_Click(ByVal Ctrl As Office.CommandBarButton, CancelDefault As Boolean)

MsgBox "Hi"

End Sub.............