जब एक्सेल में किसी अन्य सेल में डेटा बदलता है तो वर्तमान टाइमस्टैम्प कैसे डालें?
मान लीजिए कि आपको एक वर्कशीट प्राप्त होती है जिसमें आपको एक निश्चित कॉलम में डेटा को संशोधित करने की आवश्यकता होती है। और वर्कशीट को संशोधित करने के बाद, आपको दूसरों को यह बताने के लिए संशोधित टाइमस्टैम्प डालने की आवश्यकता है कि कौन से सेल बदले गए हैं। इसका सामना कैसे करें? यह आलेख आपको नीचे दिए गए स्क्रीनशॉट के अनुसार एक्सेल में किसी अन्य सेल में डेटा बदलने पर वर्तमान टाइमस्टैम्प डालने की विधि दिखाएगा।
जब VBA कोड के साथ किसी अन्य सेल में डेटा बदलता है तो वर्तमान टाइमस्टैम्प डालें
जब VBA कोड के साथ किसी अन्य सेल में डेटा बदलता है तो वर्तमान टाइमस्टैम्प डालें
जैसा कि नीचे स्क्रीनशॉट में दिखाया गया है, यदि कॉलम C में संबंधित सेल बदल दिए गए हैं, तो आपको कॉलम E में टाइमस्टैम्प भरने की आवश्यकता है। कृपया निम्नानुसार करें.
1. वर्कशीट में आपको टाइमस्टैम्प के साथ संशोधित और चिह्नित करने की आवश्यकता है, शीट टैब पर राइट क्लिक करें और फिर क्लिक करें कोड देखें राइट-क्लिक मेनू से।
2. फिर नीचे दिए गए VBA कोड को कॉपी करके पेस्ट करें कोड की खिड़की अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की। स्क्रीनशॉट देखें:
वीबीए कोड: जब किसी अन्य सेल में डेटा बदलता है तो वर्तमान टाइमस्टैम्प डालें
Private Sub Worksheet_Change(ByVal Target As Range)
'Updated by Extendoffice 20180830
Dim xCellColumn As Integer
Dim xTimeColumn As Integer
Dim xRow, xCol As Integer
Dim xDPRg, xRg As Range
xCellColumn = 3
xTimeColumn = 5
xRow = Target.Row
xCol = Target.Column
If Target.Text <> "" Then
If xCol = xCellColumn Then
Cells(xRow, xTimeColumn) = Now()
Else
On Error Resume Next
Set xDPRg = Target.Dependents
For Each xRg In xDPRg
If xRg.Column = xCellColumn Then
Cells(xRg.Row, xTimeColumn) = Now()
End If
Next
End If
End If
End Sub
नोट: कोड में, संख्या 3 का अर्थ है कि आप कॉलम सी में डेटा को संशोधित करने जा रहे हैं, और 5 इंगित करता है कि टाइमस्टैम्प कॉलम ई में पॉप्युलेट किया जाएगा। कृपया उन्हें अपनी आवश्यकताओं के आधार पर बदलें।
3। दबाएं ऑल्ट + Q बंद करने के लिए कुंजियाँ अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की.
अब से, कॉलम सी में डेटा बदलते समय, टाइमस्टैम्प को नीचे दिए गए स्क्रीनशॉट के अनुसार कॉलम ई में संबंधित कोशिकाओं में पॉप्युलेट किया जाएगा।
टिप। खजूर बीनने वाला। दिनांक सम्मिलित करें की उपयोगिता एक्सेल के लिए कुटूल आपको चयनित सेल में निर्दिष्ट दिनांक प्रारूप के साथ दिनांक शीघ्रता से डालने में मदद करता है।
अभी डाउनलोड करें और इसे आज़माएं! (30 दिन का निःशुल्क ट्रेल)
संबंधित लेख:
- Excel में वर्कशीट पर अंतिम सहेजा गया टाइमस्टैम्प कैसे डालें या प्रदर्शित करें?
- एक्सेल में मैक्रो चलने पर विशिष्ट सेल में टाइमस्टैम्प कैसे डालें?
सर्वोत्तम कार्यालय उत्पादकता उपकरण
एक्सेल के लिए कुटूल के साथ अपने एक्सेल कौशल को सुपरचार्ज करें, और पहले जैसी दक्षता का अनुभव करें। एक्सेल के लिए कुटूल उत्पादकता बढ़ाने और समय बचाने के लिए 300 से अधिक उन्नत सुविधाएँ प्रदान करता है। वह सुविधा प्राप्त करने के लिए यहां क्लिक करें जिसकी आपको सबसे अधिक आवश्यकता है...
ऑफिस टैब ऑफिस में टैब्ड इंटरफ़ेस लाता है, और आपके काम को बहुत आसान बनाता है
- Word, Excel, PowerPoint में टैब्ड संपादन और रीडिंग सक्षम करें, प्रकाशक, एक्सेस, विसियो और प्रोजेक्ट।
- नई विंडो के बजाय एक ही विंडो के नए टैब में एकाधिक दस्तावेज़ खोलें और बनाएं।
- आपकी उत्पादकता 50% बढ़ जाती है, और आपके लिए हर दिन सैकड़ों माउस क्लिक कम हो जाते हैं!