วิธีใช้ฟังก์ชัน weekdayname ใน vba (พร้อมตัวอย่าง)

คุณสามารถใช้ฟังก์ชัน WeekdayName ใน VBA เพื่อรับชื่อวันในสัปดาห์จากวันที่ที่ระบุได้

นี่เป็นวิธีทั่วไปในการใช้ฟังก์ชันนี้ในทางปฏิบัติ:

 Sub FindWeekdayName()
    
Dim i As Integer

For i = 2 To 9
    Range(" B " & i) = WeekdayName(Weekday(Range(" A " & i)))
Next i
    
End Sub

มาโครนี้จะค้นหาชื่อวันในสัปดาห์สำหรับแต่ละวันที่ในช่วง A2:A9 และแสดงผลลัพธ์ในช่วง B2:B9

ตัวอย่างต่อไปนี้แสดงวิธีการใช้ฟังก์ชัน WeekdayName ในทางปฏิบัติ

หมายเหตุ : หากคุณต้องการส่งคืนวันในสัปดาห์เป็นจำนวนเต็ม คุณควรใช้ฟังก์ชัน วันทำงาน แทน

ตัวอย่าง: วิธีใช้ฟังก์ชัน WeekdayName ใน VBA

สมมติว่าเรามีคอลัมน์วันที่ต่อไปนี้ใน Excel:

สมมติว่าเราต้องการรับชื่อวันในสัปดาห์สำหรับแต่ละวันและแสดงผลลัพธ์ในคอลัมน์ B

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

 Sub FindWeekdayName()
    
Dim i As Integer

For i = 2 To 9
    Range(" B " & i) = WeekdayName(Weekday(Range(" A " & i)))
Next i
    
End Sub

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

คอลัมน์ B จะแสดงชื่อวันในสัปดาห์สำหรับแต่ละวันที่ในคอลัมน์ A

ตัวอย่างเช่น:

• 01/01/2023 เป็น วันอาทิตย์
• 1/4/2023 เป็น วันพุธ
• 02/23/2023 เป็น วันพฤหัสบดี

และอื่นๆ

หมายเหตุ : คุณสามารถดูเอกสารฉบับเต็มสำหรับฟังก์ชัน VBA WeekdayName ได้ที่นี่

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

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

วิธีเปรียบเทียบวันที่ใน VBA
วิธีแปลงวันที่เป็นตัวเลขสัปดาห์ใน VBA
วิธีคำนวณวันระหว่างวันที่สองวันใน VBA