কমা-স্থান পৃথকী তালিকা সহ এক্সেল পার্স সেলটি প্রতিটি মানকে সূচক হিসাবে ব্যবহার করে

Question

এক্সেল শীট 1, কলামা হ'ল

1) 3, 2, 4
2) 1

নম্বরগুলি শিট 2, কলাম स्तরে সারি সংখ্যাগুলি উল্লেখ করে, যাতে শনাক্তকারী থাকে

1) foo
2) bar
3) eggs
4) sausage

আমার যেটি শেষ করা উচিত তা হ'ল শীট 1 এর একটি কলাম, যা এতে রয়েছে

1) eggs, bar, sausage
2) foo

আমি নিশ্চিত যে আমি পাইথন স্ক্রিপ্ট দিয়ে এটি করতে পারি তবে এটি এক্সেলে করা পছন্দ করা। দুর্ভাগ্যক্রমে, আমি খুব কমই ভিবিএ সম্পর্কে একটি জিনিস জানি।

কলামগুলিতে পাঠ্যগুলি এটি করবে না: আপনি একটি নতুন শীটে লক্ষ্যবস্তু করতে পারবেন না, তবে শীট 1 কলামে একটি ঘরে কোনও সংখ্যক আইটেম থাকতে পারে।

সম্পাদনা করুন: VLOOKUP এখানে কাজ করবে না, যেমন এটি সেল সামগ্রীর দ্বারা দেখা যাচ্ছে । এখানে, আমি সেল রেফারেন্স অনুসারে সন্ধান করতে চাই । INDEX করত, যদি আমি এটি একটি কক্ষে অনেকগুলি কমা-স্পেস-বিভাজিত মানগুলিতে পুনরাবৃত্তি করতে পারি। আমার প্রথমে ঘরের মানগুলি পার্স করা উচিত এবং তারপরে প্রতিটিটির জন্য অনুরূপ লুকিংয়ের মান সন্ধান করতে কিছু প্রকার INDEX ব্যবহার করা উচিত।

Comments

@ টাইসন ভিউলআপ এখানে কাজ করবে না, সম্পাদনা দেখুন। এটি কোনও হোমওয়ার্কের প্রশ্নও নয়। এটি একটি কাজের প্রশ্ন, মূল বিষয়গুলি ভেঙে দেওয়া।

— রল্ফব্লি

Answer 1

এই ভিবিএ কোডটি কৌশলটি সম্পাদন করবে:

Public Function mysearch(value As String)
    Dim myrows() As String
    myrows = Split(value, ",")
    result = ""
    For i = LBound(myrows) To UBound(myrows)
        a = ThisWorkbook.Worksheets(2).Cells(myrows(i), 2) 'The first 2 is the number of sheet and the last 2 is the column.
        result = result & a & ","
    Next i
    result = Left(result, Len(result) - 1)
    mysearch = result
End Function

ALT+ সহ ম্যাক্রো / ভিবিএতে যান F11। এই ওয়ার্কবুকের অধীনে একটি মডিউল sertোকান এবং ডানদিকে কোডটি পেস্ট করুন।

যদি আপনার রেফারেন্স ডেটা শীট 1 কলাম এ হয়, তবে সেল বি 1 টিতে এবং ডেটাটি শীট =mysearch(A1)2 এর কলাম বিতে থাকলে আপনি ফলাফল পাবেন।

Comments

ধন্যবাদ! ঠিক ঠিক। বিভ্রান্তিকরভাবে, শীটগুলি শীট 1 বলা যেতে পারে তবে শিট 3 নম্বরযুক্ত হতে পারে, তবে এখন আমি ঠিক পেয়েছি এটি একটি কবজির মতো কাজ করে। আবার অনেক ধন্যবাদ!

— রল্ফব্লাই