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

Excel में केवल दृश्यमान कोशिकाओं को कैसे संयोजित करें? 

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

यदि आपके पास फ़िल्टर किए गए डेटा की एक सूची है, तो अब, आपको निम्नलिखित संयुक्त परिणाम प्राप्त करने के लिए केवल दृश्यमान कोशिकाओं को संयोजित करना होगा और छिपी हुई कोशिकाओं को अनदेखा करना होगा। आप एक्सेल में इस कार्य को जल्दी और आसानी से कैसे पूरा कर सकते हैं?

दस्तावेज़ दृश्यमान कोशिकाओं को संयोजित करें 1

केवल दृश्यमान सेल मानों को VBA कोड के साथ एक सेल में जोड़ें


तीर नीला दायां बुलबुला केवल दृश्यमान सेल मानों को VBA कोड के साथ एक सेल में जोड़ें

आप एक बना सकते हैं उपयोगकर्ता परिभाषित फ़ंक्शन इस कार्य को हल करने के लिए, कृपया निम्नलिखित चरणों का पालन करें:

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

2। क्लिक करें सम्मिलित करें > मॉड्यूल, और निम्नलिखित कोड को इसमें पेस्ट करें मॉड्यूल खिड़की।

VBA कोड: केवल दृश्यमान सेल मानों को जोड़ें:

Private Function ConcatenateVisible(xRg As Variant, sptChar As String)
'Updateby Extendoffice
    Dim rg As Range
    For Each rg In xRg
        If (rg.EntireRow.Hidden = False) And (rg.EntireColumn.Hidden = False) Then
            ConcatenateVisible = ConcatenateVisible & rg.Value & sptChar
        End If
    Next
    ConcatenateVisible = Left(ConcatenateVisible, Len(ConcatenateVisible) - Len(sptChar))
End Function

3. फिर इस कोड को सहेजें और बंद करें, वर्कशीट पर वापस जाएं और यह सूत्र दर्ज करें: =संक्षिप्त दृश्यमान(बी2:बी10,"-") (B2: B10 वह फ़िल्टर की गई डेटा श्रेणी है जिसे आप संयोजित करना चाहते हैं, "-"संयुक्त मानों को अलग करने के लिए विभाजक है, आप उन्हें अपनी आवश्यकता के अनुसार बदल सकते हैं।) एक रिक्त कक्ष में जहां आप संयुक्त परिणाम का पता लगाना चाहते हैं, और फिर दबाएँ दर्ज परिणाम प्राप्त करने की कुंजी. स्क्रीनशॉट देखें:

दस्तावेज़ दृश्यमान कोशिकाओं को संयोजित करें 2

नोट: इस उपयोगकर्ता परिभाषित फ़ंक्शन के साथ, संयुक्त परिणाम आपके फ़िल्टर किए गए डेटा के साथ गतिशील रूप से बदल जाएगा, उदाहरण के लिए, यदि आप केटीओ के उत्पाद को फ़िल्टर करते हैं, तो आपका संयुक्त परिणाम नए फ़िल्टर किए गए डेटा में बदल जाएगा। स्क्रीनशॉट देखें:

दस्तावेज़ दृश्यमान कोशिकाओं को संयोजित करें 3

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

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

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

Description


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

  • Word, Excel, PowerPoint में टैब्ड संपादन और रीडिंग सक्षम करें, प्रकाशक, एक्सेस, विसियो और प्रोजेक्ट।
  • नई विंडो के बजाय एक ही विंडो के नए टैब में एकाधिक दस्तावेज़ खोलें और बनाएं।
  • आपकी उत्पादकता 50% बढ़ जाती है, और आपके लिए हर दिन सैकड़ों माउस क्लिक कम हो जाते हैं!
Comments (3)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Try to use this but not working
This comment was minimized by the moderator on the site
Hello, is there a way to use this concatenatevisible function with a textjoin function?
This comment was minimized by the moderator on the site
You guys are awesome in excel
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations