Refedit Tool - Keypress Event broken?

[sodonikus]

Hi,

i am trying to code a event to prevent certain keystrokes in a refedit window in my form.
However it does not work for my refedit (but it does for my textbox) and i do not know why.

Private Sub RefEdit1_KeyPress(KeyAscii As Integer)
Select Case KeyAscii
Case 48 To 57
Case 44
If InStr(1, RefEdit1.Text, ",") > 0 Then KeyAscii = 0
Case Else
KeyAscii = 0
End Select
End Sub

Here is a sample of the code i use with Excel 2010. Maybe you know why it does not work or if there is another way
to solve my problem. As i said the exact same code works perfect for textboxes which are used with the parameters:

textbox1_Keypress(Byval Keyascii as MSForms.ReturnInteger)

Best Regards from germany

Sodonikus

 

[Dryver14]

not sure if this helps any?

The RefEdit Control by default is not available on the Control Toolbox. To locate and add this Control to the Toolbox, right click over any Control on the Toolbox, select Additional Controls and scroll down until you see the Control RefEdit.Ctrl. Simply check the box and click OK. Unfortunately, there is no documentation in the Excel Help for this Control.

 

[sodonikus]

No sorry, this is not problem. I added the refedit to the toolbox before, otherwise i could have added it to the form itself. The problem is that refedit supports a event
called "KeyPress" which can be chosen in the code editor (drop down menu in the upper right corner). However it does not work, the event is not triggered if you type a key in the box, but i do not know the reason, since it works for textboxes.