disable pageup and pagedown

[Phyllis]

I can't find the answer to this. I want to turn off the pageup and pagedown
function only when a combobox has been clicked. My user gets confused and
hits pagedown before exiting the combobox and changes her desired choice from
the combobox.

Is there a way to disable it?

 

[john]

see if this does what you want.

Sub disablekeys()

With Application

.OnKey "{PGDN}", ""

.OnKey "{PGUP}", ""

End With

End Sub


Sub enablekeys()

With Application

.OnKey "{PGDN}"

.OnKey "{PGUP}"

End With

End Sub