मुख्य सामग्री पर जाएं

Excel में सेल परिवर्तनों की निगरानी कैसे करें?

लेखक: ज़ियाओयांग अंतिम संशोधित: 2016-08-09

यदि एक्सेल में डेटा बदल दिया गया है तो आप वर्कशीट सेल की निगरानी कैसे कर सकते हैं? इससे आपको यथाशीघ्र परिवर्तित कोशिकाओं की पहचान करने में मदद मिल सकती है। इस लेख में, मैं एक्सेल में इस कार्य से निपटने के लिए कुछ दिलचस्प तरीकों के बारे में बात करूंगा।

ट्रैक चेंजेस फ़ंक्शन के साथ एक्सेल में सेल परिवर्तनों की निगरानी करें

वीबीए कोड के साथ एक्सेल में सेल परिवर्तनों की निगरानी करें


तीर नीला दायां बुलबुला ट्रैक चेंजेस फ़ंक्शन के साथ एक्सेल में सेल परिवर्तनों की निगरानी करें

एक्सेल में एक उपयोगी है ट्रैक परिवर्तन सुविधा, यह आपको परिवर्तित कक्षों को चिह्नित करने में मदद कर सकती है, कृपया निम्नानुसार कार्य करें:

1। क्लिक करें समीक्षा > ट्रैक परिवर्तन > परिवर्तन हाइलाइट करें, स्क्रीनशॉट देखें:

दस्तावेज़ मॉनिटर परिवर्तन 1

2. में परिवर्तन हाइलाइट करें संवाद बॉक्स में, निम्नलिखित कार्य करें:

(1.)चेक करें संपादन करते समय परिवर्तनों को ट्रैक करें। यह आपकी कार्यपुस्तिका को भी साझा करता है.

(2.)के अंतर्गत जो परिवर्तन हो उसे हाइलाइट करें अनुभाग में, आपकी आवश्यकता के अनुसार कब, कौन और कहाँ आइटम निर्दिष्ट करें।

(3.) अंत में, जांचें स्क्रीन पर परिवर्तनों को हाइलाइट करें विकल्प.

दस्तावेज़ मॉनिटर परिवर्तन 2

3. सेटिंग्स ख़त्म करने के बाद क्लिक करें OK बटन, अब, जब आप निर्दिष्ट सेल में कोई सेल मान बदलते हैं, तो त्रिकोणीय आइकन वाला एक बॉर्डर परिवर्तित सेल के चारों ओर होता है, स्क्रीनशॉट देखें:

दस्तावेज़ मॉनिटर परिवर्तन 3

नोट: इस विधि से आपकी कार्यपुस्तिका एक साझा कार्यपुस्तिका बन जायेगी।


तीर नीला दायां बुलबुला वीबीए कोड के साथ एक्सेल में सेल परिवर्तनों की निगरानी करें

निम्नलिखित वीबीए कोड आपको बदले जाने पर सेल मानों की निगरानी करने में भी मदद कर सकता है, कृपया ऐसा करें:

1. उस शीट टैब पर राइट क्लिक करें जिसे आप सेल परिवर्तनों की निगरानी करना चाहते हैं, और चुनें कोड देखें संदर्भ मेनू से, खोले गए में अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक विंडो, कृपया निम्नलिखित VBA कोड को कॉपी करें और मॉड्यूल में पेस्ट करें:

वीबीए कोड: एक्सेल वर्कशीट में सेल परिवर्तनों की निगरानी करें:

Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice 20160728
    Dim xrng As Range
    Set xrng = Range("A1:E7")
    If Not Application.Intersect(xrng, Range(Target.Address)) _
           Is Nothing Then
        MsgBox "Cell " & Target.Address & " has changed.", vbInformation, "Kutools for Excel"
    End If
End Sub

दस्तावेज़ मॉनिटर परिवर्तन 4

नोट: उपरोक्त कोड में, ए1:ई7 वह डेटा रेंज है जिसे आप मॉनिटर करना चाहते हैं यदि सेल बदलता है, तो आप इसे अपनी आवश्यकता के अनुसार बदल सकते हैं।

2. फिर इस कोड विंडो को सहेजें और बंद करें, और अब, जब आप निर्दिष्ट सीमा में सेल मान बदलते हैं, तो आपको याद दिलाने के लिए एक संदेश बॉक्स पॉप आउट हो जाएगा, स्क्रीनशॉट देखें:

दस्तावेज़ मॉनिटर परिवर्तन 5

सर्वोत्तम कार्यालय उत्पादकता उपकरण

🤖 कुटूल्स एआई सहयोगी: निम्न के आधार पर डेटा विश्लेषण में क्रांति लाएं: बुद्धिमान निष्पादन   |  कोड जनरेट करें  |  कस्टम फ़ॉर्मूले बनाएं  |  डेटा का विश्लेषण करें और चार्ट बनाएं  |  कुटूल फ़ंक्शंस का आह्वान करें...
लोकप्रिय सुविधाएँ: डुप्लिकेट ढूंढें, हाइलाइट करें या पहचानें   |  रिक्त पंक्तियाँ हटाएँ   |  डेटा खोए बिना कॉलम या सेल को संयोजित करें   |   फॉर्मूला के बिना गोल ...
सुपर लुकअप: एकाधिक मानदंड VLookup    मल्टीपल वैल्यू वीलुकअप  |   अनेक शीटों में VLookup   |   फजी लुकअप ....
उन्नत ड्रॉप-डाउन सूची: शीघ्रता से ड्रॉप डाउन सूची बनाएं   |  आश्रित ड्रॉप डाउन सूची   |  बहु-चयन ड्रॉप डाउन सूची ....
स्तम्भ प्रबंधक: कॉलमों की एक विशिष्ट संख्या जोड़ें  |  कॉलम ले जाएँ  |  छिपे हुए कॉलम की दृश्यता स्थिति टॉगल करें  |  रेंज और कॉलम की तुलना करें ...
फीचर्ड फीचर्स: ग्रिड फोकस   |  डिजाइन देखें   |   बड़ा फॉर्मूला बार    कार्यपुस्तिका एवं शीट प्रबंधक   |  संसाधन लाइब्रेरी (ऑटो टेक्स्ट)   |  खजूर बीनने वाला   |  कार्यपत्रकों को संयोजित करें   |  एन्क्रिप्ट/डिक्रिप्ट सेल    सूची के अनुसार ईमेल भेजें   |  सुपर फ़िल्टर   |   विशेष फ़िल्टर (फ़िल्टर बोल्ड/इटैलिक/स्ट्राइकथ्रू...) ...
शीर्ष 15 टूलसेट12 टेक्स्ट टूल्स (पाठ जोड़ें, अक्षर हटाएँ, ...)   |   50 + चार्ट प्रकार (गैन्ट चार्ट, ...)   |   40+ प्रैक्टिकल सूत्र (जन्मदिन के आधार पर आयु की गणना करें, ...)   |   19 निवेशन टूल्स (QR कोड डालें, पथ से चित्र सम्मिलित करें, ...)   |   12 रूपांतरण टूल्स (शब्दों को संख्याएँ, मुद्रा रूपांतरण, ...)   |   7 विलय और विभाजन टूल्स (उन्नत संयोजन पंक्तियाँ, विभाजन कोशिकाओं, ...)   |   ... और अधिक

एक्सेल के लिए कुटूल के साथ अपने एक्सेल कौशल को सुपरचार्ज करें, और पहले जैसी दक्षता का अनुभव करें। एक्सेल के लिए कुटूल उत्पादकता बढ़ाने और समय बचाने के लिए 300 से अधिक उन्नत सुविधाएँ प्रदान करता है।  वह सुविधा प्राप्त करने के लिए यहां क्लिक करें जिसकी आपको सबसे अधिक आवश्यकता है...

Description


ऑफिस टैब ऑफिस में टैब्ड इंटरफ़ेस लाता है, और आपके काम को बहुत आसान बनाता है

  • Word, Excel, PowerPoint में टैब्ड संपादन और रीडिंग सक्षम करें, प्रकाशक, एक्सेस, विसियो और प्रोजेक्ट।
  • नई विंडो के बजाय एक ही विंडो के नए टैब में एकाधिक दस्तावेज़ खोलें और बनाएं।
  • आपकी उत्पादकता 50% बढ़ जाती है, और आपके लिए हर दिन सैकड़ों माउस क्लिक कम हो जाते हैं!
Comments (7)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Merhaba. WhatsApp üzerinden bana gelen bir excell dosyası var. Bunu bilgisayar üstünden açıp. Bunda ki hareketleri ve değişiklikleri görme şansım var mı ?
This comment was minimized by the moderator on the site
I got "syntax error" with "Dim xrng As Range" when I inserted the below code in my worksheet_change event :-(
VBA code: Monitor cell changes in Excel worksheet:

Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice 20160728
    Dim xrng As Range
    Set xrng = Range("A1:E7")
    If Not Application.Intersect(xrng, Range(Target.Address)) _
           Is Nothing Then
        MsgBox "Cell " & Target.Address & " has changed.", vbInformation, "Kutools for Excel"
    End If
End Sub
This comment was minimized by the moderator on the site
if i have large amount of data in excel file, and i just want to know status in one different colum that if any cell gets change its value then it should indicate in from of that cell's row , tha status shoild be changed, how can i do this
This comment was minimized by the moderator on the site
hello how can we track by date and time in the change in the cell
This comment was minimized by the moderator on the site
Woooow this is nowhere else except here! Amazing!

Is there any way to insert a row right below the row of the cell where the cell was updated?

To make it more challenging, if I have list validation enabled or formula enabled can that as well be copied to the new row?
This comment was minimized by the moderator on the site
Hi, amar,
To insert a row below the changed value, the following VBA code can help you, please try it.

Private Sub Worksheet_Change(ByVal Target As Range)
Dim xRg As Range
Dim xStrPre, xStr As String
On Error Resume Next
Set xRg = Range("A1:E7")
If Intersect(xRg, Target) Is Nothing Then Exit Sub
Application.EnableEvents = False
xStr = Target.Value
Application.Undo
xStrPre = Target.Value
Target.Offset(1, 0).EntireRow.Insert xlShiftDown
Target.Offset(1, 0).Value = xStrPre
Target.Value = xStr
Application.EnableEvents = True
End Sub
This comment was minimized by the moderator on the site
Hello, I have it copying old number to new line - how do I have the new line go to a new tab instead?
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations