ฟังก์ชันเวลา VBA | Examlpes เพื่อใช้ฟังก์ชันเวลา Excel VBA

ฟังก์ชันเวลา Excel VBA

ฟังก์ชันเวลา VBAส่งคืนเวลาปัจจุบันสิ่งสำคัญที่ควรทราบก็คือฟังก์ชันนี้ไม่มีข้อโต้แย้งใด ๆ อีกปัจจัยสำคัญที่ต้องจำไว้คือฟังก์ชันนี้จะส่งคืนเวลาของระบบปัจจุบัน การใช้ฟังก์ชั่นนี้เราสามารถค้นหาเวลาจริงที่ใช้โดยบรรทัดของรหัสเพื่อดำเนินการให้เสร็จสิ้น

TIME เป็นฟังก์ชันระเหยชนิดหนึ่งไม่มีไวยากรณ์ใด ๆ

นอกจากนี้เรายังมีฟังก์ชันที่คล้ายกันในฟังก์ชัน excel - NOW () ซึ่งแทรกทั้งเวลาปัจจุบันและวันที่ปัจจุบันในสเปรดชีต

เวลา ()

เราเพียงแค่ต้องใส่ฟังก์ชันในความเป็นจริงไม่จำเป็นต้องวงเล็บเพื่อใส่เพียง TIME ก็เพียงพอที่จะแทรกเวลาปัจจุบัน ผลลัพธ์ที่กำหนดโดยฟังก์ชัน TIME อยู่ในสตริง

วิธีใช้ฟังก์ชัน TIME ใน VBA

ให้ฉันแสดงตัวอย่างของฟังก์ชัน TIME แบบง่ายใน excel ทำตามขั้นตอนด้านล่างเพื่อสร้างโค้ดเพื่อใช้ฟังก์ชัน TIME

คุณสามารถดาวน์โหลด VBA Time Function Template ได้ที่นี่ - VBA Time Function Template

ขั้นตอนที่ 1:สร้างมาโคร

รหัส:

 Sub Time_Example1 () End Sub 

ขั้นตอนที่ 2:ประกาศตัวแปรเป็น String

รหัส:

 Sub Time_Example1 () Dim CurrentTime เป็น String End Sub 

ขั้นตอนที่ 3:กำหนดค่าให้กับตัวแปรนี้ผ่านฟังก์ชัน TIME

รหัส:

 Sub Time_Example1 () Dim CurrentTime เป็น String CurrentTime = Time End Sub 

ขั้นตอนที่ 4:แสดงผลลัพธ์ในกล่องข้อความ

รหัส:

 Sub Time_Example1 () Dim CurrentTime เป็น String CurrentTime = เวลา MsgBox CurrentTime End Sub 

เรียกใช้รหัสนี้โดยใช้ปุ่ม F5 หรือด้วยตนเองเราจะได้รับเวลาปัจจุบัน

ดังนั้นเมื่อฉันเรียกใช้รหัสนี้เวลาคือ 11.51.54 น.

ทางเลือกของฟังก์ชัน Now ()

การรวมวันที่และเวลาเป็นทางเลือกสำหรับฟังก์ชัน NOW

อย่างที่บอกไปตอนต้นบทความ NOW สามารถแทรกวันที่ & เวลาปัจจุบันได้ อย่างไรก็ตามเราสามารถใช้ฟังก์ชันอื่นอีกสองฟังก์ชันเป็นฟังก์ชันทางเลือกสำหรับฟังก์ชัน NOW ได้ซึ่งทั้งสองฟังก์ชันคือฟังก์ชัน VBA DATE และ VBA TIME

VBA Date จะส่งกลับวันที่และเวลาปัจจุบันจะคืนเวลาปัจจุบันดังนั้นจึงทำให้ฟังก์ชัน NOW ด้านล่างนี้คือชุดรหัสที่จะแทรกวันที่และเวลาปัจจุบันในเซลล์ A1

รหัส:

 Sub Time_Example2 () Range ("A1"). Value = Date & "" & Time End Sub 

รหัสนี้จะแทรกวันที่และเวลาปัจจุบันในเซลล์ A1

เรายังสามารถใช้รูปแบบกับค่าเหล่านี้โดยใช้ฟังก์ชัน FORMAT รหัสด้านล่างจะจัดรูปแบบวันที่และเวลา

รหัส:

 Sub Time_Example2 () ช่วง ("A1") ค่า = วันที่ & "" & ช่วงเวลา ("A1") NumberFormat = "dd-mmm-yyyy hh: mm: ss AM / PM" End Sub 

ตอนนี้ผลลัพธ์ของรหัสนี้เป็นดังนี้

ติดตามสมุดงานของคุณเปิดบันทึกโดยใช้ฟังก์ชันเวลาใน VBA

บ่อยครั้งที่เราจำเป็นต้องทราบความถี่ในการเปิดสมุดงานของเรา มีสถานการณ์ที่เราเปิดสมุดงานค่อนข้างบ่อยและเราทำการเปลี่ยนแปลงบางอย่าง ด้วยการติดตามเวลาและวันที่เปิดสมุดงานเราสามารถติดตามเวลาเปิดสมุดงานได้

สร้างแผ่นงานใหม่และเปลี่ยนชื่อเป็น "แผ่นงาน"

ขั้นตอนที่ 1:ดับเบิลคลิกที่สมุดงานนี้จาก VBE Editor

Step 2: Select the workbook from the object drop-down list.

Step 3: As soon as you select this option you can see new macro automatically created by itself in the name “Workbook_Open()”.

Step 4: Inside this macro, we will need to write a code to track the workbook opening date & time.

I have already written code and below is the code for you.

Code:

 Private Sub Workbook_Open() Dim LR As Long LR = Sheets("Track Sheet").Cells(Rows.Count, 1).End(xlUp).Row + 1 Sheets("Track Sheet").Cells(LR, 1).Value = Date & " " & Time() Sheets("Track Sheet").Cells(LR, 1).NumberFormat = "dd-mmm-yyyy hh:mm:ss AM/PM" End Sub 

This will record your workbook opening times like the below one.