আমরা ৩ последователь বছর (২০২০, ২০২১, ২০২২) এর মাসিক সেলস ডেটা ব্যবহার করব। আমরা একটি চার্ট তৈরি করব যা স্বয়ংক্রিয়ভাবে পরিবর্তিত হবে।
ধাপ ১ – হেল্পার কলামসহ চার্ট সেটআপ
- তিনটি হেল্পার Sales কলাম ইনসার্ট করুন।
নোট: দৃশ্যমানতা উন্নত করতে হেল্পার কলামগুলো হাইলাইট করতে পারেন।
- একটি খালি সেলে যান।
- Insert ট্যাবে যান।
- Charts সেকশনে Insert Line or Area Chart > Stacked Line নির্বাচন করুন।
- চার্টের ওপর ডান ক্লিক করে Select Data ক্লিক করুন।
- Select Data Source ডায়ালগ বক্স খুলবে।
- Legend Entries (Series)-এ Add ক্লিক করুন।
- Edit Series উইন্ডো খুলবে।
- Series Name বক্সে Sales (2020) নির্বাচন করুন, Series values বক্সে ডেটা রেঞ্জ $F$5:$F$16 নির্বাচন করুন।
- OK ক্লিক করুন।
- সব Sales কলাম এবং সংশ্লিষ্ট হেল্পার কলামের জন্যও একই প্রক্রিয়া दुहरান।
- Horizontal (Category) Axis Labels-এ Edit ক্লিক করুন।
- Axis Labels ডায়ালগ বক্সে ডেটা রেঞ্জ $B$5:$B$16 নির্বাচন করুন। OK ক্লিক করুন।
Select Data Source উইন্ডোতে OK ক্লিক করুন।
আরও পড়ুন: এক্সেলে অ্যানিমেটেড বার চার্ট রেস তৈরি করার পদ্ধতি
ধাপ ২ – চার্ট ফরম্যাটিং
- Chart Title, Axis Titles, এবং Legend (নিচে) তৈরি করুন। এগুলো Chart Elements-এ পাবেন।
আপনার চার্ট নিচের ছবির মতো দেখাবে।
ধাপ ৩ – VBA কোড ব্যবহার
- Developer ট্যাবে যান এবং Visual Basic নির্বাচন করুন।
- Insert ট্যাবে > Module নির্বাচন করুন।
- Module 1-এ General বক্স দেখবেন।
- নিচের VBA কোডটি সেখানে পেস্ট করে সেভ করুন।
Sub AnimationChart() Const SR As Long = 5 Dim LR As Long Dim RN As Long LR = Range("C" & SR).End(xlDown).Row Range("F" & SR, "H" & LR).ClearContents DoEvents Application.Wait (Now + TimeValue("00:00:1")) For RN = SR To LR DoEvents Range("F" & RN, "H" & RN).Value = Range("C" & RN, "E" & RN).Value Application.Wait (Now + TimeValue("00:00:1")) DoEvents Next RN End Sub
কোড ব্যাখ্যা
প্রথমে ভেরিয়েবলগুলো ডিক্লেয়ার করা হয়েছে। Constant SR হল Starting Row, যা আমাদের কেসে 5। LR এবং RN হল Last Row এবং Row Number।
LR = Range("C" & SR).End(xlDown).Row → কমান্ডটি সংশ্লিষ্ট কলাম (F:H) এর সব মান মুছে ফেলে।
Range("F" & SR, "H" & LR).ClearContents → সেল রেঞ্জ নির্বাচন করে সারি অনুযায়ী মান দেখানো শুরু করে এবং খালি কলাম F থেকে H-কে পূরণ করে।
আমরা Time delay ১ সেকেন্ড সেট করেছি, যা ডেটাকে ১ সেকেন্ড ব্যবধানে দেখাতে সাহায্য করে, ফলে চার্টটি ডাইনামিক লাগে।
ধাপ ৪ – অ্যানিমেশন জেনারেট করার জন্য বাটন যোগ করুন
- Form Controls ব্যবহার করে আপনার ওয়ার্কশিটে একটি বাটন যোগ করুন।
- এর নাম রাখুন Animation।
- Animation বাটনে ডান ক্লিক করে কনটেক্সট মেনু থেকে Assign Macro নির্বাচন করুন।
- Assign Macro ডায়ালগ বক্স খুলবে।
- Macro name হিসেবে AnimationChart নির্বাচন করুন।
- OK ক্লিক করুন।
- অ্যানিমেটেড চার্ট প্রস্তুত। Animation বাটনে ক্লিক করুন।
অনুশীলন বিভাগ
প্রতিটি শিটের ডানে অনুশীলন বিভাগ দেওয়া আছে যাতে আপনি ধাপগুলো অনুশীলন করতে পারেন।
অনুশীলন ওয়ার্কবুক ডাউনলোড করুন
সম্পর্কিত আর্টিকেল
- এক্সেলে টেক্সট অ্যানিমেট করার পদ্ধতি
- UserForm-এ VBA অ্যানিমেশন
নিখরচায় উন্নত এক্সেল এক্সারসাইজ সমাধানসহ পান!
