আপনার এক্সেলে সারি একীকরণের 2 সহজ উপায়

এক্সেলে ডেটা বিশ্লেষণ করার সময়, আপনি দেখতে পারেন যে এতে একাধিক সদৃশ সারি রয়েছে। এই ক্ষেত্রে, আপনি হয়তো দ্রুত সারিগুলো একত্রিত করতে চাইবেন। এই পোস্টে এটি করার দুটি দ্রুত উপায় জানানো হবে।

অনেক ব্যবহারকারীর ঘন ঘন ডুপ্লিকেট সারিগুলি মার্জ করতে হবে এবং এক্সেলের মধ্যে অনুসারে মানগুলি যোগ করতে হবে। উদাহরণস্বরূপ, আমার এক্সেল ওয়ার্কশিটে অনেকগুলি ডেটা রয়েছে যাতে নিম্নলিখিত স্ক্রিনশটের মতো প্রচুর পরিমাণে সদৃশ এন্ট্রি রয়েছে। সুতরাং, আমি নকল সারি একত্রিত করতে এবং অন্য কলামে সংশ্লিষ্ট মানগুলি যোগ করতে চাই। আমি ম্যানুয়ালি এটি করলে এটি অবশ্যই কষ্টকর হবে। সুতরাং, আমি এটি উপলব্ধি করার জন্য নিম্নলিখিত 2 টি উপায় ব্যবহার করি util

পদ্ধতি 1: "একীকরণ" ফাংশন ব্যবহার করুন

1. প্রথমে, একটি ফাঁকা ঘরে ক্লিক করুন যেখানে আপনি মার্জ এবং সংযুক্ত ডেটা রাখতে চান।
2. তারপরে, "ডেটা" ট্যাবে ফিরে যান এবং "একীকরণ" বোতামে ক্লিক করুন।
3. পপআপ ডায়লগ বাক্সে, "ফাংশন" বাক্সে "যোগ" নির্বাচন করা হয়েছে তা নিশ্চিত করুন।
4. পরবর্তী, এ ক্লিক করুন  বোতাম.
5. পরে, আপনি যে সীমাটি একত্রিত করতে চান তা নির্বাচন করুন এবং ক্লিক করুন  বোতাম.
6. এর পরে, "একীকরণ" ডায়ালগের "যোগ করুন" বোতামটি ক্লিক করুন।
7. এরপরে, "শীর্ষ সারি" এবং "বাম কলাম" বিকল্পটি চেক করুন।
8. শেষ পর্যন্ত, "ওকে" বোতামটি ক্লিক করুন।
9. একবারে, সারিগুলি একীভূত করা হয়, যেমন নীচের স্ক্রিনশটটিতে দেখানো হয়েছে।

পদ্ধতি 2: এক্সেল ভিবিএ কোড ব্যবহার করুন

1. একেবারে শুরুতে, আপনি যে সীমাটি চান তা নির্বাচন করুন।
2. তারপরে, ভিবিএ সম্পাদক অনুসারে ট্রিগার করুনআপনার এক্সেলে কীভাবে ভিবিএ কোড চালাবেন"।
3. এরপরে, নিম্নলিখিত ভিবিএ কোডটি একটি মডিউলে অনুলিপি করুন।

Sub MergeRowsSumValues()
    Dim objSelectedRange As Excel.Range
    Dim varAddressArray As Variant
    Dim nStartRow, nEndRow As Integer
    Dim strFirstColumn, strSecondColumn As String
    Dim objDictionary As Object
    Dim nRow As Integer
    Dim objNewWorkbook As Excel.Workbook
    Dim objNewWorksheet As Excel.Worksheet
    Dim varItems, varValues As Variant
 
    On Error GoTo ErrorHandler
    Set objSelectedRange = Excel.Application.Selection
    varAddressArray = Split(objSelectedRange.Address(, False), ":")
    nStartRow = Split(varAddressArray(0), "$")(1)
    strFirstColumn = Split(varAddressArray(0), "$")(0)
    nEndRow = Split(varAddressArray(1), "$")(1)
    strSecondColumn = Split(varAddressArray(1), "$")(0)
 
    Set objDictionary = CreateObject("Scripting.Dictionary")
 
    For nRow = nStartRow To nEndRow
        strItem = ActiveSheet.Range(strFirstColumn & nRow).Value
        strValue = ActiveSheet.Range(strSecondColumn & nRow).Value
  
        If objDictionary.Exists(strItem) = False Then
           objDictionary.Add strItem, strValue
        Else
           objDictionary.Item(strItem) = objDictionary.Item(strItem) + strValue
        End If
    Next
 
    Set objNewWorkbook = Excel.Application.Workbooks.Add
    Set objNewWorksheet = objNewWorkbook.Sheets(1)
 
    varItems = objDictionary.keys
    varValues = objDictionary.items
 
    nRow = 0
    For i = LBound(varItems) To UBound(varItems)
        nRow = nRow + 1
        With objNewWorksheet
             .Cells(nRow, 1) = varItems(i)
             .Cells(nRow, 2) = varValues(i)
        End With
    Next
    objNewWorksheet.Columns("A:B").AutoFit
 
ErrorHandler:
    Exit sub
End Sub

4. এরপরে, এখন এই ম্যাক্রোটি চালানোর জন্য "F5" টিপুন।
5. ম্যাক্রো শেষ হয়ে গেলে, একটি নতুন এক্সেল ওয়ার্কবুক প্রদর্শিত হবে, যাতে আপনি নীচের চিত্রের মতো মার্জড সারি এবং সংযুক্ত ডেটা দেখতে পাবেন।

তুলনা

যখন এক্সেল ক্রাশের মুখোমুখি হন

যেমনটি আমরা সবাই জানি, এক্সেল সময়ে সময়ে ক্রাশ হতে পারে। এই পরিস্থিতিতে সবচেয়ে খারাপ সময়ে, বর্তমান এক্সেল ফাইলটি সরাসরি দূষিত হতে পারে। সেই সময়, আপনার চেষ্টা ছাড়া কোন উপায় নেই এক্সেল পুনরুদ্ধার। এটি আপনাকে পেশাদারদের সাহায্যের জন্য জিজ্ঞাসা করার জন্য বা বিশেষায়িত এক্সেল মেরামতের সরঞ্জাম ব্যবহার করার অনুরোধ করবে, যেমন DataNumen Excel Repair.

লেখকের ভূমিকা:

শিরলে জাং একটি ডেটা রিকভারি বিশেষজ্ঞ DataNumen, ইনক। যা তথ্য পুনরুদ্ধারের প্রযুক্তিগুলির সহ বিশ্বের শীর্ষস্থানীয় দূষিত SQL Server এবং আউটলুক মেরামত সফ্টওয়্যার পণ্য। আরো তথ্যের জন্য, যান WWW.datanumen.com