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

एक्सेल में कुछ कॉलमों में गायब/रिक्त मान वाली पंक्तियों को कैसे हटाएं?

लेखक: सिलुविया अंतिम संशोधित: 2020-11-27

कुछ मामलों में, आपको Excel में कक्षों की श्रेणी में लुप्त मान वाली संपूर्ण पंक्तियों या रिक्त कक्ष को हटाने की आवश्यकता हो सकती है। यह लेख आपको दिखाएगा कि इस समस्या से कैसे निपटा जाए।

VBA कोड के साथ कुछ कॉलमों में गुम/रिक्त मान वाली पंक्तियाँ हटाएँ


VBA कोड के साथ कुछ कॉलमों में गुम/रिक्त मान वाली पंक्तियाँ हटाएँ

मान लीजिए कि आप पंक्तियों को हटाना चाहते हैं यदि कॉलम बी और डी में गुम मान मौजूद है जैसा कि नीचे दिए गए स्क्रीनशॉट में दिखाया गया है। इसे प्राप्त करने के लिए आप निम्नलिखित VBA कोड चला सकते हैं।

1। दबाएँ ऑल्ट + F11 को खोलने के लिए अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की.

2। में अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की, क्लिक करें सम्मिलित करें > मॉड्यूल. फिर नीचे दिए गए VBA कोड को कॉपी करके कोड विंडो में पेस्ट करें।

वीबीए कोड: कुछ कॉलमों में गुम/रिक्त मान वाली पंक्तियाँ हटाएँ

Sub DeleteRows()
    Dim I As Integer
    Dim xCount As Integer
    Dim xRg As Range
    Dim xTxt As String
    On Error Resume Next
    If ActiveWindow.RangeSelection.Count > 1 Then
      xTxt = ActiveWindow.RangeSelection.AddressLocal
    Else
      xTxt = ActiveSheet.UsedRange.AddressLocal
    End If
    Set xRg = Application.InputBox("Please select range:", "Kutools for Excel", xTxt, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    If xRg.Areas.Count > 1 Then
        MsgBox "You can’t select multiple ranges to operate", vbInformation, "Kutools for Excel"
        Exit Sub
    End If
    xCount = xRg.Rows.Count
    For I = xCount To 1 Step -1
        If Application.WorksheetFunction.CountBlank(xRg.Rows(I)) > 0 Then
            xRg.Rows(I).EntireRow.Delete
        End If
    Next
End Sub

3। दबाएँ F5 कोड चलाने की कुंजी. फिर एक एक्सेल के लिए कुटूल संवाद बॉक्स पॉप अप होता है, कृपया उस कॉलम श्रेणी का चयन करें जिसे आप जांचना चाहते हैं कि गायब मान मौजूद है या नहीं, और फिर क्लिक करें OK बटन.

क्लिक करने के बाद OK बटन, आप देख सकते हैं कि कॉलम बी और डी में लुप्त मान वाली सभी पंक्तियाँ तुरंत हटा दी गई हैं। स्क्रीनशॉट देखें:

नोट: आप एक ही समय में संचालित करने के लिए एकाधिक रेंज का चयन नहीं कर सकते। यदि एकाधिक कॉलम में गुम मान मौजूद है और आप सभी पंक्तियों को हटाना चाहते हैं, तो आप उपरोक्त चरण 3 को एक कॉलम से दूसरे कॉलम में दोहरा सकते हैं।


Excel में निश्चित मान वाले सभी रिक्त कक्षों को आसानी से भरें

RSI रिक्त कक्ष भरें की उपयोगिता एक्सेल के लिए कुटूल Excel में रिक्त कक्षों को आसानी से संभालने में आपकी सहायता कर सकता है। उदाहरण के लिए, आप किसी चयनित श्रेणी में सभी रिक्त कक्षों को निश्चित मान से भर सकते हैं, ऊपर, नीचे, बाएँ या दाएँ कक्ष में मान के आधार पर रिक्त कक्षों को भर सकते हैं, या आप रिक्त कक्षों को रैखिक मानों से भर सकते हैं। स्क्रीनशॉट देखें:
अभी डाउनलोड करें और इसे आज़माएं! (30 दिन का निःशुल्क ट्रेल)


संबंधित लेख:

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

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

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

Description


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

  • Word, Excel, PowerPoint में टैब्ड संपादन और रीडिंग सक्षम करें, प्रकाशक, एक्सेस, विसियो और प्रोजेक्ट।
  • नई विंडो के बजाय एक ही विंडो के नए टैब में एकाधिक दस्तावेज़ खोलें और बनाएं।
  • आपकी उत्पादकता 50% बढ़ जाती है, और आपके लिए हर दिन सैकड़ों माउस क्लिक कम हो जाते हैं!
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations