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

एक्सेल में डुप्लिकेट के आधार पर एकाधिक पंक्तियों को एक में कैसे संयोजित करें?

लेखक: ज़ियाओयांग अंतिम संशोधित: 2015-12-30

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

दस्तावेज़-उन्नत-संयोजन1 -2 दस्तावेज़-उन्नत-संयोजन2

क्या आपके पास इस समस्या को हल करने के कुछ प्रभावी तरीके हैं?

VBA कोड के साथ एकाधिक डुप्लिकेट पंक्तियों को एक में संयोजित करें

Excel के लिए एकाधिक डुप्लिकेट पंक्तियों को एक कुटूल में संयोजित करें

एक्सेल के लिए कुटूल के साथ एकाधिक डुप्लिकेट पंक्तियों को संयोजित करें और मानों का योग/औसत करें


तीर नीला दायां बुलबुलाVBA कोड के साथ एकाधिक डुप्लिकेट पंक्तियों को एक में संयोजित करें

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

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

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

VBA कोड: एकाधिक पंक्तियों को एक में संयोजित करें

Sub CombineRows()
'Update 20131202
Dim WorkRng As Range
Dim Dic As Variant
Dim arr As Variant
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Set Dic = CreateObject("Scripting.Dictionary")
arr = WorkRng.Value
For i = 1 To UBound(arr, 1)
    xvalue = arr(i, 1)
    If Dic.Exists(xvalue) Then
        Dic(arr(i, 1)) = Dic(arr(i, 1)) & " " & arr(i, 2)
    Else
        Dic(arr(i, 1)) = arr(i, 2)
    End If
Next
Application.ScreenUpdating = False
WorkRng.ClearContents
WorkRng.Range("A1").Resize(Dic.Count, 1) = Application.WorksheetFunction.Transpose(Dic.keys)
WorkRng.Range("B1").Resize(Dic.Count, 1) = Application.WorksheetFunction.Transpose(Dic.items)
Application.ScreenUpdating = True
End Sub

3। फिर दबायें F5 कुंजी, और एक प्रॉम्प्ट बॉक्स आपको उस श्रेणी का चयन करने की याद दिलाने के लिए प्रकट होता है जिसे आपको संयोजित करने की आवश्यकता है। स्क्रीनशॉट देखें:

दस्तावेज़-उन्नत-संयोजन3

4। और फिर क्लिक करें OK, कॉलम बी में मानों को एक रिकॉर्ड में जोड़ दिया गया है और रिक्त स्थान से अलग कर दिया गया है।

दस्तावेज़-उन्नत-संयोजन4

टिप्पणियाँ:

1. यह कोड मूल डेटा को नष्ट कर सकता है, जब आप इसका उपयोग करते हैं, तो बेहतर होगा कि आप पहले डेटा का बैकअप ले लें।

2. यह कोड केवल दो कॉलम के लिए लागू होता है, यदि आपके पास दो से अधिक कॉलम हैं, तो यह कोड केवल पहले दो कॉलम को संयोजित करेगा और अन्य कॉलम डेटा को हटा देगा। जब आप इस कोड का उपयोग करते हैं, तो आपको सावधान रहना चाहिए।


तीर नीला दायां बुलबुलाExcel के लिए एकाधिक डुप्लिकेट पंक्तियों को एक कुटूल में संयोजित करें

अब चूँकि उपरोक्त कोड की कुछ सीमाएँ और जोखिम हैं, तो क्या इस कार्य को पूरा करने का कोई आसान और सुरक्षित तरीका है? साथ एक्सेल के लिए कुटूलहै उन्नत संयोजन पंक्तियाँ उपयोगिता, आप जिन कॉलमों पर आधारित हैं उनमें से कई डुप्लिकेट पंक्तियों को तुरंत हटा सकते हैं और अन्य रिकॉर्ड के लिए उपयुक्त कोशिकाओं में मर्ज या कुछ गणना कर सकते हैं।

एक्सेल के लिए कुटूल इसमें 300 से अधिक उपयोगी एक्सेल टूल शामिल हैं। 30 दिनों में बिना किसी सीमा के प्रयास करने के लिए निःशुल्क। अब समझे.

एक्सेल के लिए कुटूल स्थापित करने के बाद, कृपया निम्नानुसार कार्य करें:

1. उस श्रेणी डेटा का चयन करें जिसे आप डुप्लिकेट को संयोजित करना चाहते हैं।

दस्तावेज़-उन्नत-संयोजन5

2। तब दबायें कुटूल > सामग्री परिवर्तक > उन्नत संयोजन पंक्तियाँ. स्क्रीनशॉट देखें:

दस्तावेज़-उन्नत-संयोजन6

3. में उन्नत संयोजन पंक्तियाँ संवाद बॉक्स में, उन कुंजी स्तंभों के रूप में स्तंभ नाम का चयन करें जिनके आधार पर आप मानों को संयोजित करना चाहते हैं, और फिर क्लिक करें मुख्य स्तंभ. स्क्रीनशॉट देखें:

दस्तावेज़-उन्नत-संयोजन7

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

दस्तावेज़-उन्नत-संयोजन8

5. सेटिंग्स ख़त्म करने के बाद क्लिक करें OK, और आपका डेटा मुख्य कॉलमों के आधार पर मर्ज कर दिया जाएगा और विभाजकों द्वारा अलग कर दिया जाएगा।

दस्तावेज़-उन्नत-संयोजन9

नोट: यदि आपको बाकी कॉलमों के लिए संचालन सेट करने की आवश्यकता नहीं है, तो बस डिफ़ॉल्ट स्थिति बनाए रखें।


तीर नीला दायां बुलबुलाएक्सेल के लिए कुटूल के साथ एकाधिक डुप्लिकेट पंक्तियों को संयोजित करें और मानों का योग/औसत करें

इस बहुक्रियाशील के साथ उन्नत संयोजन पंक्तियाँ उपयोगिता, आप डुप्लिकेट पंक्तियों को जोड़ सकते हैं और मानों के लिए कुछ गणना भी कर सकते हैं।

1. उस श्रेणी डेटा का चयन करें जिसे आप डुप्लिकेट को संयोजित करना चाहते हैं।

2। इस पर जाएं उन्नत संयोजन पंक्तियाँ संवाद बकस;

  • (1.) कुंजी कॉलम के रूप में एक कॉलम नाम का चयन करें जिसके आधार पर आप अन्य कॉलम मानों की गणना करना चाहते हैं, और फिर क्लिक करें मुख्य स्तंभ;
  • (2.) उस कॉलम का चयन करें जिसके मूल्यों के लिए आपको कुछ गणना करने की आवश्यकता है, और फिर क्लिक करें संक्रियाओं को संयोजित करें > संयुक्त गणना करें, फिर एक गणना प्रकार चुनें जिसकी आपको आवश्यकता है, इस मामले में, मैं चुनता हूं राशि. स्क्रीनशॉट देखें:

दस्तावेज़-उन्नत-संयोजन10

3. यदि आपको बाकी कॉलमों के लिए संचालन सेट करने की आवश्यकता नहीं है, तो बस डिफ़ॉल्ट स्थिति रखें, फिर क्लिक करें OK, और कॉलम ए में डुप्लिकेट मान विलय कर दिए जाएंगे और कॉलम बी में उनके संबंधित मान जोड़ दिए जाएंगे। स्क्रीनशॉट देखें:

दस्तावेज़-उन्नत-संयोजन11 -2 दस्तावेज़-उन्नत-संयोजन12

टिप्पणियाँ:

1. यदि आप जाँच करते हैं मेरे डेटा में हेडर हैं विकल्प, जब आप इस उपयोगिता को लागू करेंगे तो श्रेणी के आपके हेडर (पहली पंक्ति) को नजरअंदाज कर दिया जाएगा।

2. स्वरूपित मानों का उपयोग करें: यह डुप्लिकेट कोशिकाओं के संयोजन के बाद मानों का स्वरूपण बनाए रखेगा।

3. यह उपयोगिता डेटा फ़िल्टर करने के लिए उपलब्ध नहीं है।

इस उन्नत संयोजन पंक्ति फ़ंक्शन के बारे में अधिक जानने के लिए क्लिक करें।


संबंधित लेख:

डुप्लिकेट पंक्तियों को संयोजित करें और मानों का योग करें

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

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

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

Description


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

  • Word, Excel, PowerPoint में टैब्ड संपादन और रीडिंग सक्षम करें, प्रकाशक, एक्सेस, विसियो और प्रोजेक्ट।
  • नई विंडो के बजाय एक ही विंडो के नए टैब में एकाधिक दस्तावेज़ खोलें और बनाएं।
  • आपकी उत्पादकता 50% बढ़ जाती है, और आपके लिए हर दिन सैकड़ों माउस क्लिक कम हो जाते हैं!
Comments (8)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
I have used the code above successfully in the past however today, it is deleting column B. Looks like it's just removing duplicates...not sure what the issue is.

Sample Data
Reece, Ashley G01-Registered-UWG
Reece, Chris G02-Registered-KSU
Reece, Chris G03-Dropped-KSU
Reece, Jayden G02-Registered-UNG
Reece, Jayden G02-Withdrawn-UNG
This comment was minimized by the moderator on the site
I have in column A

1 Cast
2 Crew
3 Hiring
4 Cast
5 Hiring
6 Crew

I need these unique CAST CREW AND HIRING in another column without delete in column A entries.

Ex: I need (after formula)

1 Cast
2 Crew
3 Hiring

Is it possible by formula?
This comment was minimized by the moderator on the site
Above Macro only Combine the limited cell(e.g 20 cells) in b column. How to Combine more cells
This comment was minimized by the moderator on the site
Same - 2021 and this still only works if you have like 20 rows...
This comment was minimized by the moderator on the site
I've found that the "Combine multiple duplicate rows and sum/average the values" feature within KUTools does not work if the numbers in the row have a comma or period. This makes the tool unusable for combining and summing currency fields (which is why I tried the product in first place). I'm currently using the trial version which states that it is full-functioned; is it possible that this works in the paid version?
This comment was minimized by the moderator on the site
Same here. I was about to purchase because the tools are very nice, but figured I would try it first. Combine never works. I tried it for about 3 weeks now and it always locks up. No matter the power of my computer (ran on my at home powerhouse computer, same issue)
I kept cutting down to less and less data to see if it would work but it still would not.
The last one I tried was 4 columns and 100k rows and it still locked up. Not very useful unless you have like < 100 rows or something.
This comment was minimized by the moderator on the site
Same here, I filtered my data all the way down to 4 columns and 100k rows and it still work not work. I have tried this for 3 weeks now and unable to successfully complete my task. Kutools will only work if you have very few rows.
This comment was minimized by the moderator on the site
[quote]I've found that the "Combine multiple duplicate rows and sum/average the values" feature within KUTools does not work if the numbers in the row have a comma or period. This makes the tool unusable for combining and summing currency fields (which is why I tried the product in first place). I'm currently using the trial version which states that it is full-functioned; is it possible that this works in the paid version?By David Greene[/quote] Sorry, we will fix it in next version.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations