отаю над Excel с макросами. У меня есть пользовательская форма с текстовыми полями, некоторые из них используют функцию только для номеров прессы.

Private Sub quantity1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
    Select Case KeyAscii
        Case Asc("0") To Asc("9")
        Case Else
        KeyAscii = 0
    End Select
End Sub

Как я могу поместить регистр выбора в процедуру или функцию, а затем вызвать его из любого события нажатия клавиши, в котором оно мне нужно (в этом случае, количество 1, количество 2, цена 1 и цена 2, но нет у покупателя)? Я попытался создать подпрограмму, которая использует те же параметры, что и событие, например:

Sub Only_Numbers(ByVal KeyAscii As MSForms.ReturnInteger)