Содржина
Ако барате некои од најлесните начини за користење на функцијата VBA IsNumeric , тогаш сте на вистинското место. Генерално ја користиме оваа функција во VBA за да тестираме дали изразот е број или не и во зависност од изразот ќе се врати ТОЧНО ако изразот е број во спротивно FALSE .
Преземете работна книга
VBA IsNumeric Function.xlsm
VBA IsNumeric Function: Синтакса & засилувач; Аргументи
⦿ Синтакса
IsNumeric (Expression)
⦿ Аргументи
Аргумент | Задолжителен/Изборен | Објаснување |
---|---|---|
Израз | Задолжителен | Тоа е варијанта што треба да се провери дали е број или не. |
⦿ Повратна вредност
Влез | Повратна вредност |
---|---|
Број | ТОЧНО |
Не Број; Низа | НЕТОЧНО |
⦿ Верзија
На ISNUMERIC функцијата беше воведена во Excel 2000 верзијата и е достапна за сите верзии потоа.
9 Примери за користење на VBA IsNumeric функција
Во овој напис, ќе се обидеме да ја прикажеме употребата на VBA IsNumeric со некои случајни примери заедно со некои примери вклучувајќи ја следната табела.
Имаме користена Microsoft Excel 365 верзија овде, можете да користите која било другаАко имате какви било предлози или прашања, слободно споделете ги во делот за коментари.
верзии според вашата погодност.1. Проверка на VBA е нумеричка со некои случајни вредности
Овде, ќе тестираме некои случајни низи со VBA ISNUMERIC , ако вредностите се нумерички или не.
Чекор-01 :
➤ Одете во Програмер Таб >> Visual Basic Опција.
Потоа, Visual Basic Editor ќе се отвори.
➤ Одете на Вметнете Tab >> Модул Опција.
Потоа, ќе се креира Модул .
Чекор-02 :
➤ Напишете ја следнава шифра
1255
Тука, објавивме x како варијанта и ќе ја зачува влезната вредност. Потоа ISNUMERIC ќе се врати TRUE ако влезната вредност е нумеричка во спротивно ќе се врати FALSE . Излезот ќе го најдеме во полето за пораки ( MsgBox ).
➤ Притиснете F5 .
Потоа ќе го добиете следното поле за внесување и ако ја напишете вредноста 100 и притиснете OK ,
ќе добиете поле за пораки што вели „Точно“ .
За пишување на низата Cat и притискање на OK во полето за внесување,
Добиваме поле за пораки што вели „Неточно“ .
Прочитајте повеќе: Како да се користи функцијата за рандомизирање на VBA во Excel (5 примери)
2. Користење на VBA Is Numeric со изјава IF-THEN-ALSE
Во овој дел, ќе ја користиме функцијата ISNUMERIC со IF-THEN-ELSE изјава во VBA код за дефинирање на нумеричките и ненумеричките вредности.
Чекори :
➤ Следете го Чекор-01 од делот 1 .
➤ Запишете го следниов код
5550
Овде, објавивме x како варијанта и ќе ја зачува влезната вредност. Кога ISNUMERIC ќе се врати TRUE , IF ќе врати порака која вели „Дадената вредност е нумеричка“ и ако ISNUMERIC враќа FALSE , потоа IF враќа порака со објаснување „Дадената вредност не е нумеричка“ .
➤ Притиснете F5 .
Потоа ќе го добиете следното поле за внесување и ако ја напишете вредноста 200 и притиснете OK ,
ќе добиете поле за порака што вели „Дадената вредност е нумеричка“ .
За пишување на низата Cat и притискање на OK во полето за внесување,
Добиваме поле за пораки што вели „Дадената вредност не е нумеричка“ .
Прочитајте повеќе: VBA If – Then – Else изјава во Excel (4 Примери)
3. Создавање спротивен резултат со функцијата IsNumeric
Тука, ќе создадеме VBA код кој ќе ни го даде обратниот резултат од функцијата ИСНУМЕРИЧНА , што значи за нумерички вредности ќе добиеме FALSE , а за ненумеричка вредност es, ќе се врати TRUE .
Чекори :
➤ Следете го Чекор-01 од делот 1 .
➤Запишете ја следнава шифра
6403
Овде, го деклариравме x како варијанта и ќе ја зачува влезната вредност. Кога ISNUMERIC ќе се врати TRUE , IF ќе врати порака која вели „FALSE“ и ако ISNUMERIC врати FALSE , а потоа IF враќа порака со објаснување „TRUE“ .
➤ Притиснете F5 .
Тогаш ќе го добиете следното поле за внесување и ако ја напишете вредноста 25 и притиснете OK ,
ќе добиете поле за порака што вели „FALSE“ .
За пишување на низата Алјаска и притискање на OK во полето за внесување,
Добиваме поле за пораки што вели „ВИСТИНА“ .
Поврзани содржини: Функција за формат VBA во Excel (8 употреби со примери)
4. Проверете дали Blanks е Нумерички или не
Можете лесно да проверите со VBA код дали празнините се нумерички или не.
Чекори :
➤ Следете го Чекор-01 од Дел 1 .
➤ Запишете го следниов код
4689
Овде, објавивме x како варијанта и ќе го зачува Празно . Потоа ISNUMERIC ќе се врати TRUE ако Празното е нумеричко, во спротивно ќе се врати FALSE .
➤ Притиснете F5 .
Потоа, ќе добиете поле со порака што вели „Неточно“ што значи празнините не се нумерички .
Прочитај повеќе: ExcelФормула за генерирање случаен број (5 примери)
5. Проверка дали датумите се нумерички или не
Во овој дел, ќе користиме случаен датум и ќе провериме дали датумот е нумерички или не.
Чекори :
➤ Следете го Чекор-01 од делот 1 .
➤ Запишете ја следнава шифра
6360
Овде, го деклариравме x како варијанта и тој ќе зачува датум. Потоа ISNUMERIC ќе се врати TRUE ако датумот е нумерички во спротивно ќе се врати FALSE .
➤ Притиснете F5 .
Потоа, ќе добиете поле за пораки што вели „Неточно“ што значи датумите не се нумерички .
Можеме да се обидеме и со функцијата DATESERIAL да креираме датуми и да провериме дали е нумеричка или не.
➤ Внесете го следниот код
7265
Овде, го деклариравме x како варијанта и ќе складира датум создаден од функцијата DATESERIAL . Потоа ISNUMERIC ќе се врати TRUE ако датумот е нумерички во спротивно ќе се врати FALSE .
➤ Притиснете F5 .
За возврат, ќе добиете поле со порака што вели „Неточно“ исто така овој пат.
Прочитајте повеќе: Функција за датум на VBA (12 употреби на макроа со примери)
Слични читања:
- Како да се користи функцијата MsgBox во Excel VBA (целосно упатство)
- Користете ја функцијата VBA Environ (4 примери)
- Како да користите VBAИ функција во Excel (4 примери)
- Користете изјава за случај на VBA (13 примери)
- Како да ја користите функцијата за евиденција во Excel VBA (5 Соодветни примери)
6. Проверка дали времето е нумеричко или не
Во овој дел, ќе провериме дали времињата се нумерички или не со користење на ISNUMERIC функција .
Чекори :
➤ Следете го Чекор-01 од делот 1 .
➤ Запишете ја следнава шифра
3777
Овде, го деклариравме x како варијанта и тој ќе складира време. Потоа ISNUMERIC ќе се врати TRUE ако времето е нумеричко во спротивно ќе се врати FALSE .
➤ Притиснете F5 .
Потоа, ќе добиете поле за пораки што вели „Неточно“ што значи времето не е нумеричко .
Можете да се обидете и со функцијата TIMESERIAL да креирате датуми и да проверите дали е нумеричка или не.
➤ Внесете го следниов код
3676
Овде, го деклариравме x како варијанта и ќе складира време создадено од функцијата TIMESERIAL . Потоа ISNUMERIC ќе се врати TRUE ако времето е нумеричко во спротивно ќе се врати FALSE .
➤ Притиснете F5 .
Потоа, ќе добиете поле за порака што вели „Неточно“ исто така овој пат.
Повторно, можеме да се обидеме да упатиме на временска вредност во ќелија од лист.
➤ Внесете ја следнава шифра
5729
Овде, ние објавивме x како варијанта и ќе складира време кое е во ќелијата B2 . Потоа ISNUMERIC ќе се врати TRUE ако времето е нумеричко во спротивно ќе се врати FALSE .
➤ Притиснете F5 .
Конечно, ќе добиете поле за порака што вели „Вистина“ овој пат.
Прочитајте повеќе: Како да користите VBA TimeSerial во Excel (3 примери)
7. Користење на VBA IsNumeric за опсег на вредности
Тука , ќе провериме дали вредностите на колоната Ознаки/Оценки се нумерички или ненумерички и ги имаат резултатите во колоната Проверете .
Чекори :
➤ Следете го Чекор-01 од делот 1 .
➤ Запишете го следниот код
9544
Ја деклариравме ќелијата како Опсег и користевме јамка FOR за ќелиите од опсегот „D5:D11“ и за овие ќелии, ISNUMERIC ќе се врати TRUE ако вредноста е нумеричка, во спротивно ќе се врати FALSE и cell.Offset(0, 1) ќе ги врати излезните вредности во една колона подоцна во влезната колона.
➤ Притиснете F5 .
По т капа, ќе имаме TRUE за нумеричките вредности или ознаки и FALSE за ненумерички вредности или Оценки .
Прочитај повеќе: Како да се користи VBA Val функцијата во Excel (7 примери)
8. Креирање функција за Тестирајте опсег на вредности
Во овој дел, ќе создадеме aфункција со VBA ISNUMERIC и проверете дали вредностите на колоната Marks/Grades се нумерички или ненумерички.
Чекор-01 :
➤ Следете го Чекор-01 од делот 1 .
➤ Запишете и зачувајте го следново код
3717
Овој код ќе создаде функција со име IsNumericTest .
Чекор-02 :
➤ Вратете се на главниот лист и напишете ја следнава формула во ќелијата E5
=IsNumericTest(D5)
D5 е оценки/оценки на студент и IsNumericTest ќе се врати ТОЧНО/НЕТОЧНО во зависност од вредноста.
➤ Притиснете ENTER и повлечете ја надолу алатката Рачка за пополнување .
Конечно, ќе имаме ТОЧНО за нумеричките вредности или Ознаките и НЕТОЧНО за ненумеричките вредности или Оценките .
Поврзани содржини: Како да се користи VBA DIR функцијата во Excel (7 примери)
9. Броење ненумерички вредности со VBA IsNumeric функција
Сакаме да го броиме не-бројот ic вредности или оценки на колоната Marks/Grades и за да го направиме ова овде ќе ја користиме VBA ISNUMERIC и ќе го имаме вкупниот број на ненумеричките вредности што ги имаме во Наброј колона.
Чекор-01 :
➤ Следете го Чекор-01 од Дел 1 .
➤ Запишете го и зачувајте го следниот код
7991
Овој код ќе создаде функција со име countnnnumeric .
Когавредноста на ќелијата нема да биде нумеричка вредност, тогаш бројот ќе се зголеми за 1 .
Чекор- 02 :
➤ Вратете се на главниот лист и напишете ја следната формула
=countnonnumeric(D5:D11)
D5:D11 е опсегот на Оценки/оценки на учениците и броен ненумерички ќе го врати вкупниот број на ненумерички оценки.
➤ Притиснете ENTER
Конечно, ќе ја добиете вредноста 3 што значи дека имате 3 Оценки во Ознаки/Оценки колона.
Прочитајте повеќе: Како да вратите вредност во VBA функцијата (и низа и Вредности без низа)
IsNumeric vs ISNUMBER
- ISNUMERIC проверува дали вредноста може да се претвори во број и ISNUMBER проверува дали вредноста е зачувана како број.
- Има некои разлики помеѓу функцијата VBA ISNUMERIC и Excel ISNUMBER функцијата и се обидовме да ги прикажеме разликите подолу со користење на нашата претходно креирана IsNumericTest забава акција и вградената функција Excel ISNUMBER .
Дел за вежбање
За вежбање сами имаме обезбеди дел Вежбање како подолу во листот со име Вежба . Ве молиме направете го тоа сами.
Заклучок
Во оваа статија се обидовме да покриеме некои од начините за користење на VBA ISNUMERIC функција. Се надевам дека ќе ви биде корисно.