วิธีตรวจสอบว่าปีหนึ่งเป็นปีอธิกสุรทินใน Excel หรือไม่?
คุณรู้วิธีพิจารณาว่าปีหนึ่งเป็นปีอธิกสุรทินหรือไม่? ใน Excel ไม่มีวิธีการโดยตรงสำหรับคุณในการตรวจสอบ แต่คุณสามารถสร้างฟังก์ชันหรือสูตรที่กำหนดโดยผู้ใช้เพื่อแก้ปัญหานี้ได้
ตรวจสอบว่าปีหนึ่งเป็นปีอธิกสุรทินด้วยสูตรหรือไม่
ตรวจสอบว่าปีใดปีหนึ่งเป็นปีอธิกสุรทินด้วย User Defined Function
ตรวจสอบว่าปีหนึ่งเป็นปีอธิกสุรทินด้วยสูตรหรือไม่
สมมติว่าคุณมีรายการปีในแผ่นงานสูตรยาว ๆ ต่อไปนี้จะช่วยให้คุณพิจารณาได้ว่าปีหนึ่ง ๆ เป็นปีอธิกสุรทินหรือไม่ กรุณาทำตามนี้:
1. นอกเหนือจากเซลล์ปีในเซลล์ว่างให้ป้อนสูตรนี้:
= IF (OR (MOD (A2,400) = 0, AND (MOD (A2,4) = 0, MOD (A2,100) <> 0)), "Leap Year", "NOT a Leap Year"), (A2 มีปีที่คุณต้องการใช้สูตรนี้คุณสามารถเปลี่ยนได้ตามต้องการ) ดูภาพหน้าจอ:
2. จากนั้นลากจุดจับเติมไปยังช่วงที่คุณต้องการมีสูตรนี้และมีการตรวจสอบปีทั้งหมดว่าเป็นปีอธิกสุรทินหรือไม่
หมายเหตุ: ถ้าเซลล์สัมพัทธ์ว่างเปล่าสูตรนี้จะแสดง Leap Year ด้วย
ตรวจสอบว่าปีใดปีหนึ่งเป็นปีอธิกสุรทินด้วย User Defined Function
นอกจากนี้คุณยังสามารถสร้าง User Defined Function เพื่อตรวจสอบว่าปีนั้นเป็นปีอธิกสุรทินหรือไม่คุณสามารถดำเนินการดังต่อไปนี้:
1. กด ALT + F11 และจะเปิดไฟล์ หน้าต่าง Microsoft Visual Basic for Applications.
2. คลิก สิ่งที่ใส่เข้าไป > โมดูลและวางรหัสต่อไปนี้ในไฟล์ หน้าต่างโมดูล.
รหัส VBA: ตรวจสอบว่าปีหนึ่งเป็นปีอธิกสุรทินหรือไม่
Function IsLeapYear(pYear As Integer) As Boolean
'Update 20140623
If (pYear Mod 4) = 0 And (pYear Mod 100) <> 0 Or ((pYear Mod 400) = 0) Then
IsLeapYear = True
Else
IsLeapYear = False
End If
End Function
3. จากนั้นบันทึกและปิดรหัสนี้กลับไปที่แผ่นงานของคุณแล้วป้อนสูตรนี้: = isleapyear (A2) ดูภาพหน้าจอ:
4. จากนั้นลากจุดจับเติมไปยังเซลล์ที่คุณต้องการให้มีสูตรนี้และทุกปีถูกเลือก FALSE ไม่ใช่ปีอธิกสุรทินและ TRUE บ่งบอกถึงปีอธิกสุรทิน ดูภาพหน้าจอ:
บทความที่เกี่ยวข้อง:
ค้นหาตัวส่วนร่วมต่ำสุดหรือตัวประกอบร่วมที่ยิ่งใหญ่ที่สุดใน Excel
สุดยอดเครื่องมือเพิ่มผลผลิตในสำนักงาน
เพิ่มพูนทักษะ Excel ของคุณด้วย Kutools สำหรับ Excel และสัมผัสประสิทธิภาพอย่างที่ไม่เคยมีมาก่อน Kutools สำหรับ Excel เสนอคุณสมบัติขั้นสูงมากกว่า 300 รายการเพื่อเพิ่มประสิทธิภาพและประหยัดเวลา คลิกที่นี่เพื่อรับคุณสมบัติที่คุณต้องการมากที่สุด...
แท็บ Office นำอินเทอร์เฟซแบบแท็บมาที่ Office และทำให้งานของคุณง่ายขึ้นมาก
- เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
- เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
- เพิ่มประสิทธิภาพการทำงานของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!