Excel VBA-তে আপনি Worksheet Functions ব্যবহার করে সহজেই গণনা করতে পারেন, যেমন SUM, AVERAGE, COUNT, MIN, MAX ইত্যাদি। এগুলি Excel-এর মৌলিক ফাংশন যা VBA কোডের মাধ্যমে অটোমেটিকভাবে প্রয়োগ করা সম্ভব। এই ফাংশনগুলোর মাধ্যমে আপনি ডেটার উপর বিভিন্ন গাণিতিক কার্যক্রম পরিচালনা করতে পারবেন।
Excel VBA-তে Worksheet Functions ব্যবহার করার সাধারণ পদ্ধতি
VBA-তে Excel ফাংশনগুলো ব্যবহার করার জন্য, আপনি Application.WorksheetFunction প্রপার্টি ব্যবহার করবেন। এটি Excel ফাংশনগুলোর কার্যকারিতা VBA কোডে অন্তর্ভুক্ত করতে সাহায্য করে।
উদাহরণ:
Sub UseWorksheetFunctions()
' SUM ফাংশন ব্যবহার করা
MsgBox Application.WorksheetFunction.Sum(Range("A1:A10"))
' AVERAGE ফাংশন ব্যবহার করা
MsgBox Application.WorksheetFunction.Average(Range("B1:B10"))
' COUNT ফাংশন ব্যবহার করা
MsgBox Application.WorksheetFunction.Count(Range("C1:C10"))
' MIN ফাংশন ব্যবহার করা
MsgBox Application.WorksheetFunction.Min(Range("D1:D10"))
' MAX ফাংশন ব্যবহার করা
MsgBox Application.WorksheetFunction.Max(Range("E1:E10"))
End Sub
এখানে:
- Application.WorksheetFunction.Sum: A1 থেকে A10 পর্যন্ত সেলের মানের যোগফল দেখাবে।
- Application.WorksheetFunction.Average: B1 থেকে B10 পর্যন্ত সেলের গড় মান দেখাবে।
- Application.WorksheetFunction.Count: C1 থেকে C10 পর্যন্ত সেল গুনে কতটি সংখ্যাযুক্ত ডেটা আছে, তা দেখাবে।
- Application.WorksheetFunction.Min: D1 থেকে D10 পর্যন্ত সেলগুলোর মধ্যে সর্বনিম্ন মান দেখাবে।
- Application.WorksheetFunction.Max: E1 থেকে E10 পর্যন্ত সেলগুলোর মধ্যে সর্বোচ্চ মান দেখাবে।
Excel Functions-এর আরও উদাহরণ
১. SUMIF ব্যবহার করা
SUMIF ফাংশনটি নির্দিষ্ট শর্ত পূরণের ভিত্তিতে সেলের যোগফল হিসাব করে। উদাহরণস্বরূপ, যদি A1 থেকে A10 পর্যন্ত সেলের মধ্যে "Yes" মানের সাথে মিলে এমন সেলগুলোর যোগফল বের করতে চান:
Sub UseSumIf()
MsgBox Application.WorksheetFunction.SumIf(Range("A1:A10"), "Yes", Range("B1:B10"))
End Sub
এখানে:
- Range("A1:A10"): যেখানে শর্ত যাচাই করা হবে।
- "Yes": শর্ত (যেমন, "Yes" মানযুক্ত সেলগুলোর যোগফল চাইছি)।
- Range("B1:B10"): যোগফল হিসাব করার জন্য সেল রেঞ্জ।
২. VLOOKUP ব্যবহার করা
VLOOKUP ফাংশনটি একটি কলামে নির্দিষ্ট মান খুঁজে পেতে সাহায্য করে এবং তার পাশের কলামে সংশ্লিষ্ট মান প্রদান করে।
Sub UseVLookup()
MsgBox Application.WorksheetFunction.VLookup("Apple", Range("A1:B10"), 2, False)
End Sub
এখানে:
- "Apple": যা খুঁজতে চান।
- Range("A1:B10"): যেখানে আপনি মান খুঁজবেন।
- 2: ফলাফল কোথায় পাওয়া যাবে, এই সংখ্যা ঐ কলামের অবস্থান নির্দেশ করে।
- False: নির্দিষ্টভাবে একেবারে "Apple" মান খুঁজতে চাওয়া হচ্ছে (যদি এটি না পায়, তাহলে ভুল ফলাফল দেখাবে না)।
৩. IF ফাংশন ব্যবহার করা
IF ফাংশনটি শর্তানুসারে ভিন্ন ফলাফল প্রদান করে।
Sub UseIF()
MsgBox Application.WorksheetFunction.If(Range("A1").Value > 100, "Above 100", "Below 100")
End Sub
এখানে:
- যদি A1 সেলে 100 এর বেশি কোনো মান থাকে, তাহলে "Above 100" বার্তা প্রদর্শিত হবে।
- অন্যথায় "Below 100" বার্তা প্রদর্শিত হবে।
Worksheet Functions-এর কিছু অন্যান্য উদাহরণ
১. COUNTIF:
কোনো নির্দিষ্ট শর্ত পূরণের ভিত্তিতে সেলের সংখ্যা গণনা করা।
Sub UseCountIf()
MsgBox Application.WorksheetFunction.CountIf(Range("A1:A10"), ">50")
End Sub
এখানে:
- A1 থেকে A10 পর্যন্ত সেলগুলোর মধ্যে 50 এর বেশি যে সংখ্যাগুলো রয়েছে, তাদের সংখ্যা গণনা হবে।
২. AVERAGEIF:
নির্দিষ্ট শর্ত অনুযায়ী গড় মান বের করা।
Sub UseAverageIf()
MsgBox Application.WorksheetFunction.AverageIf(Range("A1:A10"), ">50", Range("B1:B10"))
End Sub
এখানে:
- A1 থেকে A10 পর্যন্ত সেলগুলোর মধ্যে 50 এর বেশি যেগুলো, তাদের সাথে সম্পর্কিত B1 থেকে B10 পর্যন্ত সেলের গড় বের হবে।
৩. LEN:
কোনো সেলের টেক্সটের দৈর্ঘ্য গণনা করা।
Sub UseLen()
MsgBox Application.WorksheetFunction.Len(Range("A1"))
End Sub
এখানে:
- A1 সেলের টেক্সটের মোট অক্ষরের সংখ্যা দেখাবে।
সারাংশ
Excel VBA ব্যবহার করে Worksheet Functions ব্যবহার করা খুবই সহজ এবং কার্যকরী। আপনি SUM, AVERAGE, COUNT, MIN, MAX এবং অন্যান্য ফাংশনগুলোকে কোডের মধ্যে প্রয়োগ করে ডেটার উপর বিভিন্ন গাণিতিক ও শর্তযুক্ত কার্যক্রম করতে পারেন। Excel ম্যাক্রো ব্যবহার করে এই ফাংশনগুলোকে অটোমেটিকভাবে চালানো যায়, যা সময় বাঁচায় এবং কাজের গতি বাড়ায়।
Read more