Maybe draconian because it stops all double clicking, but:

Application.OnDoubleClick = "donothing"

Sub donothing()
' MsgBox "hi"
End Sub

To bring it back,
Application.OnDoubleClick = ""

KB wrote:

Ron thank you very much for your reply. I tried that before posting my
message here and its not working

KB

*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!

--

Dave Peterson