संस्करण इतिहास रिकॉर्ड करने के लिए आप इस मैक्रो का उपयोग करते हैं
कई कार्यपुस्तिकाएं हैं जिन्हें निश्चित अंतराल पर सहेजा जाना चाहिए। यदि आप हमेशा एक अलग नाम का उपयोग करते हैं, तो आप कार्यपुस्तिका में किस समय में कौन सा डेटा पाया गया था, इसका सटीक रूप से पालन कर सकते हैं।
फ़ाइल को सहेजते समय दिनांक-समय स्टाम्प का उपयोग करना विशेष रूप से उपयोगी है। आप फ़ाइल नाम के रूप में दिनांक और समय के संयोजन का उपयोग करते हैं। उदाहरण के लिए, यदि फ़ाइल ०८/२७/२००८ को १०:३२ और २६ सेकंड में सहेजी जाती है, तो फ़ाइल का नाम है:
20080827-103226
इस तरह के डेट-टाइम स्टैम्प का लाभ यह है कि फाइलों का वर्णानुक्रम में प्रदर्शन (उदाहरण के लिए विंडोज एक्सप्लोरर के साथ) कालानुक्रमिक क्रम से मेल खाता है।
वर्तमान फ़ाइल नामों को मैन्युअल रूप से परिभाषित करना समय लेने वाला और त्रुटि-प्रवण है। इसके बजाय, निम्न मैक्रो का उपयोग करें:
सब विथ टाइमस्टैम्पसेव ()
मंद दिनांक टाइमस्टैम्प स्ट्रिंग के रूप में
मंद अब तिथि के रूप में
अब = अब ()
दिनांक समय टिकट = वर्ष (तारीख) और प्रारूप (माह (दिनांक), "00") और प्रारूप (दिन (दिनांक), "00")
दिनांक समय टिकट = दिनांक समय टिकट और "-" और प्रारूप (घंटा (अब), "00") और प्रारूप (मिनट (अब), "00") और प्रारूप (दूसरा (अब), "00")
ActiveWorkbook.SaveAs (यह कार्यपुस्तिका.पथ और "\" और दिनांक टिकट और ".xls")
अंत उप
जब आप मैक्रो को कॉल करते हैं, तो सक्रिय कार्यपुस्तिका पिछले संग्रहण पथ में पुन: सहेजी जाती है। दिनांक-समय स्टाम्प का उपयोग फ़ाइल नाम के रूप में किया जाता है, जैसा कि निम्न आकृति में दिखाया गया है:
यदि आप भी इस विंडो को अपने मैक्रो में शामिल करना चाहते हैं, तो निम्न प्रोग्राम लाइन को लाइन के सामने एक अलग, नई लाइन के रूप में एकीकृत करें अंत उप:
MsgBox (ActiveWorkbook.Path)
