Консультация № 170530
18.07.2009, 02:17
0.00 руб.
0 1 1
Доброго времени суток! Вопрос по VBA Exel.
На форме имеются поля TextBox в которые вводятся только числовые значения. Посоветуйте пожалуйста, как сделать так, чтобы было невозможно ввести в такое поле какую-нибудь букву или знак, а только цифры 0-9 и десятичную точку или запятую.

Обсуждение

Неизвестный
18.07.2009, 07:31
общий
это ответ
Здравствуйте, fomservl.
Для этого нужно обрабатывать событие KeyPress соответствующего текстового поля и следить какой символ пользователь хочет ввести:
Private Sub TextBox2_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
Select Case KeyAscii 'Какой символ вводит пользователь
Case 44, 46, 48 To 57 'запятая, точка или цифра
Case Else: KeyAscii = 0 'что-то другое
End Select
End Sub
5
Форма ответа