Vba: วิธีค้นหาค่าต่ำสุดในช่วง

คุณสามารถใช้ไวยากรณ์พื้นฐานต่อไปนี้เพื่อคำนวณค่าต่ำสุดในช่วงโดยใช้ VBA:

 SubMinValue ()
    Range(" D2 ") = WorksheetFunction.Min(Range(" B2:B11 "))
End Sub

ตัวอย่างนี้จะคำนวณค่าต่ำสุดในช่วง B2:B11 และกำหนดผลลัพธ์ให้กับเซลล์ D2

ถ้าคุณต้องการแสดงค่าต่ำสุดในกล่องข้อความแทน คุณสามารถใช้ไวยากรณ์ต่อไปนี้:

 SubMinValue ()
    'Create variable to store min value
    Dim minValue As Single
    
    'Calculate min value in range
    minValue = WorksheetFunction.Min(Range(" B2:B11 "))
    
    'Display the result
    MsgBox " Min Value in Range: " & minValue 
End Sub

ตัวอย่างต่อไปนี้แสดงวิธีการใช้แต่ละวิธีในทางปฏิบัติกับชุดข้อมูลต่อไปนี้ใน Excel ที่มีข้อมูลเกี่ยวกับผู้เล่นบาสเกตบอลต่างๆ:

ที่เกี่ยวข้อง: วิธีค้นหาค่าสูงสุดในช่วงโดยใช้ VBA

ตัวอย่างที่ 1: คำนวณค่าต่ำสุดของช่วงโดยใช้ VBA และแสดงผลลัพธ์ในเซลล์

สมมติว่าเราต้องการคำนวณค่าต่ำสุดในคอลัมน์คะแนนและแสดงผลลัพธ์ในเซลล์เฉพาะ

เราสามารถสร้างมาโครต่อไปนี้เพื่อทำสิ่งนี้:

 SubMinValue ()
    Range(" D2 ") = WorksheetFunction.Min(Range(" B2:B11 "))
End Sub

เมื่อเราเรียกใช้แมโครนี้ เราได้รับผลลัพธ์ต่อไปนี้:

โปรดสังเกตว่าเซลล์ D2 มีค่า 10

นี่บอกเราว่าค่าต่ำสุดในคอลัมน์คะแนนคือ 10

ตัวอย่างที่ 2: คำนวณค่าต่ำสุดของช่วงโดยใช้ VBA และแสดงผลลัพธ์ในกล่องข้อความ

สมมติว่าเราต้องการคำนวณค่าต่ำสุดในคอลัมน์คะแนนและแสดงผลลัพธ์ในกล่องข้อความแทน

เราสามารถสร้างมาโครต่อไปนี้เพื่อทำสิ่งนี้:

 SubMinValue ()
    'Create variable to store min value
    Dim minValue As Single
    
    'Calculate min value in range
    minValue = WorksheetFunction.Min(Range(" B2:B11 "))
    
    'Display the result
    MsgBox " Min Value in Range: " & minValue 
End Sub

เมื่อเราเรียกใช้แมโครนี้ เราได้รับผลลัพธ์ต่อไปนี้:

กล่องข้อความบอกเราว่าค่าต่ำสุดในช่วง B2:B11 คือ 10

โปรดทราบว่าในตัวอย่างนี้ เราคำนวณค่าต่ำสุดในช่วง B2:B11

อย่างไรก็ตาม หากคุณต้องการคำนวณค่าต่ำสุดในทั้งคอลัมน์แทน คุณสามารถพิมพ์ B:B แทนได้

วิธีนี้จะคำนวณค่าต่ำสุดตลอดทั้งคอลัมน์ B

แหล่งข้อมูลเพิ่มเติม

บทช่วยสอนต่อไปนี้จะอธิบายวิธีการทำงานทั่วไปอื่นๆ ใน VBA:

VBA: วิธีคำนวณค่าเฉลี่ยของช่วง
VBA: วิธีนับจำนวนแถวในช่วง
VBA: วิธีเพิ่มค่าในช่วง