نحوه استفاده از VBA IsNumeric Function (9 مثال)

  • این را به اشتراک بگذارید
Hugh West

اگر به دنبال ساده ترین راه ها برای استفاده از عملکرد VBA IsNumeric هستید، در جای مناسبی هستید. ما معمولاً از این تابع در VBA برای آزمایش اینکه آیا یک عبارت عددی است یا نه استفاده می‌کنیم و بسته به عبارت، اگر عبارت یک عدد باشد در غیر این صورت FALSE< TRUE برمی‌گردد. 2>.

دانلود Workbook

VBA IsNumeric Function.xlsm

VBA IsNumeric Function: نحو & آرگومان ها

⦿ نحو

IsNumeric (Expression)

⦿ استدلال

استدلال ضروری/اختیاری توضیح
عبارت ضروری این یک نوع است که باید بررسی شود که آیا عدد است یا نه.

⦿ مقدار برگشتی

ورودی مقدار برگشتی
شماره TRUE
نه عدد؛ رشته FALSE

⦿ نسخه

تابع ISNUMERIC در Excel 2000 نسخه معرفی شد و پس از آن برای همه نسخه ها موجود است.

9 نمونه استفاده از VBA IsNumeric Function

در در این مقاله، ما سعی خواهیم کرد کاربردهای VBA IsNumeric را با چند مثال تصادفی به همراه چند مثال از جمله جدول زیر نشان دهیم.

ما داریم در اینجا از نسخه Microsoft Excel 365 استفاده شده است، می توانید از هر نسخه دیگری استفاده کنیداگر پیشنهاد یا سوالی دارید، در قسمت نظرات به اشتراک بگذارید.

نسخه ها مطابق با راحتی شما.

1. بررسی VBA IsNumeric با مقادیر تصادفی

در اینجا، ما تعدادی رشته تصادفی را با VBA ISNUMERIC آزمایش می کنیم ، اگر مقادیر عددی هستند یا نه.

Step-01 :

➤ به Developer Tab >><بروید 1>Visual Basic گزینه.

سپس، Visual Basic Editor باز می شود.

➤ به Tab >> Module گزینه را وارد کنید.

پس از آن، یک Module ایجاد خواهد شد.

Step-02 :

➤ کد زیر را بنویسید

1824

در اینجا، ما <1 را اعلام کرده ایم>x به عنوان یک Variant و مقدار ورودی را ذخیره می کند. سپس ISNUMERIC اگر مقدار ورودی عددی باشد TRUE را برمی‌گرداند در غیر این صورت FALSE را برمی‌گرداند. ما خروجی را در یک جعبه پیام ( MsgBox ) خواهیم یافت.

F5 را فشار دهید.

سپس کادر ورودی زیر را دریافت خواهید کرد و اگر مقدار 100 را بنویسید و OK را فشار دهید،

یک عدد دریافت خواهید کرد. کادر پیامی که می گوید "True" .

برای نوشتن رشته Cat و فشار دادن OK در کادر ورودی،

ما یک کادر پیام دریافت می کنیم که می گوید "نادرست" .

بیشتر بخوانید: نحوه استفاده از تابع تصادفی VBA در اکسل (5 مثال)

2. استفاده از VBA IsNumeric با عبارت IF-THEN-ELSE

در این بخش، ما از تابع ISNUMERIC با تابع استفاده خواهیم کردعبارت IF-THEN-ELSE در یک کد VBA برای تعریف مقادیر عددی و غیر عددی.

گام‌ها :

Step-01 بخش 1 را دنبال کنید.

➤ کد زیر را بنویسید

6861

در اینجا، ما را اعلام کرده ایم. x به عنوان یک Variant و مقدار ورودی را ذخیره می کند. وقتی ISNUMERIC TRUE را برمی‌گرداند، IF پیامی را برمی‌گرداند که "مقدار داده‌شده عددی است" و اگر ISNUMERIC FALSE را برمی گرداند، سپس IF پیامی را برمی گرداند که توضیح می دهد "مقدار داده شده عددی نیست" .

F5 را فشار دهید.

سپس کادر ورودی زیر را خواهید دید و اگر مقدار 200 را بنویسید و OK را فشار دهید،

یک کادر پیامی دریافت خواهید کرد که می گوید "مقدار داده شده عددی است" .

برای نوشتن رشته Cat و فشار دادن OK در کادر ورودی،

یک کادر پیام دریافت می کنیم که می گوید "مقدار داده شده عددی نیست" .

بیشتر بخوانید: VBA If – Then – Other Statement در اکسل (4 مثال)

3. ایجاد یک نتیجه مخالف با تابع IsNumeric

در اینجا، ما یک کد VBA ایجاد می کنیم که نتیجه معکوس را به ما می دهد. از تابع ISNUMERIC ، به این معنی که برای مقادیر عددی FALSE و برای مقادیر غیر عددی مقدار خواهیم داشت es، TRUE برمی گردد.

مراحل :

Step-01 بخش 1 را دنبال کنید .

➤کد زیر را بنویسید

5245

در اینجا، x را به عنوان Variant اعلام کرده ایم و مقدار ورودی را ذخیره می کند. وقتی ISNUMERIC TRUE را برمی‌گرداند، IF پیامی با مضمون "FALSE" و اگر ISNUMERIC برمی‌گرداند FALSE ، سپس IF پیامی در توضیح "TRUE" برمی‌گرداند.

F5 را فشار دهید .

سپس کادر ورودی زیر را دریافت خواهید کرد و اگر مقدار 25 را بنویسید و فشار دهید OK ،

یک کادر پیام دریافت خواهید کرد که می گوید "FALSE" .

برای نوشتن رشته آلاسکا و فشار دادن OK در کادر ورودی،

ما یک کادر پیام دریافت می‌کنیم که می‌گوید "درست" .

محتوای مرتبط: عملکرد فرمت VBA در اکسل (8 مورد استفاده با مثال)

4. بررسی اینکه آیا Blanks است عددی یا نه

می توانید به راحتی با یک کد VBA بررسی کنید که آیا جای خالی عددی است یا نه.

مراحل :

Step-01 بخش 1 را دنبال کنید.

➤ کد زیر را بنویسید

7281

در اینجا، x <را اعلام کرده ایم. 2>به عنوان یک Variant و Blank را ذخیره می کند. سپس ISNUMERIC برمی‌گردد TRUE اگر خالی عددی باشد در غیر این صورت FALSE برمی‌گردد.

F5 را فشار دهید.

بعد از آن، یک کادر پیام دریافت خواهید کرد که می گوید "False" که به این معنی است جاهای خالی عددی نیستند .

بیشتر بخوانید: اکسلفرمول تولید اعداد تصادفی (5 مثال)

5. بررسی اینکه آیا تاریخ ها عددی هستند یا نه

در این بخش، از یک تاریخ تصادفی استفاده می کنیم و بررسی می کنیم که آیا تاریخ عددی یا نه.

مراحل :

Step-01 بخش 1 را دنبال کنید.

➤ کد زیر را بنویسید

4161

در اینجا، x را به عنوان یک نوع اعلام کرده ایم و تاریخ را ذخیره می کند. سپس ISNUMERIC برمی‌گردد TRUE اگر تاریخ عددی باشد در غیر این صورت FALSE برمی‌گردد.

F5 را فشار دهید.

بعد از آن، یک کادر پیامی با مضمون "False" دریافت خواهید کرد که به معنی تاریخها عددی نیستند .

همچنین می‌توانیم با تابع DATESERIAL تاریخ ایجاد کنیم و بررسی کنیم که آیا عددی است یا نه.

➤ کد زیر را تایپ کنید

7408

در اینجا، x را به عنوان یک تغییر اعلام کرده ایم و تاریخ ایجاد شده توسط عملکرد DATESERIAL را ذخیره می کند. سپس ISNUMERIC برمی گردد TRUE اگر تاریخ عددی باشد در غیر این صورت FALSE برمی گردد.

F5 را فشار دهید.

در عوض، یک کادر پیامی دریافت خواهید کرد که می گوید "False" همچنین این بار.

بیشتر بخوانید: عملکرد تاریخ VBA (12 استفاده از ماکروها با مثال)

خواندنی مشابه:

  • نحوه استفاده از تابع MsgBox در Excel VBA (راهنمای کامل)
  • استفاده از تابع VBA Environ (4 مثال)
  • نحوه استفاده از VBAو تابع در اکسل (4 مثال)
  • استفاده از عبارت موردی VBA (13 مثال)
  • نحوه استفاده از Log Function در Excel VBA (5) نمونه های مناسب)

6. بررسی اینکه آیا زمان عددی است یا نه

در این بخش، با استفاده از <1 بررسی خواهیم کرد که آیا زمان ها عددی هستند یا نه>عملکرد ISNUMERIC .

مراحل :

Step-01 بخش 1 را دنبال کنید.

➤ کد زیر را بنویسید

1515

در اینجا، x را به عنوان یک Variant اعلام کرده‌ایم و زمانی را ذخیره می‌کند. سپس ISNUMERIC برمی گردد TRUE اگر زمان عددی باشد در غیر این صورت FALSE برمی گردد.

F5 را فشار دهید.

بعد از آن، یک کادر پیامی با مضمون "False" دریافت خواهید کرد که به معنی زمان ها عددی نیستند .

همچنین می توانید با عملکرد TIMESERIAL سعی کنید تاریخ ها را ایجاد کنید و بررسی کنید که آیا عددی است یا خیر.

➤ کد زیر را تایپ کنید

6203

در اینجا، x را به‌عنوان یک تغییر اعلام کرده‌ایم و زمان ایجاد شده توسط تابع TIMESERIAL را ذخیره می‌کند. سپس ISNUMERIC برمی گردد TRUE اگر زمان عددی باشد در غیر این صورت FALSE برمی گردد.

F5 را فشار دهید.

سپس، این بار یک کادر پیام با عنوان "False" دریافت خواهید کرد.

دوباره، می‌توانیم ارجاع به مقدار زمانی را در سلول یک صفحه امتحان کنیم.

➤ کد زیر را تایپ کنید

9070

در اینجا، ما اعلام کرده‌ایم. x به عنوان یک تغییر و زمانی را که در سلول B2 است ذخیره می کند. سپس ISNUMERIC برمی گردد TRUE اگر زمان عددی باشد در غیر این صورت FALSE برمی گردد.

F5 را فشار دهید.

در نهایت، این بار یک کادر پیامی خواهید دید که می گوید "درست" .

بیشتر بخوانید: نحوه استفاده از VBA TimeSerial در اکسل (3 مثال)

7. استفاده از VBA IsNumeric برای محدوده ای از مقادیر

در اینجا ، بررسی می کنیم که آیا مقادیر ستون Marks/Grades عددی است یا غیر عددی و نتایج در ستون Check وجود دارد.

<. 3>

مراحل :

Step-01 بخش 1 را دنبال کنید.

➤ یادداشت کنید کد زیر

5017

ما سلول را به عنوان Range اعلام کرده ایم و از یک حلقه FOR برای سلول های محدوده "D5:D11" و برای این سلول ها، ISNUMERIC اگر مقدار عددی باشد TRUE را برمی‌گرداند، در غیر این صورت FALSE و cell.Offset(0, 1)<22 را برمی‌گرداند> مقادیر خروجی را در یک ستون بعداً به ستون ورودی برمی گرداند.

F5 را فشار دهید.

بعد از آن تی برای مقادیر عددی TRUE یا برای مقادیر غیر عددی علامت و FALSE برای مقادیر غیر عددی یا Grades خواهیم داشت.

بیشتر بخوانید: نحوه استفاده از تابع VBA Val در اکسل (7 مثال)

8. ایجاد یک تابع برای محدوده ای از مقادیر را تست کنید

در این بخش، a را ایجاد می کنیمبا VBA ISNUMERIC عمل کنید و بررسی کنید که آیا مقادیر ستون Marks/Grades عددی هستند یا غیر عددی.

Step-01 :

Step-01 بخش 1 را دنبال کنید.

➤ موارد زیر را بنویسید و ذخیره کنید کد

1298

این کد تابعی به نام IsNumericTest ایجاد می کند.

Step-02 :

➤ به صفحه اصلی برگردید و فرمول زیر را در سلول E5

=IsNumericTest(D5)

تایپ کنید D5 نمرات/نمرات یک دانش آموز است و IsNumericTest بسته به مقدار TRUE/FALSE برمی گردد.

ENTER را فشار دهید و ابزار Fill Handle را به پایین بکشید.

در نهایت، ما خواهیم داشت درست برای مقادیر عددی یا علامت‌ها و FALSE برای مقادیر غیر عددی یا نمرات .

محتوای مرتبط: نحوه استفاده از تابع VBA DIR در اکسل (7 مثال)

9. شمارش مقادیر غیر عددی با تابع VBA IsNumeric

ما می خواهیم غیر عددی را بشماریم مقادیر ic یا نمرات ستون Marks/Grades و برای انجام این کار در اینجا از VBA ISNUMERIC استفاده می کنیم و تعداد کل مقادیر غیر عددی را در <1 داریم. ستون را شمارش کنید.

Step-01 :

Step-01 از را دنبال کنید بخش 1 .

➤ کد زیر را بنویسید و ذخیره کنید

8839

این کد تابعی به نام countnnumeric ایجاد می کند.

چه زمانیمقدار سلول یک مقدار عددی نخواهد بود سپس شمار با 1 افزایش می یابد.

مرحله- 02 :

➤ به صفحه اصلی برگردید و فرمول زیر را تایپ کنید

=countnonnumeric(D5:D11)

D5:D11 محدوده نمرات/نمرات دانش آموزان است و شماره غیر عددی تعداد کل نمرات غیر عددی را برمی گرداند.

ENTER را فشار دهید

در نهایت، مقدار 3 را دریافت خواهید کرد که به این معنی است که 3 نمرات در دارید. علامت‌ها/درجه‌ها ستون.

بیشتر بخوانید: چگونه یک مقدار را در عملکرد VBA برگردانیم (هم آرایه و هم مقادیر غیر آرایه)

IsNumeric در مقابل ISNUMBER

  • ISNUMERIC بررسی می کند که آیا یک مقدار می تواند به عدد تبدیل شود و ISNUMBER بررسی می کند که آیا یک مقدار به عنوان یک عدد ذخیره شده است یا خیر.
  • تفاوت هایی بین عملکرد VBA ISNUMERIC و اکسل تابع ISNUMBER وجود دارد و ما سعی کرده ایم تفاوت های زیر را با استفاده از سرگرمی IsNumericTest که قبلا ایجاد کردیم عمل و تابع اکسل داخلی ISNUMBER .

بخش تمرین

برای انجام تمرین توسط خودتان ما داریم یک بخش تمرین مانند زیر در برگه ای به نام تمرین ارائه شده است. لطفاً خودتان این کار را انجام دهید.

نتیجه‌گیری

در این مقاله سعی کردیم برخی از راه‌های استفاده از VBA ISNUMERIC <2 را بیان کنیم> عملکرد. امیدوارم برای شما مفید باشد.

هیو وست یک مربی و تحلیلگر اکسل بسیار با تجربه با بیش از 10 سال تجربه در این صنعت است. وی دارای مدرک لیسانس در رشته حسابداری و امور مالی و مدرک کارشناسی ارشد در رشته مدیریت بازرگانی است. هیو علاقه زیادی به تدریس دارد و یک رویکرد آموزشی منحصر به فرد ایجاد کرده است که به راحتی قابل پیگیری و درک است. دانش تخصصی او از اکسل به هزاران دانش آموز و متخصص در سراسر جهان کمک کرده تا مهارت های خود را بهبود بخشند و در حرفه خود برتری پیدا کنند. هیو از طریق وبلاگ خود دانش خود را با جهان به اشتراک می گذارد و آموزش های رایگان اکسل و آموزش آنلاین ارائه می دهد تا به افراد و مشاغل کمک کند تا به پتانسیل کامل خود دست یابند.