VBA समय समारोह - एक्सेल VBA टाइम फ़ंक्शन का उपयोग करने के लिए परीक्षा

एक्सेल VBA टाइम फंक्शन

वीबीए टाइम फंक्शन वर्तमान समय को लौटाता है, यह भी ध्यान देने वाली महत्वपूर्ण बात यह है कि इस फ़ंक्शन का इसमें कोई तर्क नहीं है, फिर भी, यह याद रखने का एक और महत्वपूर्ण कारक यह है कि यह फ़ंक्शन वर्तमान सिस्टम समय को लौटाता है। इस फ़ंक्शन का उपयोग करके हम वास्तव में प्रक्रिया को पूरा करने के लिए कोड की लाइन द्वारा लिया गया वास्तविक समय पा सकते हैं।

TIME एक प्रकार का अस्थिर कार्य है। इसका कोई सिंटेक्स नहीं है।

हमारे पास एक्सेल - नाउ () फ़ंक्शन में भी एक समान फ़ंक्शन है, जो दोनों मौजूदा समय के साथ-साथ स्प्रेडशीट में वर्तमान तिथि सम्मिलित करता है।

समय ()

हमें केवल फ़ंक्शन दर्ज करने की आवश्यकता है। वास्तव में, वर्तमान समय को सम्मिलित करने के लिए केवल टाइम को संलग्न करने के लिए कोष्ठक की कोई आवश्यकता नहीं है। TIME फ़ंक्शन द्वारा दिया गया परिणाम स्ट्रिंग में है।

VBA में TIME फंक्शन का उपयोग कैसे करें?

मैं आपको एक्सेल फ़ंक्शन में एक साधारण TIME का उदाहरण दिखाता हूं। TIME फ़ंक्शन का उपयोग करने के लिए कोड बनाने के लिए नीचे दिए गए चरणों का पालन करें।

चरण 1: एक मैक्रो बनाएँ।

कोड:

उप Time_Example1 () उप सब

चरण 2: एक चर को स्ट्रिंग के रूप में घोषित करें।

कोड:

उप Time_Example1 () मंद वर्तमान समय स्ट्रिंग के रूप में उप

चरण 3: TIME फ़ंक्शन के माध्यम से इस चर का मान असाइन करें।

कोड:

उप Time_Example1 () वर्तमान धारा के रूप में मंद वर्तमान समय = समय समाप्त उप

चरण 4: अब संदेश बॉक्स में परिणाम दिखाएं।

कोड:

उप Time_Example1 () स्ट्रिंग चालू समय के रूप में मंद वर्तमान समय = समय MsgBox वर्तमान समय समाप्ति उप

इस कोड को F5 कुंजी या मैन्युअल रूप से चलाएं। हमें वर्तमान समय मिलेगा।

इसलिए, जब मैंने इस कोड को चलाया, तो समय 11.51.54 बजे था।

अब () फ़ंक्शन का विकल्प

एक वैकल्पिक विकल्प के रूप में दिनांक और समय का संयोजन

जैसा कि मैंने लेख की शुरुआत में बताया, अब वर्तमान तिथि और समय सम्मिलित कर सकते हैं। हालाँकि, हम नाओ फ़ंक्शन के लिए वैकल्पिक फ़ंक्शन के रूप में दो अन्य कार्यों का उपयोग कर सकते हैं; वे दो कार्य VBA DATE और VBA TIME फ़ंक्शंस हैं।

VBA दिनांक वर्तमान दिनांक को वापस कर देगी और वर्तमान समय वापस आ जाएगा, इसलिए यह Now कार्य करता है। नीचे कोड का एक सेट है जो सेल A1 में वर्तमान तिथि और समय सम्मिलित करेगा।

कोड:

उप Time_Example2 () श्रेणी ("A1")। मान = दिनांक और "" और समय समाप्ति उप

यह कोड सेल A1 में वर्तमान दिनांक और समय सम्मिलित करेगा।

हम FORMAT फ़ंक्शन का उपयोग करके इन मानों के लिए एक प्रारूप भी लागू कर सकते हैं। नीचे दिया गया कोड दिनांक और समय को प्रारूपित करेगा।

कोड:

उप Time_Example2 () श्रेणी ("A1")। मान = दिनांक और "" और समय सीमा ("A1")। NumberFormat = "dd-mmm-yyyy hh: mm: ss AM / PM" अंतिम उप

अब इस कोड का परिणाम इस प्रकार है।

VBA में टाइम फंक्शन का उपयोग करके अपनी वर्कबुक ओपन रिकॉर्ड को ट्रैक करें

अक्सर बार, हमें अपनी कार्यपुस्तिका खोलने की समय-आवृत्ति जानने की आवश्यकता होती है। ऐसी स्थिति है जहां हम कार्यपुस्तिका को अक्सर खोलते हैं, और हम कुछ बदलाव करते हैं। कार्यपुस्तिका के खुलने का समय और दिनांक ट्रैक करके, हम कार्यपुस्तिका के खुलने का समय ट्रैक कर सकते हैं।

एक नई शीट बनाएं और इसे "ट्रैक शीट" नाम दें।

चरण 1: VBE संपादक से इस कार्यपुस्तिका पर डबल क्लिक करें ।

चरण 2: ऑब्जेक्ट ड्रॉप-डाउन सूची से कार्यपुस्तिका का चयन करें।

चरण 3: जैसे ही आप इस विकल्प का चयन करते हैं, आप "वर्कबुक_प्रेस ()" नाम से अपने आप एक नया मैक्रो अपने आप बना सकते हैं

चरण 4: इस मैक्रो के अंदर, हमें कार्यपुस्तिका खोलने की तारीख और समय को ट्रैक करने के लिए एक कोड लिखना होगा।

मैंने पहले ही कोड लिखा है, और नीचे आपके लिए कोड है।

कोड:

निजी उप कार्यपुस्तिका_ओपन () डिम एलआर अस लॉन्ग एलआर = शीट्स ("ट्रैक शीट")। सेल (पंक्तियाँ। क्राउन, 1)। और (xlUp)। रो + 1 शीट्स ("ट्रैक शीट")। सेल (एलआर, 1)। .Value = दिनांक और "" और समय () पत्रक ("ट्रैक शीट")। कोशिकाएं (LR, 1) .NumberFormat = "dd-mmm-yyyy hh: mm: ss AM / PM" अंतिम उप

यह नीचे की तरह आपकी कार्यपुस्तिका को खोलने का समय रिकॉर्ड करेगा।

दिलचस्प लेख...