एक्सेल - स्वचालित रूप से तारीख बदलें

मुद्दा

मैं अपने कार्यपत्रक पर इस सूत्र का उपयोग कर रहा हूं:

 = आईएफ (या (ए 1 = 1, ए 1 = 2, ए 1 = 3), टुडे (), "")

समस्या यह है कि जब मैं अगले दिन अपनी शीट खोलता हूं तो सभी प्रवेश तिथियां बदलकर आज हो जाती हैं, मुझे उसी दिन रहने के लिए पिछले दिन के प्रवेश की आवश्यकता होती है और आज की तारीख दिखाने के लिए केवल नई प्रविष्टि, कृपया किसी भी निकाय की मदद लें !!

 स्टेटस डेज़ फ्लैग जॉब विवरण दिनांक 1 16 मई 2010 2 17 मई 2010 1 20 मई 2010 3 21 मई 2010

उपाय

यदि A1 में मान मैन्युअल रूप से बंद किया जा रहा है, तो आप घटनाओं का उपयोग कर सकते हैं

ऐसा करने के लिए

1. VBE शुरू करने के लिए ALT + F11 दबाएँ
2. प्रोजेक्ट एक्सप्लोरर को दिखाने के लिए CTRL + R दबाएं
3. उस शीट पर डबल क्लिक करें जहां A1 का मान बदलने जा रहा है
4. इस कोड को पेस्ट करें

 निजी सब वर्कशीट_चेंज (बायल टारगेट रेंज के रूप में) 'यदि इवेंट पहले कॉलम (कॉलम ए) द्वारा ट्रिगर नहीं किया गया था, तो ऐसा करने के लिए कुछ भी नहीं है अगर (लक्ष्य। कॉलम 1) तो एग्जिट सब' अगर पंक्ति 1 के साथ चालू नहीं हुआ था (लक्ष्य) पंक्ति 1) इसके बाद सबटाइटल को अक्षम करें, ताकि हम ईवेंट के चक्र में न जा सकें। आवेदन योग्य। ईवेंट्स = गलत यदि लक्ष्य = 1 या लक्ष्य = 2 या लक्ष्य = 3 फिर 1 पंक्ति नीचे है, और लक्ष्य के लिए एक कॉलम है। ऑफसेट (1), 1) = CDate (Now) 'समान पंक्ति और एक कॉलम दाएं Target.Offset (0, 1) = "" Else' 1 पंक्ति नीचे, और एक स्तंभ सही Target.Offset (1, 1) = "" एक ही पंक्ति और एक स्तंभ सही लक्ष्य के लिए। ऑफसेट (0, 1) = CDate (अब) यदि हम किया जाता है तो अब हम दोबारा से सक्षम कर सकते हैं। अनुप्रयोग सक्षम करें = सही अंत उप