วิธีตรวจสอบว่าหมายเลขนั้นเป็นจำนวนเฉพาะใน Excel หรือไม่?

อย่างที่เราทราบกันดีว่าจำนวนเฉพาะคือจำนวนธรรมชาติซึ่งมีตัวหารจำนวนธรรมชาติที่แตกต่างกันเพียงสองตัวเท่านั้น: หนึ่งและตัวมันเอง หากคุณมีรายการตัวเลขในแผ่นงานคุณจะตรวจสอบได้อย่างไรว่าตัวเลขนั้นเป็นจำนวนเฉพาะ

ตรวจสอบว่าตัวเลขเป็นจำนวนเฉพาะด้วยสูตรอาร์เรย์หรือไม่

ตรวจสอบว่าตัวเลขเป็นจำนวนเฉพาะหรือไม่ด้วย User Defined Function

ตรวจสอบว่าตัวเลขเป็นจำนวนเฉพาะด้วยสูตรอาร์เรย์หรือไม่

สูตรต่อไปนี้สามารถช่วยคุณระบุจำนวนได้ว่าเป็นจำนวนเฉพาะหรือไม่โปรดทำตามนี้:

1. ป้อนสูตรต่อไปนี้ลงในเซลล์ว่างตัวอย่างเช่น C2 ข้างข้อมูลของคุณ:

=IF(A2=2,"Prime",IF(AND(MOD(A2,ROW(INDIRECT("2:"&ROUNDUP(SQRT(A2),0))))<>0),"Prime","Not Prime")) (A2 คือเซลล์มีหมายเลขที่คุณต้องการตรวจสอบ) จากนั้นกด Ctrl + Shift + Enter คีย์เข้าด้วยกันและคุณจะได้ผลลัพธ์หากตัวเลขเป็นจำนวนเฉพาะก็จะแสดง "Prime" ในเซลล์ถ้าไม่ใช่ "Not Prime" จะปรากฏขึ้นดูภาพหน้าจอ:

2. จากนั้นเลือกเซลล์ C2 แล้วลากที่จับเติมลงไปที่เซลล์ที่คุณต้องการใช้สูตรนี้และตัวเลขทั้งหมดจะถูกระบุว่าเป็นจำนวนเฉพาะหรือไม่ ดูภาพหน้าจอ:

ปลดล็อก Excel Magic ด้วย Kutools AI

• การดำเนินการอย่างชาญฉลาด: ดำเนินการกับเซลล์ วิเคราะห์ข้อมูล และสร้างแผนภูมิ ทั้งหมดนี้ขับเคลื่อนด้วยคำสั่งง่ายๆ
• สูตรที่กำหนดเอง: สร้างสูตรที่ปรับแต่งโดยเฉพาะเพื่อปรับปรุงขั้นตอนการทำงานของคุณ
• การเข้ารหัส VBA: เขียนและใช้งานโค้ด VBA ได้อย่างง่ายดาย
• การตีความสูตร: เข้าใจสูตรที่ซับซ้อนได้อย่างง่ายดาย
• การแปลข้อความ: ทลายกำแพงด้านภาษาภายในสเปรดชีตของคุณ

ปรับปรุงความสามารถ Excel ของคุณด้วยเครื่องมือที่ขับเคลื่อนด้วย AI ดาวน์โหลดเดี๋ยวนี้ และสัมผัสประสิทธิภาพอย่างที่ไม่เคยมีมาก่อน!

ตรวจสอบว่าตัวเลขเป็นจำนวนเฉพาะหรือไม่ด้วย User Defined Function

ดังต่อไปนี้ ฟังก์ชันที่ผู้ใช้กำหนด นอกจากนี้ยังสามารถช่วยคุณตรวจสอบตัวเลขว่ามีค่าเฉพาะหรือไม่โปรดทำดังนี้:

1. กด ALT + F11 คีย์เพื่อเปิด Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง

2. คลิก สิ่งที่ใส่เข้าไป > โมดูลและวางรหัสต่อไปนี้ในไฟล์ หน้าต่างโมดูล.

รหัส VBA: ตรวจสอบว่าตัวเลขเป็นจำนวนเฉพาะหรือไม่:

Function CheckPrime(Numb As Single) As Boolean
'Updateby Extendoffice
    Dim X As Long
    If Numb < 2 Or (Numb <> 2 And Numb Mod 2 = 0) _
     Or Numb <> Int(Numb) Then Exit Function
    For X = 3 To Sqr(Numb) Step 2
        If Numb Mod X = 0 Then Exit Function
    Next
    CheckPrime = True
End Function

3. จากนั้นบันทึกและปิดรหัสนี้กลับไปที่แผ่นงานและป้อนสูตรนี้: = checkprime (A2) ลงในเซลล์ว่างข้างรายการหมายเลขของคุณจากนั้นลากที่จับเติมลงไปที่เซลล์ที่คุณต้องการให้มีสูตรนี้หากตัวเลขนั้นเป็นจำนวนเฉพาะก็จะแสดง TRUE หากไม่เป็นเช่นนั้นก็จะแสดง FALSE ดูภาพหน้าจอ: