Excel में एक साथ कई रिक्त पंक्तियों या स्तंभों को Excel में कैसे छिपाएँ?
रिक्त पंक्तियों या स्तंभों को छिपाने या हटाने से आपको वर्कशीट को संक्षिप्त करने में मदद मिल सकती है, इस लेख में, मैं आपको एक्सेल वर्कशीट में रिक्त पंक्तियों या स्तंभों को छिपाने या हटाने के कुछ त्वरित तरीकों से परिचित कराऊंगा।
VBA कोड के साथ अनेक रिक्त पंक्तियों या स्तंभों को शीघ्रता से छिपाएँ
एक्सेल के लिए कुटूल के साथ कई रिक्त पंक्तियों या स्तंभों को तुरंत हटाएं
VBA कोड के साथ अनेक रिक्त पंक्तियों या स्तंभों को शीघ्रता से छिपाएँ
निम्नलिखित VBA कोड आपको वर्कशीट में कई रिक्त पंक्तियों या स्तंभों को जल्दी और आसानी से छिपाने में मदद कर सकता है।
1. दबाए रखें ALT + F11 कुंजी को खोलने के लिए अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की.
2. क्लिक करें सम्मिलित करें > मॉड्यूल, और निम्नलिखित कोड को इसमें पेस्ट करें मॉड्यूल खिड़की।
वीबीए कोड: वर्कशीट में एकाधिक रिक्त पंक्तियाँ छिपाएँ
Sub HideEmpties()
'Updateby Extendoffice
Dim xRg As Range
Dim xTxt As String
Dim xCell As Range
Dim I As Long
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 the data range:", "Kutools for Excel", xTxt, , , , , 8)
If xRg Is Nothing Then Exit Sub
On Error Resume Next
For I = 1 To xRg.Row + xRg.Rows.Count
If Application.WorksheetFunction.CountA(xRg.Rows(I)) = 0 Then
xRg.Rows(I).EntireRow.Hidden = True
End If
Next
End Sub
3। फिर दबायें F5 इस कोड को चलाने के लिए कुंजी, और एक प्रॉम्प्ट बॉक्स आपको उस डेटा श्रेणी का चयन करने की याद दिलाने के लिए प्रदर्शित होता है जिसे आप रिक्त पंक्तियों को छिपाना चाहते हैं, स्क्रीनशॉट देखें:
4। और फिर क्लिक करें OK बटन, रिक्त पंक्तियाँ एक ही बार में छिप जाती हैं, स्क्रीनशॉट देखें:
नोट: एकाधिक रिक्त स्तंभों को छिपाने के लिए, कृपया निम्नलिखित VBA कोड लागू करें:
वीबीए कोड: वर्कशीट में एकाधिक रिक्त कॉलम छुपाएं
Sub HideEmpties()
'Updateby Extendoffice
Dim xRg As Range
Dim xTxt As String
Dim xCell As Range
Dim I As Long
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 the data range:", "Kutools for Excel", xTxt, , , , , 8)
If xRg Is Nothing Then Exit Sub
On Error Resume Next
For I = 1 To xRg.Column + xRg.Columns.Count
If Application.WorksheetFunction.CountA(xRg.Columns(I)) = 0 Then
xRg.Columns(I).EntireColumn.Hidden = True
End If
Next
End Sub
एक्सेल के लिए कुटूल के साथ कई रिक्त पंक्तियों या स्तंभों को तुरंत हटाएं
इस अनुभाग में, मैं इस बारे में बात करूंगा कि किसी श्रेणी, वर्कशीट या वर्कबुक में अवांछित कई रिक्त पंक्तियों या स्तंभों को कैसे हटाया जाए। एक्सेल के लिए कुटूलहै छिपी हुई (दृश्यमान) पंक्तियाँ और कॉलम हटाएँ उपयोगिता इस कार्य को यथाशीघ्र हल करने में आपकी सहायता कर सकती है।
एक्सेल के लिए कुटूल : 300 से अधिक उपयोगी एक्सेल ऐड-इन्स के साथ, 30 दिनों में बिना किसी सीमा के आज़माने के लिए निःशुल्क. |
स्थापित करने के बाद एक्सेल के लिए कुटूल, कृपया निम्नानुसार करें:
1. उस डेटा श्रेणी का चयन करें जिसे आप रिक्त पंक्तियों या स्तंभों को हटाना चाहते हैं, और फिर क्लिक करें कुटूल > मिटाना > छिपी हुई (दृश्यमान) पंक्तियाँ और कॉलम हटाएँ, स्क्रीनशॉट देखें:
2. में छिपी हुई (दृश्यमान) पंक्तियाँ और कॉलम हटाएँ संवाद बॉक्स में, चयन करें चयनित रेंज में in यहां देखो ड्रॉप डाउन सूची (आप अपनी आवश्यकतानुसार इस ड्रॉप डाउन सूची में अन्य विकल्प भी चुन सकते हैं), चयन करें पंक्तियाँ or स्तंभ से प्रकार हटाएँ अनुभाग, और चुनें रिक्त पंक्तियाँ or रिक्त स्तम्भ नीचे विस्तृत प्रकार अनुभाग, स्क्रीनशॉट देखें:
3। और फिर क्लिक करें Ok बटन, चयन में रिक्त पंक्तियाँ या स्तंभ तुरंत हटा दिए गए हैं। स्क्रीनशॉट देखें:
नोट: इस सुविधा के साथ, आप आवश्यकतानुसार चयन, वर्कशीट या वर्कबुक में छिपी हुई पंक्तियों या स्तंभों, दृश्यमान पंक्तियों या स्तंभों को भी हटा सकते हैं।
अभी एक्सेल के लिए नि:शुल्क डाउनलोड कुटूल पर क्लिक करें!
सर्वोत्तम कार्यालय उत्पादकता उपकरण
एक्सेल के लिए कुटूल के साथ अपने एक्सेल कौशल को सुपरचार्ज करें, और पहले जैसी दक्षता का अनुभव करें। एक्सेल के लिए कुटूल उत्पादकता बढ़ाने और समय बचाने के लिए 300 से अधिक उन्नत सुविधाएँ प्रदान करता है। वह सुविधा प्राप्त करने के लिए यहां क्लिक करें जिसकी आपको सबसे अधिक आवश्यकता है...
ऑफिस टैब ऑफिस में टैब्ड इंटरफ़ेस लाता है, और आपके काम को बहुत आसान बनाता है
- Word, Excel, PowerPoint में टैब्ड संपादन और रीडिंग सक्षम करें, प्रकाशक, एक्सेस, विसियो और प्रोजेक्ट।
- नई विंडो के बजाय एक ही विंडो के नए टैब में एकाधिक दस्तावेज़ खोलें और बनाएं।
- आपकी उत्पादकता 50% बढ़ जाती है, और आपके लिए हर दिन सैकड़ों माउस क्लिक कम हो जाते हैं!