ฟังก์ชัน Excel VBA Now
NOW เป็นฟังก์ชันวันที่และเวลาใน VBA ทั้งสองซึ่งใช้เพื่อรับวันที่และเวลาของระบบปัจจุบันเช่นเดียวกับฟังก์ชันแผ่นงานที่ไม่ใช้อาร์กิวเมนต์ใด ๆ ในฟังก์ชัน VBA ตอนนี้จะไม่ใช้อาร์กิวเมนต์ใด ๆ สำหรับฟังก์ชันนี้คือวันที่
ฟังก์ชัน VBA NOW คล้ายกับฟังก์ชันในแผ่นงาน excel เช่นเดียวกับฟังก์ชัน DATE ใน VBA“ NOW” ก็เช่นกันไม่มีพารามิเตอร์ที่จะส่งผ่านเราเพียงแค่ต้องส่งผ่านฟังก์ชันด้วยวงเล็บปิดหรือไม่จำเป็นต้องมีวงเล็บเช่นกัน ด้วยการใช้ฟังก์ชัน DATE ใน VBA เราสามารถสร้างวันที่ปัจจุบันตามที่แสดงระบบที่เรากำลังดำเนินการอยู่ อย่างไรก็ตามฉันเคยเห็นสถานการณ์ที่เราต้องการเวลาปัจจุบันพร้อมกับวันที่ด้วยเช่นกัน ใน excel เราสามารถทำสิ่งต่างๆได้หลายอย่างในทำนองเดียวกันเราสามารถสร้างวันที่และเวลาปัจจุบันด้วยฟังก์ชันง่ายๆที่เรียกว่า NOW ใน excel
สูตรของ VBA NOW นั้นง่ายมาก
ตอนนี้ ()
ตัวอย่างฟังก์ชัน NOW ใน VBA Excel
ดูตัวอย่างง่ายๆของฟังก์ชัน NOW ใน VBA ทำตามขั้นตอนด้านล่างเพื่อเขียนโค้ด VBA และรับความรู้เล็กน้อยเกี่ยวกับ NOW ตลอดจนการเขียนโค้ด
ขั้นตอนที่ 1:เริ่มกระบวนการย่อยโดยตั้งชื่อมาโคร
รหัส:
Sub Now_Example1 () End Sub
ขั้นตอนที่ 2:ประกาศตัวแปรเป็น“ วันที่” สาเหตุที่เราต้องประกาศตัวแปรเป็น“ วันที่” เนื่องจากผลลัพธ์สุดท้ายของเราอยู่ในรูปแบบวันที่และเวลา
รหัส:
Sub Now_Example1 () Dim k As Date End Sub
ขั้นตอนที่ 3:กำหนดค่าให้กับตัวแปร“ k” โดยใช้ฟังก์ชัน VBA NOW
รหัส:
Sub Now_Example1 () Dim k As Date k = Now End Sub
ขั้นตอนที่ 4:แสดงค่าของฟังก์ชัน NOW ซึ่งเราได้กำหนดให้กับตัวแปร“ k” ในกล่องข้อความใน VBA
รหัส:
Sub Now_Example1 () Dim k As Date k = Now MsgBox k End Sub
โอเคเสร็จแล้ว
เรียกใช้รหัสโดยใช้ปุ่ม F5 หรือด้วยตนเองและดูว่าผลลัพธ์คืออะไร
ผลปรากฎว่า 15/4/2019 เวลา 5:03:35 น.
รูปแบบวันที่ในคอมพิวเตอร์ของฉันคือ“ mm-dd-yyyy”
เรายังสามารถเปลี่ยนรูปแบบวันที่ได้โดยใช้ฟังก์ชัน FORMAT ด้านล่างนี้คือรหัสสำหรับเปลี่ยนรูปแบบวันที่
รหัส:
Sub Now_Example1 () Dim k As Date k = Now MsgBox Format (k, "DD-MMM-YYYY HH: MM: SS") End Sub
รันโค้ดและดูความแตกต่าง
ตอนนี้เรามีรูปแบบวันที่และเวลาที่เหมาะสม ด้วยรูปแบบนี้ทุกคนสามารถเข้าใจรูปแบบวันที่และเวลาได้
ระเหยได้ในธรรมชาติ:
ดังที่คุณเห็นในตัวอย่างแรกเราได้ผลลัพธ์ของเวลาเป็น 5:03:35 และในตัวอย่างที่สองเราได้ผลลัพธ์เป็น 17:19:02 น. ดังนั้นนี่แสดงให้เห็นว่าฟังก์ชัน NOW เป็นฟังก์ชันระเหยที่เปลี่ยนแปลงทุกวินาที
ทางเลือกแทนฟังก์ชัน Timer ใน VBA
อีกทางเลือกหนึ่งสำหรับ VBA TIMER เราสามารถใช้ฟังก์ชัน“ VBA NOW” เพื่อคำนวณเวลาทั้งหมดที่มาโครใช้เพื่อทำงานให้เสร็จสมบูรณ์
ใช้รหัสด้านล่างเพื่อคำนวณเวลาที่รหัสของคุณใช้
C0de:
Sub TotalDuration () Dim k As Date k = Now '' 'Enter your code here' '' MsgBox "Total Time Taken by the macro to complete the task is:" & _ Format ((Now - k), "HH: MM : SS ") End Sub
ในพื้นที่สีเขียวคัดลอกและวางรหัสของคุณ
รันโค้ดโดยกดปุ่ม F5 หรือกดปุ่มรัน ทันทีที่เสร็จสิ้นการดำเนินการเราจะได้รับเวลาที่มาโครใช้ในการดำเนินการข้อความงานในกล่องข้อความ ด้านล่างนี้เป็นตัวอย่างเดียวกัน
เช่นนี้เราสามารถใช้ฟังก์ชัน NOW ได้หลายวิธีใน VBA
คุณสามารถดาวน์โหลดเทมเพลต Excel VBA Now Function ได้ที่นี่ - VBA Now Function Template