বড় মাইক্রোসফট এক্সেল-এ কাজ করার সময়, কখনো কখনো আমাদের ডেটা ছোট থেকে বড়偏邦に সর্ট করতে হয়। আমরা সহজে VBA ম্যাক্রোস ব্যবহার করে এটি করতে পারি। VBA কোড প্রয়োগ করে ছোট থেকে বড় সর্ট করা একটি সহজ কাজ। আজ, এই আর্টিকেলে, আমরা তিনটি দ্রুত এবং উপযুক্ত পদ্ধতি শিখব কিভাবে VBA অটোফিল্টার স্মলেস্ট টু লার্জেস্ট এক্সেল-এ কার্যকরভাবে উপযুক্ত উদাহরণসহ করতে হয়।
Sub Autofilter_Sort_Smallest_to_Largest() With ActiveSheet.Sort .SortFields.Add Key:=Range("D4"), Order:=xlAscending .SetRange Range("B4:E16") .Header = xlYes .Apply End With End Sub
মান লেন, আমাদের একটি ডেটাসেট আছে যাতে আরমানি গ্রুপের একাধিক বিক্রয় প্রতিনিধি-র তথ্য রয়েছে। বিক্রয় প্রতিনিধিদের নাম, পণ্যের ধরন, এবং বিক্রয় প্রতিনিধিদের দ্বারা অর্ডার করা এবং ডেলিভারি করা পণ্য যথাক্রমে কলাম B, C, D, এবং E-এ দেওয়া আছে। আমাদের ডেটাসেট থেকে, আমরা VBA কোড ব্যবহার করে আমাদের ডেটা ছোট থেকে বড় সর্ট করব। আজকের টাস্কের জন্য ডেটাসেটের একটি ওভারভিউ নিচে দেওয়া হলো।
এখন আমি দেখাব কিভাবে একটি সহজ VBA কোড ব্যবহার করে আরোহী ক্রমে ছোট থেকে বড় সর্ট করতে হয়। এটি কিছু নির্দিষ্ট মুহূর্তে খুবই সহায়ক। আমাদের ডেটাসেট থেকে, আমরা পণ্যের অর্ডার অনুযায়ী আমাদের ডেটা আরোহী ক্রমে সর্ট করব। ছোট থেকে বড় সর্ট করার জন্য নিচের নির্দেশনা অনুসরণ করুন!
ধাপ ১:
- প্রথমে, একটি মডিউল খুলুন, তার জন্য, প্রথমে আপনার ডেভেলপার ট্যাব থেকে,
ডেভেলপার → ভিজ্যুয়াল বেসিক
- ভিজ্যুয়াল বেসিক রিবনে ক্লিক করার সাথে সাথে, আপনার সামনে Microsoft Visual Basic for Applications – Sort Data Smallest to Largest নামে একটি উইন্ডোই মুহূর্তে দেখাবে। সেটি থেকে, আমরা আমাদের VBA কোড প্রয়োগের জন্য একটি মডিউল ইনসার্ট করব। তা করতে,
ইনসার্ট → মডিউল
ধাপ ২:
- অতএব, Sort Data Smallest to Largest মডিউল পপ আপ হবে। Sort Data Smallest to Largest মডিউলে, নিচের VBA কোডটি লিখুন।
Sub Autofilter_Sort_Smallest_to_Largest() With ActiveSheet.Sort .SortFields.Add Key:=Range("D4"), Order:=xlAscending .SetRange Range("B4:E16") .Header = xlYes .Apply End With End Sub
- অতএব, VBA রান করুন। তা করতে,
Run → Run Sub/UserForm
- VBA কোড রান করার পর, আপনি নিচের স্ক্রিনশটে দেখানো মতো ডেটা ছোট থেকে বড় সর্ট করতে পারবেন।
এই পদ্ধতিতে, আমরা হেডারসহ একাধিক কলাম ছোট থেকে বড় সর্ট করব। আমাদের ডেটাসেট থেকে, আমরা বিক্রয় প্রতিনিধিদের নাম, এবং অর্ডার করা পণ্য ছোট থেকে বড় সর্ট করব। হেডারসহ একাধিক কলাম ছোট থেকে বড় সর্ট করার জন্য নিচের নির্দেশনা অনুসরণ করুন!
ধাপ ১:
- প্রথম, পদ্ধতি ১- অনুযায়ী, একটি নতুন মডিউল ইনসার্ট করুন এবং নিচের VBA কোডটি লিখুন। VBA কোড হলো,
Sub Sort_Multiple_Columns() With ActiveSheet.Sort .SortFields.Add Key:=Range("B4"), Order:=xlAscending .SortFields.Add Key:=Range("D4"), Order:=xlAscending .SetRange Range("B4:E16") .Header = xlYes .Apply End With End Sub
- আরো, VBA রান করুন। তা করতে,
Run → Run Sub/UserForm
ধাপ ২:
- VBA কোড রান করার পর, আপনি নিচের স্ক্রিনশটে দেখানো মতো বিক্রয় প্রতিনিধিদের নাম, এবং অর্ডার করা পণ্য অনুযায়ী আমাদের ডেটা ছোট থেকে বড় সর্ট করতে পারবেন।
শেষ কিন্তু কম নয়, আপনি আপনার ডেটা ওয়ার্কশিট নাম অনুযায়ী VBA কোড ব্যবহার করে এক্সেল-এ ছোট থেকে বড় সর্ট করতে পারেন। আমাদের ডেটাসেট থেকে, আমরা ডেলিভারি করা পণ্য অনুযায়ী ডেটা ছোট থেকে বড় সর্ট করব। এটি একটি সহজ কাজ এবং সময় বাঁচাওয়াও। ওয়ার্কশিট নাম অনুযায়ী আমাদের ডেটা ছোট থেকে বড় সর্ট করার জন্য নিচের নির্দেশনা অনুসরণ করুন!
ধাপ ১:
- প্রথম, পদ্ধতি ১-অনুযায়ী একটি নতুন মডিউল ইনসার্ট করুন এবং নিচের VBA কোডটি লিখুন। VBA কোড হলো,
Sub Sort_Smallest_to_Largest() Rows("4:16").Select ActiveWorkbook.Worksheets("Smallest to Largest").Sort.SortFields.Clear ActiveWorkbook.Worksheets("Smallest to Largest").Sort.SortFields.Add Key:=Range("E4:E16") _ , SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal With ActiveWorkbook.Worksheets("Smallest to Largest").Sort .SetRange Range("B4:E16") .Header = xlYes .MatchCase = False .Orientation = xlTopToBottom .SortMethod = xlPinYin .Apply End With End Sub
- আরো, VBA রান করুন। তা করতে,
Run → Run Sub/UserForm
ধাপ ২:
- VBA কোড রান করার পর, আপনি নিচের স্ক্রিনশটে দেখানো মতো ওয়ার্কশিট নাম অনুযায়ী ডেটা ছোট থেকে বড় সর্ট করতে পারবেন।
👉 Microsoft Visual Basic for Applications উইন্ডো পপ আপ করতে Alt + F11 একসাথে চাপুন।
👉 আপনার রিবনে ডেভেলপার ট্যাব দৃশ্যমান না থাকলে, আপনি সেটি দৃশ্যমান করতে পারেন। তা করতে,
ফাইল → অপশন → কাস্টমাইজ রিবন
আশা করি উপরে উল্লিখিত সকল উপযুক্ত পদ্ধতি VBA কোড দিয়ে ছোট থেকে বড় সর্ট করতে এখন আপনাকে আপনার এক্সেল স্প্রেডশিটে আরও পণ্যত্বের সাথে প্রয়োগ করতে অনুপ্রেরণা দেবে। আপনার যেকোনো প্রশ্ন বা জিজ্ঞেস থাকলে মন্তব্য করতে বাধা না মনে করুন।
- এক্সেল VBA দিয়ে অটোফিল্টার অন কিনা যাচাই (৪টি সহজ পদ্ধতি)
- VBA দিয়ে এক্সেলে নির্দিষ্ট মানের সমান নয় এমন মান অটোফিল্টার করুন
- এক্সেল VBA: অটোফিল্টার রিমুভ যদি অস্তিত্বে থাকে (৭টি পদ্ধতি)