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

Excel में समूह के आधार पर पंक्तियों को एक कक्ष में कैसे संयोजित करें?

लेखक: रवि अंतिम संशोधित: 2020-08-18

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

सूत्रों और फ़िल्टर फ़ंक्शन के साथ समूह बनाएं और संयोजित करें

वीबीए कोड के साथ समूह बनाएं और संयोजित करें

उन्नत संयोजन पंक्तियों के साथ समूह बनाएं और संयोजित करेंअच्छा विचार3


सूत्रों और फ़िल्टर फ़ंक्शन के साथ समूह बनाएं और संयोजित करें

एक्सेल में, आप एक कॉलम के आधार पर संयोजित पंक्तियों में सूत्र लागू कर सकते हैं, फिर केवल परिणाम प्रदर्शित करने के लिए फ़िल्टर फ़ंक्शन का उपयोग कर सकते हैं।

नोट: निम्नलिखित चरणों से पहले आपको अपने डेटा को कक्षा के अनुसार क्रमबद्ध करना होगा।

1. डेटा श्रेणी के आगे एक रिक्त कक्ष में, उदाहरण के लिए, C13, इस सूत्र को टाइप करें =IF(A13=A12,C12&", "&B13,B13), दबाएँ Enter कुंजी भरें और भरण हैंडल को खींचकर कक्षों में सूत्र भरें।
दस्तावेज़ को समूह 2 द्वारा संयोजित करें

सूत्र में, A13 "क्लास" कॉलम में पहला डेटा है, B13 "नाम" कॉलम में पहला डेटा है, "," संयोजित सामग्री को सीमित करने के लिए विभाजक है।

2. फिर अगले कॉलम D13 में यह फॉर्मूला टाइप करें =IF(A13<>A14,"Last","") , और अपनी आवश्यक कोशिकाओं पर सूत्र लागू करने के लिए भरण हैंडल को नीचे खींचें।
दस्तावेज़ को समूह 3 द्वारा संयोजित करें

3. अब फॉर्मूले सहित सभी डेटा रेंज का चयन करें और क्लिक करें जानकारी > Filter जोड़ने के लिए Filter icons डेटा के लिए
दस्तावेज़ को समूह 4 द्वारा संयोजित करें

4. क्लिक करें Filter icon अंतिम सूत्र शीर्षलेख में, जाँचें Last केवल ड्रॉप-डाउन सूची से चेकबॉक्स, और क्लिक करें OK.
दस्तावेज़ को समूह 5 द्वारा संयोजित करें

अब परिणाम नीचे दिखाया गया है, यदि आपको कभी इसकी आवश्यकता नहीं है तो आप अंतिम सहायक कॉलम को हटा सकते हैं।
दस्तावेज़ को समूह 6 द्वारा संयोजित करें


वीबीए कोड के साथ समूह बनाएं और संयोजित करें

यहां एक वीबीए कोड है जो इस काम को भी संभाल सकता है।

1। दबाएँ Alt + F11 सक्षम करने के लिए कुंजियाँ Microsoft Visual Basic for Applications खिड़की.

2. फिर विंडो में क्लिक करें Tools > References सक्षम करने के लिए References संवाद, और जाँच करें Microsoft Scripting Runtime. स्क्रीनशॉट देखें:
दस्तावेज़ को समूह 7 द्वारा संयोजित करें
दस्तावेज़ को समूह 8 द्वारा संयोजित करें

3। क्लिक करें OK, और क्लिक करें Insert > Module VBA विंडो में, और नीचे VBA कोड को कॉपी और पेस्ट करें Module लिखी हुई कहानी। स्क्रीनशॉट देखें:

वीबीए: समूह के आधार पर पंक्तियों को एक सेल में संयोजित करें

  Sub ConcatenateCellsIfSameValues()
'UpdatebyExtendoffice20180201
    Dim I As Long
    Dim J As Long
    Dim xRg As Range
    Dim xRgKey As Range
    Dim xRgVal As Range
    Dim xStr As String
    Dim xDic As New Dictionary
    On Error Resume Next
    Set xRg = Application.InputBox("Select data range", "KuTools for Excel", Selection.Address, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    Set xRgKey = Application.InputBox("Select key column", "KuTools for Excel", xRg.Columns(1).Address, , , , , 8)
    If xRgKey Is Nothing Then
        MsgBox "Key column cannot be empty", vbInformation, "KuTools for Excel"
    End If
    Set xRgVal = xRg(1).Offset(, 1).Resize(xRg.Rows.Count, xRg.Columns.Count - 1)
    For I = 1 To xRgKey.Count
        If I > xRgKey.Count Then Exit For
        xStr = ""
        For J = 1 To xRgVal.Columns.Count
            xStr = xStr & " " & xRgVal(I, J)
        Next
        If xDic.Exists(xRgKey(I).Text) Then
            xDic(xRgKey(I).Text) = xDic(xRgKey(I).Text) & xStr
            xRgKey(I).EntireRow.Delete
            I = I - 1
       Else
            xDic.Add xRgKey(I).Text, xStr
        End If
    Next
    For I = 1 To xRgVal.Count
        xRgVal(I).Value = xDic(xRgKey(I).Text)
    Next
End Sub

दस्तावेज़ को समूह 9 द्वारा संयोजित करें

4। दबाएँ F5 कुंजी, और पॉपिंग संवाद में आपके द्वारा उपयोग की जाने वाली डेटा श्रेणी का चयन करें।
दस्तावेज़ को समूह 10 द्वारा संयोजित करें

5। क्लिक करें OK उस कुंजी कॉलम का चयन करने के लिए जिसके आधार पर आप समूह बनाना चाहते हैं।
दस्तावेज़ को समूह 11 द्वारा संयोजित करें

6। क्लिक करें OK, अब परिणाम नीचे दिखाया गया है:
दस्तावेज़ को समूह 12 द्वारा संयोजित करें


उन्नत संयोजन पंक्तियों के साथ समूह बनाएं और संयोजित करें

यहाँ एक उपयोगिता है एक्सेल के लिए कुटूल, Advanced Combine पंक्तियाँ, जो एक्सेल में कुंजी कॉलम के आधार पर पंक्तियों को जोड़ सकता है या गणना कर सकता है।

एक्सेल के लिए कुटूल, से अधिक के साथ 300 सुविधाजनक कार्य, आपके कार्यों को और अधिक आसान बनाते हैं। 

स्थापित करने के बाद एक्सेल के लिए कुटूल, कृपया नीचे दिए अनुसार कार्य करें:(अब एक्सेल के लिए नि:शुल्क कुटूल डाउनलोड करें!)

1. आपके द्वारा उपयोग की जाने वाली डेटा श्रेणी का चयन करें और क्लिक करें Kutools > विलय और विभाजन > उन्नत संयोजन पंक्तियाँ.
दस्तावेज़ को समूह 13 द्वारा संयोजित करें

2। में Advanced Combine Rows विंडो, वह कॉलम चुनें जिसके आधार पर आप पंक्तियों को संयोजित करना चाहते हैं और क्लिक करें Primary Key इसे कुंजी कॉलम के रूप में सेट करने के लिए।
दस्तावेज़ को समूह 14 द्वारा संयोजित करें

3. उस कॉलम का चयन करें जिसे आपको संयोजित करना है, क्लिक करें Combine, और एक सीमांकक चुनें जिसका उपयोग आप संयुक्त सामग्री को अलग करने के लिए करते हैं।

दस्तावेज़ को समूह 15 द्वारा संयोजित करें दस्तावेज़ तीर दाएँ दस्तावेज़ को समूह 16 द्वारा संयोजित करें

4। क्लिक करें Ok. परिणाम इस प्रकार दिखाया गया है:
दस्तावेज़ को समूह 17 द्वारा संयोजित करें

नोट: उपयोगिता लागू करने से पहले, बेहतर होगा कि आपके पास मूल डेटा की एक प्रति हो।

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

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

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

Description


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

  • Word, Excel, PowerPoint में टैब्ड संपादन और रीडिंग सक्षम करें, प्रकाशक, एक्सेस, विसियो और प्रोजेक्ट।
  • नई विंडो के बजाय एक ही विंडो के नए टैब में एकाधिक दस्तावेज़ खोलें और बनाएं।
  • आपकी उत्पादकता 50% बढ़ जाती है, और आपके लिए हर दिन सैकड़ों माउस क्लिक कम हो जाते हैं!
Comments (2)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
la formule excel détaillée plus haut ne fonctionne pas, il y a un problème=IF(A13=A12,C12&", "&B13,B13)
This comment was minimized by the moderator on the site
Hi, could you repeat the qustion in English? This formula I have tried again, it is correct.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations