एक्सेल में चेकबॉक्स पर टिक लगाने पर सेल में डेट स्टैम्प कैसे डालें?
आम तौर पर, आप Excel में हॉटकी का उपयोग करके दिनांक स्टांप दर्ज करते हैं। Excel में चेकबॉक्स द्वारा किसी सेल में दिनांक स्टाम्प डालने के बारे में क्या ख़याल है? चेकबॉक्स पर टिक करने पर, टाइम स्टैम्प स्वचालित रूप से एक निर्दिष्ट सेल में डाला जाता है। यह लेख आपको इसे हल करने में मदद करेगा.
यदि वीबीए कोड वाले चेकबॉक्स पर टिक किया गया है तो सेल में दिनांक स्टाम्प डालें
यदि वीबीए कोड वाले चेकबॉक्स पर टिक किया गया है तो सेल में दिनांक स्टाम्प डालें
एक्सेल में चेकबॉक्स पर टिक करने पर यह अनुभाग स्वचालित रूप से सेल में डेट स्टैम्प डालने में आपकी सहायता के लिए एक वीबीए स्क्रिप्ट पेश करेगा। कृपया निम्नानुसार करें.
1. चेक बॉक्स डालने के बाद दबाएं ऑल्ट + F11 खोलने के लिए एक साथ कुंजियाँ अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की.
2। में अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की, क्लिक करें सम्मिलित करें > मॉड्यूल. फिर नीचे दिए गए VBA कोड को कॉपी करके मॉड्यूल विंडो में पेस्ट करें।
वीबीए कोड: चेकबॉक्स पर टिक होने पर सेल में दिनांक स्टांप डालें
Sub CheckBox_Date_Stamp()
Dim xChk As CheckBox
Set xChk = ActiveSheet.CheckBoxes(Application.Caller)
With xChk.TopLeftCell.Offset(, 1)
If xChk.Value = xlOff Then
.Value = ""
Else
.Value = Date
End If
End With
End Sub
3। दबाएँ ऑल्ट + Q बंद करने के लिए कुंजियाँ अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की.
4. चेक बॉक्स पर राइट क्लिक करें और चयन करें माइक्रो असाइन करें राइट-क्लिक मेनू से. स्क्रीनशॉट देखें:
5। में मैक्रो को असाइन करें संवाद बॉक्स में, चयन करें चेकबॉक्स_दिनांक_स्टाम्प में मैक्रो नाम बॉक्स, और फिर क्लिक करें OK बटन। स्क्रीनशॉट देखें:
चेक बॉक्स पर टिक करने पर, दिनांक स्टांप स्वचालित रूप से आसन्न सेल में डाला जाएगा।
संबंधित लेख:
- Excel में चेकबॉक्स चेक होने पर निर्दिष्ट सेल मान या रंग कैसे बदलें?
- Excel में चेकबॉक्स के साथ सेल या पंक्ति को कैसे हाइलाइट करें?
- एक्सेल में सेल वैल्यू के आधार पर चेकबॉक्स को कैसे चेक करें?
- एक्सेल में चेकबॉक्स के आधार पर डेटा कैसे फ़िल्टर करें?
- Excel में पंक्ति छुपी होने पर चेकबॉक्स कैसे छिपाएँ?
- एक्सेल में एकाधिक चेकबॉक्स के साथ ड्रॉप डाउन सूची कैसे बनाएं?
सर्वोत्तम कार्यालय उत्पादकता उपकरण
एक्सेल के लिए कुटूल के साथ अपने एक्सेल कौशल को सुपरचार्ज करें, और पहले जैसी दक्षता का अनुभव करें। एक्सेल के लिए कुटूल उत्पादकता बढ़ाने और समय बचाने के लिए 300 से अधिक उन्नत सुविधाएँ प्रदान करता है। वह सुविधा प्राप्त करने के लिए यहां क्लिक करें जिसकी आपको सबसे अधिक आवश्यकता है...
ऑफिस टैब ऑफिस में टैब्ड इंटरफ़ेस लाता है, और आपके काम को बहुत आसान बनाता है
- Word, Excel, PowerPoint में टैब्ड संपादन और रीडिंग सक्षम करें, प्रकाशक, एक्सेस, विसियो और प्रोजेक्ट।
- नई विंडो के बजाय एक ही विंडो के नए टैब में एकाधिक दस्तावेज़ खोलें और बनाएं।
- आपकी उत्पादकता 50% बढ़ जाती है, और आपके लिए हर दिन सैकड़ों माउस क्लिक कम हो जाते हैं!