एक्सेल में डेटा रेंज से अद्वितीय मान कैसे प्राप्त करें?


2

मेरे पास एक कॉलम है जिसकी पंक्तियाँ हैं:

Facebook, Skype
Facebook, Skype
Facebook, Twitter, Skype
Facebook, Twitter
Facebook, Skype
Facebook, Skype
Facebook, Twitter, Skype
Facebook, Skype, Instagram, Niber

मैं इस डेटा श्रेणी से केवल अनन्य मान कैसे चुन सकता हूं ताकि परिणाम हो:

फेसबुक, स्काइप, ट्विटर, इंस्टाग्राम, Viber


क्या इस कॉलम के दाईं ओर कॉलम खाली हैं?
जेसन एलर

@ जैसनऑलर हाँ। बस कहने के लिए, यह सब एक कॉलम में है ..
एसो टेरिक

जवाबों:


2

मान लें कि हमारे पास कॉलम A में इस तरह का डेटा है :

यहां छवि विवरण दर्ज करें

इस VBA मैक्रो को चलाना:

Sub GatherUniques()
    Dim N As Long, cl As Collection
    Dim i As Long
    Set cl = New Collection
    N = Cells(Rows.Count, "A").End(xlUp).Row
    On Error Resume Next

    For i = 1 To N
        st = Replace(Cells(i, 1).Text, " ", "")
        ary = Split(st, ",")
        For Each a In ary
            cl.Add a, CStr(a)
        Next a
    Next i

    On Error GoTo 0
    st = cl.Item(1)
    For i = 2 To cl.Count
        st = st & "," & cl.Item(i)
    Next i
    Range("B1").Value = st
End Sub

उत्पादन करेंगे:

यहां छवि विवरण दर्ज करें

मैक्रोज़ को स्थापित करना और उपयोग करना बहुत आसान है:

  1. ALT-F11 VBE विंडो लाता है
  2. ALT-I ALT-M एक नया मॉड्यूल खोलता है
  3. सामान पेस्ट करें और VBE विंडो बंद करें

यदि आप कार्यपुस्तिका को सहेजते हैं, तो मैक्रो इसके साथ सहेजा जाएगा। यदि आप बाद में 2003 के एक्सेल के संस्करण का उपयोग कर रहे हैं, तो आपको .xlsx के बजाय .xlsm के रूप में फ़ाइल को सहेजना होगा

मैक्रो को हटाने के लिए:

  1. ऊपर के रूप में VBE विंडो लाएं
  2. कोड साफ़ करें
  3. VBE विंडो बंद करें

Excel से मैक्रो का उपयोग करने के लिए:

  1. ALT-F8
  2. मैक्रो का चयन करें
  3. RUN स्पर्श करें

सामान्य रूप से मैक्रोज़ के बारे में अधिक जानने के लिए, देखें:

http://www.mvps.org/dmcritchie/excel/getstarted.htm

तथा

http://msdn.microsoft.com/en-us/library/ee814735(v=office.14).aspx

इसके लिए मैक्रोज़ को सक्षम होना चाहिए!


सुपर जटिल लग रहा है, लेकिन यह काम करता है, धन्यवाद!
एसो टेरिक

0

मैं नोटपैड ++ या एमएस शब्द का उपयोग करता हूं। इसमें कॉलम कॉपी / पेस्ट करें। टैब द्वारा "खोजें / बदलें", "। एक्सेल में वापस कॉपी / पेस्ट करें। या यदि यह वर्कशीट में एकमात्र डेटा है तो आप इसे एक csv फ़ाइल के रूप में सहेजने और इसे वापस एक्सेल में खोलने का प्रयास कर सकते हैं।


अगर मैं इसे सीएसवी को निर्यात करता हूं तो मैं इसे अजगर में भी कर सकता हूं :) दुर्भाग्य से मुझे इसे एक्सेल में करना होगा
एसो टेरिक

0

डेटा के तहत "टेक्स्ट टू कॉलम" बटन का उपयोग करें और विज़ार्ड में "सीमांकित" और "अल्पविराम" चुनें। यह डेटा को अलग-अलग बिट्स में विभाजित करेगा जो अद्वितीय मानों को हथियाने के लिए अगले चरण की अनुमति देगा।

फिर डेटा के तहत प्रत्येक कॉलम के लिए "एडवांस फिल्टर" और "लिस्ट टू अदर लोकेशन" का चयन करें, "लिस्ट रेंज" के लिए डेटा के नए विस्तारित रेंज में से एक कॉलम चुनें और "यूनिक रिकॉर्ड्स ओनली" चेक करें और "कॉपी टू" चुनें स्थान।

वैकल्पिक रूप से आप एक दूसरे के नीचे विभाजित कॉलम को कॉपी कर सकते हैं और एक बार उन्नत फ़िल्टर कर सकते हैं।

अल्पविराम द्वारा अलग किए गए एकल कक्ष में टकराव कई तरीकों से किया जा सकता है।

हमारी साइट का प्रयोग करके, आप स्वीकार करते हैं कि आपने हमारी Cookie Policy और निजता नीति को पढ़ और समझा लिया है।
Licensed under cc by-sa 3.0 with attribution required.