disable double click on commandbar

[dsgs]

Hi!

after some searchin on the board i found this code to disable the right click on the commandbar:

    Application.CommandBars("Tools").Controls("Customize...").Enabled = False
    Application.CommandBars("Toolbar List").Enabled = False

this works great! i can't right click anymore on the commandbar, however when i DOUBLE CLICK the commandbar i'm going straight to the "customize menu" tools can i disable this as well?

thanx!

 

[Ivan F Moala]

Application.OnDoubleClick = "Dummy"

Where Dummy is the name of your routine to run.

eg

Sub Dummy()
    '// NoGo
    MsgBox "Sorry command not Available!"
End Sub

Reset with

Application.OnDoubleClick = ""

 

[dsgs]

works great Ivan!!!