Як дозволити вводити в текстове поле лише цифри?
В Excel ми можемо застосувати функцію перевірки даних, щоб дозволити вводити в клітинки лише цифри, але, іноді, я хочу, щоб у текстове поле, а також у комірки, вводились лише числа. Як приймати лише цифри в текстовому полі в Excel?
Розділіть діапазон комірок на число за допомогою функції Спеціальна вставка
Розділіть діапазон комірок на число за допомогою функції Спеціальна вставка
Наступний код VBA може допомогти вам ввести цифри, крапку (.) Та від’ємний знак лише в текстове поле, будь ласка, зробіть так:
1. Створіть текстове поле, клацнувши Розробник > Insert > Текстове поле (керування ActiveX), а потім намалюйте текстове поле, як вам потрібно, див. знімок екрана:
2. Потім клацніть правою кнопкою миші текстове поле та виберіть Переглянути код з контекстного меню, щоб відкрити Microsoft Visual Basic для додатків вікно, а потім замініть оригінальний код таким кодом VBA у порожній модуль:
Код VBA: Дозволити введення в текстове поле лише цифр:
Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If KeyAscii > Asc("9") Or KeyAscii < Asc("0") Then
If KeyAscii = Asc("-") Then
If InStr(1, Me.TextBox1.Text, "-") > 0 Or _
Me.TextBox1.SelStart > 0 Then KeyAscii = 0
ElseIf KeyAscii = Asc(".") Then
If InStr(1, Me.TextBox1.Text, ".") > 0 Then KeyAscii = 0
Else
KeyAscii = 0
End If
End If
End Sub
3. Потім збережіть і закрийте вікно коду та вийдіть з Режим дизайну, тепер у текстове поле можна вводити лише цифри, символ крапки та від’ємний знак, див. знімок екрана:
Статті по темі:
Як застосувати перевірку правопису в текстовому полі?
Як змінити колір текстового поля на основі значення в Excel?
Як вставити малюнок у текстове поле?
Як встановити значення за замовчуванням у текстовому полі?
Найкращі інструменти продуктивності офісу
Покращуйте свої навички Excel за допомогою Kutools для Excel і відчуйте ефективність, як ніколи раніше. Kutools для Excel пропонує понад 300 додаткових функцій для підвищення продуктивності та економії часу. Натисніть тут, щоб отримати функцію, яка вам найбільше потрібна...
Вкладка Office Передає інтерфейс із вкладками в Office і значно полегшує вашу роботу
- Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
- Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
- Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!