ฟังก์ชัน Excel VBA Round
ฟังก์ชัน Round ใน VBAเป็นฟังก์ชันทางคณิตศาสตร์ซึ่งตามชื่อที่แนะนำให้ปัดเศษขึ้นหรือปัดเศษตัวเลขที่กำหนดให้เป็นชุดตำแหน่งทศนิยมที่ระบุโดยผู้ใช้ฟังก์ชันนี้ใช้ตรรกะของรอบแม้ว่าจะใช้เวลา 5 เป็น การอ้างอิงและตัวเลขใด ๆ ที่มีหลักสุดท้ายหลังทศนิยมต่ำกว่า 5 จากนั้นจะปัดเศษลงและในทางกลับกัน
คุณสามารถปัดเศษตัวเลขเป็นทศนิยมสองหลักทศนิยมสามหลักหรือไม่ใช้ทศนิยมเลยก็ได้ ตัวอย่างเช่นหากคุณมีหมายเลข 5.8697 หากคุณปัดเศษเป็นทศนิยมสองหลักมันจะเป็น 5.87 ถ้าคุณปัดเศษเป็นสามหลักมันจะปัดเศษเป็น 5.870 หากคุณต้องการปัดเศษเป็นศูนย์มันจะเป็น 6-
ในหมายเลขธนาคารตำแหน่งทศนิยมทั้งหมดที่น้อยกว่า 0.5 จะถูกปัดเศษลงเป็นค่าจำนวนเต็มก่อนหน้าและตำแหน่งทศนิยมทั้งหมดที่มากกว่าหรือเท่ากับ 0.5 จะถูกปัดเศษขึ้นเป็นค่าจำนวนเต็มถัดไป
ฉันหวังว่าคุณจะใช้ฟังก์ชัน ROUND ในแผ่นงาน ใน VBA เราสามารถใช้ฟังก์ชันนี้ได้เช่นกัน แต่เรามีความแตกต่างกับฟังก์ชันเหล่านี้ เราจะเห็นความแตกต่างระหว่างสองฟังก์ชันนี้ในบทความนี้
ไวยากรณ์
ดูไวยากรณ์ของฟังก์ชัน Round
Number:นี่คือตัวเลขที่เราพยายามปัดเศษ
[Number of Digits after Decimal]:จำนวนหลักที่คุณต้องการหลังค่าทศนิยม
ตัวอย่าง
คุณสามารถดาวน์โหลดเทมเพลต Excel VBA Round Function ได้ที่นี่ - เทมเพลต Excel ของ VBA Round Functionสมมติว่าคุณมีหมายเลข 4.534 และคุณต้องการปัดเศษเป็นสองหลัก
ทำตามขั้นตอนด้านล่าง
ขั้นตอนที่ 1:ประกาศตัวแปรเป็นตัวแปร
รหัส:
Sub Round_Example1 () Dim K As Variant End Sub
ขั้นตอนที่ 2:สำหรับตัวแปรนี้“ k ” กำหนดค่าผ่านฟังก์ชัน ROUND
รหัส:
Sub Round_Example1 () Dim K As Variant K = Round (End Sub
ขั้นตอนที่ 3: Number คืออะไรนอกจากตัวเลขที่เราพยายามปัดเศษในกรณีนี้คือ4.534
รหัส:
Sub Round_Example1 () Dim K เป็นตัวแปร K = รอบ (4.534, End Sub
ขั้นตอนที่ 4:วิธีการหลายตัวเลขที่เราต้องรอบในกรณีนี้เราต้องรอบ2 หลัก
รหัส:
Sub Round_Example1 () Dim K เป็นตัวแปร K = Round (4.534, 2) End Sub
ขั้นตอนที่ 5:ตอนนี้แสดงค่าตัวแปร“ k” ในกล่องข้อความ VBA
รหัส:
Sub Round_Example1 () Dim K เป็นตัวแปร K = รอบ (4.534, 2) MsgBox K End Sub
เรียกใช้รหัสนี้และดูสิ่งที่เราได้รับ
เราได้ผลลัพธ์เป็น4.53เมื่อเราปัดเป็น 2 หลัก
ตอนนี้ผมจะเปลี่ยนตัวเลขจาก4,534 4,535 ดูสิ่งที่เกิดขึ้นตอนนี้
รหัส:
Sub Round_Example1 () Dim K เป็นตัวแปร K = รอบ (4.535, 2) MsgBox K End Sub
ตอนนี้รันโค้ดและดูว่าผลลัพธ์คืออะไร
เราได้ผลลัพธ์เป็น 4.54 ทศนิยมหนึ่งตำแหน่งสูงกว่าค่าก่อนหน้า 4.53 เนื่องจากในตัวอย่างนี้เราได้ระบุหมายเลขเป็น 4.535 ดังนั้นหลังจากที่หมายเลข 3 ถัดไปคือ 5 ดังนั้นจึงถูกปัดเศษเป็นหมายเลขถัดไปเพื่อให้ 3 กลายเป็น 4
ตอนนี้ฉันจะใส่หมายเลขเป็น2.452678และฉันจะพยายามปัดเศษเป็น 3 หลัก
รหัส:
Sub Round_Example2 () Dim K เป็นตัวแปร K = รอบ (2.452678, 3) MsgBox K End Sub
เรียกใช้รหัสนี้เพื่อดูผลลัพธ์
ผลที่ได้คือ2.453
2.45 2678 ที่นี่ตัวเลขหลังทศนิยมตำแหน่งที่ 2 คือ 2678 หลังจากเลข 2 ตัวเลขถัดไปคือ 6 ซึ่งมากกว่าหรือเท่ากับ 5 ดังนั้นจึงปัดเศษทศนิยมถัดไป
ตอนนี้ฉันจะใช้ตัวเลขเดียวกันเพื่อปัดเศษเป็นศูนย์และดูว่าเกิดอะไรขึ้น
รหัส:
Sub Round_Example3 () Dim K เป็นตัวแปร K = รอบ (2.452678, 0) MsgBox K End Sub
เรียกใช้รหัสและดูสิ่งที่เราได้รับ
เนื่องจากฉันใช้รอบเป็นศูนย์เราจึงได้ผลลัพธ์เป็น 2
สาเหตุที่เราได้ผลลัพธ์เป็น 2 เพราะที่นี่เลขทศนิยมคือ 4 ซึ่งน้อยกว่า 0.5 จึงถูกปัดเศษลง
ความแตกต่างระหว่างฟังก์ชัน Excel และ VBA ROUND
ส่วนใหญ่มีความแตกต่าง 2 ประการ
# 1 - ไวยากรณ์ของทั้งสองฟังก์ชัน:
หากคุณดูไวยากรณ์ของทั้งสองฟังก์ชันเรามีความแตกต่างที่นี่
ไวยากรณ์ของ Excel Round: Round (Number, Number of Digits After Decimal)
VBA Round Syntax: Round (Number, [Number of Digits After Decimal])
ใน excel ทั้งสองอาร์กิวเมนต์เป็นข้อบังคับ แต่ในอาร์กิวเมนต์ที่สองของ VBA เป็นทางเลือก
ใน VBA หากคุณเพิกเฉยต่ออาร์กิวเมนต์ที่สองจะใช้อาร์กิวเมนต์เริ่มต้นเป็นศูนย์ดังนั้นเราจะได้จำนวนเต็ม
# 2 - ผลลัพธ์:
ผลลัพธ์ที่ได้จากฟังก์ชันทั้งสองนี้แตกต่างกัน ด้านล่างนี้เป็นตัวอย่างบางส่วน