ส่งกลับ ตัวแปร (วันที่) ที่มีเวลาสำหรับชั่วโมง นาที และวินาทีที่ระบุ
ไวยากรณ์
TimeSerial(hour, minute, second)
คำ เตือน ตรวจสอบให้แน่ใจว่าอาร์กิวเมนต์อยู่ในช่วงของค่าที่ถูกต้อง อาร์กิวเมนต์ที่ไม่ถูกต้องอาจให้ผลลัพธ์ที่ไม่ถูกต้อง
ไวยากรณ์ของฟังก์ชัน TimeSerial มีอาร์กิวเมนต์ดังนี้
| อาร์กิวเมนต์ | คำอธิบาย |
|---|---|
| ชั่วโมง | จำเป็น ตัวแปร (จํานวนเต็ม) ตัวเลขระหว่าง 0 (12:00 น.) และ 23 (23:00 น.) ครอบคลุม หรือนิพจน์ตัวเลข |
| นาที | จำเป็น ตัวแปร (จํานวนเต็ม) นิพจน์ตัวเลขใดก็ได้ |
| สอง | จำเป็น ตัวแปร (จํานวนเต็ม) นิพจน์ตัวเลขใดก็ได้ |
ข้อสังเกต
เมื่อต้องการระบุเวลา เช่น 11:59:59 ช่วงของตัวเลขสําหรับแต่ละอาร์กิวเมนต์ TimeSerial ควรอยู่ในช่วงปกติของหน่วย นั่นคือ 0–23 สําหรับชั่วโมงและ 0–59 สําหรับนาทีและวินาที อย่างไรก็ตาม คุณยังสามารถระบุเวลาสัมพัทธ์สําหรับแต่ละอาร์กิวเมนต์ได้โดยใช้นิพจน์ตัวเลขที่แสดงจํานวนชั่วโมง นาที หรือวินาทีก่อนหรือหลังเวลาที่กําหนด ตัวอย่างต่อไปนี้ใช้นิพจน์แทนตัวเลขเวลาสัมบูรณ์ ฟังก์ชัน TimeSerial จะส่งกลับเวลาก่อน 15 นาที (-15) หกชั่วโมงก่อนเที่ยง (12 - 6) หรือ 5:45:00 น.
TimeSerial(12 - 6, -15, 0)
เมื่ออาร์กิวเมนต์ใดๆ เกินช่วงปกติของอาร์กิวเมนต์นั้น จะเพิ่มหน่วยเป็นหน่วยที่มีขนาดใหญ่กว่าถัดไปตามความเหมาะสม ตัวอย่างเช่น ถ้าคุณระบุ 75 นาที จะถูกประเมินเป็นหนึ่งชั่วโมงและ 15 นาที ถ้ามีอาร์กิวเมนต์เดียวอยู่นอกช่วง -32,768 ถึง 32,767 จะเกิดข้อผิดพลาดขึ้น ถ้าเวลาที่ระบุโดยอาร์กิวเมนต์สามตัวทําให้วันที่อยู่นอกช่วงวันที่ที่ยอมรับได้ จะเกิดข้อผิดพลาดขึ้น
ตัวอย่างคิวรี
| นิพจน์ | ผลลัพธ์ |
|---|---|
| SELECT TimeSerial(18,12,10) AS NewTime FROM ProductSales GROUP BY TimeSerial(18,12,10); | ส่งกลับ "เวลา" ที่ประกอบด้วยชั่วโมง นาที และวินาทีที่ระบุที่ใส่ในอาร์กิวเมนต์ของฟังก์ชัน และแสดงในคอลัมน์ NewTime ผลลัพธ์: "6:12:10 PM" |
ตัวอย่าง VBA
หมายเหตุ
ตัวอย่างต่อไปนี้จะสาธิตการใช้ฟังก์ชันนี้ในโมดูล Visual Basic for Applications (VBA) สําหรับข้อมูลเพิ่มเติมเกี่ยวกับการทํางานกับ VBA ให้เลือก การอ้างอิงสําหรับนักพัฒนา ในรายการดรอปดาวน์ที่อยู่ถัดจาก ค้นหา แล้วใส่คําอย่างน้อยหนึ่งคําในกล่องค้นหา
ตัวอย่างนี้ใช้ฟังก์ชัน TimeSerial เพื่อส่งกลับเวลาสําหรับชั่วโมง นาที และวินาทีที่ระบุ
Dim MyTime
MyTime = TimeSerial(16, 35, 17)
' MyTime contains serial representation of 4:35:17 PM.