MS Spreadsheet Control9.0で変更をキャンセルするには

VB初心者 2004-07-11 18:23:23 No: 84521 IP: [192.*.*.*]

初めまして。
この度MS Spreadsheet10.0でプログラムを組んでいたのですが、
急遽MS Spreadsheet9.0に変更することになりました。
セルに数字以外を入れさせないようにしたいのですが、
10.0では以下のようにしておりました。

Private Sub Spreadsheet_BeforeKeyPress(ByVal KeyAscii As Long, ByVal Cancel As OWC10.ByRef)
    If KeyAscii < &H30 Or &H39 < KeyAscii Then
        Cancel.value = True
    End If
End Sub

しかしながら、9.0では似たようなイベントが存在しない？？
誰か分かる方いらっしゃいましたら御教授願えないでしょうか。
よろしくお願いいたします。

編集削除

VB初心者改め「レクサス」 2004-07-11 18:31:45 No: 84522 IP: [192.*.*.*]

VB初心者というHNの方が他にもいらっしゃったようですので
HN変更させてもらいます。
ご迷惑おかけします。

編集削除