somewhere in... blog
x
ফোনেটিক ইউনিজয় বিজয়

প্রোগ্রামিং ইন এক্সেলঃ

১৪ ই মে, ২০১৬ সন্ধ্যা ৭:১৪
এই পোস্টটি শেয়ার করতে চাইলে :

মাইক্রোসফট এক্সেল এ VBA ডেভেলপার অপশন আছে। এই অপশন ব্যাবহার করতে চাইলে প্রথমেই আমাদের মেনুবারে “Developer” ট্যাব নিয়ে আসতে হবে। তার জন্য যা করা প্রয়োজন, তা হল, ফাইল মেনুতে গিয়ে সবার নীচের “Execl Option” নির্বাচন করতে হবে। তার পর “Popular” সিলেক্ট করে “Top Options for Working with Excel” এর তিন নম্বর অপশন অর্থাৎ “Show Developer Tab in the Ribbon” নির্বাচন করে ওকে করলেই মেনু বারে “Developer” ট্যাব দেখা যাবে।
আর যদি আগে থেকেই “Developer Tab” মেনু-রিবনে দেখানো থাকে তাহলে আর এই প্রক্রিয়ার দরকার নাই।
এবার “Developer” ক্লিক করলেই বেশকিছু “Option” দেখা যাবে।

এর পর মেনুতে গিয়ে “Save As” এ গিয়ে ফাইলটাকে একটা “Excel Macro-Enabled Workbook” হিসবে সেভ করতে হবে।
এর পরে এই “Workbook” টি “Close” করে “Excel Macro-Enabled Workbook” ওয়ার্কবুকটি “Open” করতে হবে।
এবার “Excel Macro-Enabled Workbook” এর “Developer” ট্যাবে গিয়ে “Insert” সিলেক্ট করে নিচের “ActiveX control” গ্রুপের প্রথমের আইটেম “Command Button” সিলেক্ট করতে হবে। সিলেক্ট করার পর Mouse Pointer এ একটা “ +” চিহ্ন দেখাবে। এখন শীটের যেকোন যায়গায় "+" টি ড্র‍্যাগ করলে একটা ”Button” তৈরী হবে।
এই বাটনের উপর রাইট ক্লিক দিয়ে “CommandButton Object ” এর “Edit” সিলেক্ট করে এর উপর লেখা টেক্সট এডিট করে ইচ্ছানুযায়ী এর যে কোন নাম দেয়া যাবে।
নাম ধরা যাক এর নাম দেয়া হবে “Age Calculator”
নাম এডিট করে এর উপর আবার রাইট ক্লিক দিয়ে “View Code” অপশন সিলেক্ট করলে একটা নতুন উইন্ডো আসবে, যেখানে লেখা থাকবে:

Private Sub CommandButton1_Click()

End Sub
এই দুইটি লাইনের মাঝখানে নিচের কোড টি পেষ্ট করতে হবেঃ

Dim e As String
Dim a As Date ' Date of birth
Dim b As Date ' Age on date
Dim c As Date ' Temp date
Dim d As Date ' temp date
e = InputBox("Insert Your Name:")
a = InputBox("Inerst your Date of Birth:")
b = InputBox("Isert the date you want to calculate your age on:")
Dim x As Integer
x = DateDiff("yyyy", a, b) - IIf(Month(b) < Month(a), 1, 0)
Dim y As Integer
c = DateAdd("yyyy", x, a)
y = DateDiff("m", c, b) - IIf(Day(b) < Day(a), 1, 0)
Dim z As Integer
d = DateAdd("m", y, c)
z = DateDiff("d", d, b)
MsgBox ("Hey " & e & "! " & "Your age on " & b & " is: " & x & "Years " & y & " Months " & z & " Days")
Range("a1").Value = "Your age on " & b & " is: " & x & " Years " & y & " Months " & z & " Days"


MsgBox থেকে Days") পর্যন্ত এক লাইনে হবে আর Range("a1") থেকে Days" পর্যন্তও একই লাইনেই হবেে ( ফেবুতে লাইন ভাঙ্গা দেথাতে পারে)। তার পর এই "Window" এরই ”সেভ” বাটনের মাধ্যমে সেভ করতে হবে।

Save করে এই “Window” টা “Close” করলে “Excel Worksheet” ফিরে আসবে। আসার পর “Design Mode” এর উপর একটা “Click” দিয়ে “Design Mode” থেকে হলুদ দাগ দুর করে ইনসার্টকৃত “Button” একটা Click দিলেই একে একে নাম ও তারিখ ইনপুট দিতে বলবে। এক্ষেত্রে পত্যক ধাপে “Ener” চাপতে হবে অথবা “OK” ক্লিক করতে হবে। এ প্রকৃয়ায় মোট তিন টা স্টেপঃ নাম, জন্ম তারিখ ও যে তারিখে বয়স বের করা হবে সেটা। তিনটা Step শেষ না করে ইনপুট বক্স Close করলে এরর দেখাবে। তারিখ সঠিক ভাবে হিসাব করা হবে না।
সর্বশেষ এডিট : ১৪ ই মে, ২০১৬ সন্ধ্যা ৭:১৪
১টি মন্তব্য ০টি উত্তর

আপনার মন্তব্য লিখুন

ছবি সংযুক্ত করতে এখানে ড্রাগ করে আনুন অথবা কম্পিউটারের নির্ধারিত স্থান থেকে সংযুক্ত করুন (সর্বোচ্চ ইমেজ সাইজঃ ১০ মেগাবাইট)
Shore O Shore A Hrosho I Dirgho I Hrosho U Dirgho U Ri E OI O OU Ka Kha Ga Gha Uma Cha Chha Ja Jha Yon To TTho Do Dho MurdhonNo TTo Tho DDo DDho No Po Fo Bo Vo Mo Ontoshto Zo Ro Lo Talobyo Sho Murdhonyo So Dontyo So Ho Zukto Kho Doye Bindu Ro Dhoye Bindu Ro Ontosthyo Yo Khondo Tto Uniswor Bisworgo Chondro Bindu A Kar E Kar O Kar Hrosho I Kar Dirgho I Kar Hrosho U Kar Dirgho U Kar Ou Kar Oi Kar Joiner Ro Fola Zo Fola Ref Ri Kar Hoshonto Doi Bo Dari SpaceBar
এই পোস্টটি শেয়ার করতে চাইলে :
আলোচিত ব্লগ

আপনারা কি চান আওয়ামীলিগ আবার আসুক?

লিখেছেন রাজীব নুর, ১৮ ই ফেব্রুয়ারি, ২০২৫ সকাল ৯:৩৬



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

দেশে এখন জঙ্গি নেই, তাই জঙ্গি হামলাও নেই

লিখেছেন নতুন নকিব, ১৮ ই ফেব্রুয়ারি, ২০২৫ সকাল ১০:১০

দেশে এখন জঙ্গি নেই, তাই জঙ্গি হামলাও নেই

প্রবাল দ্বীপ সেন্ট মার্টিন, বাংলাদেশ, অন্তর্জাল থেকে সংগৃহিত।

আসলে বাংলাদেশে যে কোনো জঙ্গি নেই এটা এখন প্রমানিত সত্য। এই দেশের মানুষ ধর্মপ্রাণ... ...বাকিটুকু পড়ুন

কেমন চলছে দেশ? আমরা কী চাই? অসংলগ্ন স্বগতোক্তি

লিখেছেন সোনাবীজ; অথবা ধুলোবালিছাই, ১৮ ই ফেব্রুয়ারি, ২০২৫ দুপুর ২:৩১

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

৩৬ জুলাই আন্দোলনে জাতিসংঘ মানবাধিকার কমিশনের তদন্ত রিপোর্টের সারাংশ.....

লিখেছেন জুল ভার্ন, ১৮ ই ফেব্রুয়ারি, ২০২৫ দুপুর ২:৩৫

৩৬ জুলাই আন্দোলনে জাতিসংঘ মানবাধিকার কমিশনের তদন্ত রিপোর্টের সারাংশ.....

৩৬ জুলাই আন্দোলনে জাতিসংঘের মানবাধিকার কমিশনের ১৪২ পৃষ্ঠার রিপোর্ট পড়লাম। লেডি হিটলারের গণহত্যা কিম্বা মানবাধিকার নিয়ে তদন্তের বিষয়ে না বলি। তবে জাতিসংঘের... ...বাকিটুকু পড়ুন

=রং ঢং একদিন উড়ে যাবে=

লিখেছেন কাজী ফাতেমা ছবি, ১৮ ই ফেব্রুয়ারি, ২০২৫ বিকাল ৪:১১



বেলাশেষের খেয়ায় এখানের রঙ ঢং সব ভেসে যাবে
ভেসে যাবে জীবন জুড়ে যত উচ্ছৃঙ্খলতা,
মোহ নেশায় আচ্ছন্ন হয়েছো, মৃত্যুর ভয়হারা,
একদিন অবেলায় পায়ের কাছে এসে বসবে মৃত্যু দূত।

নেচে গেয়ে, রূপ দেখিয়ে... ...বাকিটুকু পড়ুন

×