বিষয়বস্তুৰ তালিকা
এক্সেলত VBA ৰ সৈতে কাম কৰাৰ সময়ত আমি ব্যৱহাৰ কৰা এটা গুৰুত্বপূৰ্ণ আৰু বহুলভাৱে ব্যৱহৃত ফাংচন হ'ল VBA ৰ Mid ফাংচন । ই এটা ষ্ট্ৰিং ইনপুট হিচাপে লয় আৰু ষ্ট্ৰিংৰ মাজৰ পৰা এটা নিৰ্দিষ্ট সংখ্যক আখৰ আউটপুট হিচাপে ঘূৰাই দিয়ে। আজি এই লেখাটোত মই আপোনালোকক দেখুৱাম যে আপুনি কেনেকৈ VBA ৰ Mid ফাংচন সঠিক উদাহৰণ আৰু চিত্ৰৰ সৈতে ব্যৱহাৰ কৰিব পাৰে।
এইটোৱে 9 আখৰ ঘূৰাই দিব “Angela Catherine Nevills” ষ্ট্ৰিংৰ পৰা, 8th আখৰৰ পৰা আৰম্ভ কৰি। ই “কেথেৰিন” ।
অভ্যাস কাৰ্য্যপুস্তিকা ডাউনলোড কৰক
এই অনুশীলন পুথিখন ডাউনলোড কৰক যাতে কামটোৰ অনুশীলন কৰিব পাৰে আপুনি এই প্ৰবন্ধটো পঢ়ি আছে।
VBA Mid Function.xlsm
এক্সেলত VBA ৰ মিড ফাংচনৰ পৰিচয়
⧭ ফাংচনৰ উদ্দেশ্য:
Mid ফাংচনে এটা মান ইনপুট হিচাপে লয় আৰু... মানটোৰ এটা নিৰ্দিষ্ট অৱস্থানৰ পৰা আৰম্ভ কৰি এটা নিৰ্দিষ্ট সংখ্যক আখৰ ঘূৰাই দিয়ে।
মানটো এটা স্ট্ৰিং, সংখ্যা , বা আনকি এটা বুলিয়ান হ'ব পাৰে।
উদাহৰণস্বৰূপে, যদি আপুনি Mid(“এঞ্জেলা কেথেৰিন নেভিলছ”,8,9) সন্নিবিষ্ট কৰে, ই “কেথেৰিন” ঘূৰাই দিব।
যদি আপুনি Mid(12345,2,3) , সন্নিবিষ্ট কৰে তেন্তে আপুনি 234 পাব।
আৰু Mid(False,2,3) , আপুনি als পাব।
⧭ বাক্য গঠন:
মিডৰ বাক্য গঠন VBA ৰ ফাংচন হৈছে:
২৮০১⧭ যুক্তি:
তৰ্ক | প্ৰয়োজনীয় / বৈকল্পিক | ব্যাখ্যা |
---|---|---|
স্ট্ৰিং | প্ৰয়োজনীয় | ৰ পৰা ষ্ট্ৰিং যিটোৰ কেইবাটাও আখৰ ঘূৰাই দিয়া হ’ব। |
আৰম্ভ | প্ৰয়োজনীয় | ঘূৰাই দিয়া হ’বলগীয়া ষ্ট্ৰিঙৰ আৰম্ভণি আখৰ। |
দৈৰ্ঘ্য | ঐচ্ছিক | ঘূৰাই দিয়া আখৰৰ সংখ্যা। অবিকল্পিত হৈছে 1. |
⧭ ঘূৰাই দিয়া মান:
মাজৰ পৰা এটা নিৰ্দিষ্ট সংখ্যক আখৰ ঘূৰাই দিয়ে
3 Excel ত VBA ৰ মিড ফাংচনৰ উদাহৰণ
এইবাৰ, Mid ফাংচন<অন্বেষণ কৰোঁ আহক 2> VBA ৰ কেইটামান উদাহৰণৰ সৈতে বিতংভাৱে।
1. Excel ত VBA ৰ মিড ফাংচন ব্যৱহাৰ কৰি কিছুমান ID ৰ মাজৰ পৰা এটা নিৰ্দিষ্ট সংখ্যক আখৰ পৃথক কৰা
ইয়াত আমি IDs আৰু ৰ সৈতে এটা ডাটা ছেট পাইছো চেটাৰ্ণ গ্ৰুপ নামৰ কোম্পানী এটাৰ কিছুমান কৰ্মচাৰীৰ নাম ।
ইয়াত, প্ৰত্যেকৰে 4th ৰ পৰা 7th আখৰ ID এ নিজ নিজ কৰ্মচাৰীৰ যোগদান বছৰটো বুজায়।
এতিয়া আমি VBA ৰ Mid ফাংচন ব্যৱহাৰ কৰি এটা ব্যৱহাৰকাৰী-নিৰ্ধাৰিত ফাংচন বিকশিত কৰিম যিয়ে প্ৰতিজন কৰ্মচাৰীৰ যোগদান বছৰটো কৰ্মচাৰী আইডি ৰ পৰা উলিয়াব।
আপুনি নিম্নলিখিত VBA ক'ড ব্যৱহাৰ কৰিব পাৰে:
⧭ ভিবিএ ক'ড:
6276
টোকা: এই ক'ড Joining_Year নামৰ এটা ফাংচন সৃষ্টি কৰে।
⧭ আউটপুট:
এইটো চলাওক আপোনাৰ ৱৰ্কশ্বীটৰ যিকোনো কোষত এটা ID যুক্তি হিচাপে লৈ ফাংচন কৰক।
ইয়াত, D4 কোষত, আমি সূত্ৰটো দিছো:
=Joining_Year(B4)
ই প্ৰথম কৰ্মচাৰীৰ যোগদান বছৰটো ঘূৰাই দিছে, 2021 ।
এতিয়া আপুনি টানিব পাৰিব বাকী কৰ্মচাৰীসকলৰ যোগদানৰ বছৰ পাবলৈ হেণ্ডেল পূৰণ কৰক।
⧭ সংহিতাৰ ব্যাখ্যা:
- প্ৰথমে, আমি Joining_Year নামৰ এটা ফাংচন ঘোষণা কৰোঁ যিয়ে Function Joining_Year(ID) শাৰীৰ দ্বাৰা এটা ID ইনপুট হিচাপে লয়।
- তাৰ পিছত আমি 4 স্থানৰ পৰা আৰম্ভ কৰি ID ৰ পৰা 4 আখৰ উলিয়াওঁ, Joining_Year = Mid(ID, 4, 4) . <শাৰীটোৰ দ্বাৰা 28> End Function শাৰীয়ে ফাংচনৰ শেষ ঘোষণা কৰে।
2. Excel ত VBA ৰ মিড ফাংচন ব্যৱহাৰ কৰি কিছুমান ইমেইল ঠিকনাৰ পৰা এক্সটেনচনসমূহ এক্সট্ৰেক্ট কৰা
এতিয়া আমি ডাটা ছেটত এটা নতুন স্তম্ভ যোগ কৰিছো, য'ত কৰ্মচাৰীসকলৰ ইমেইল ঠিকনাসমূহ থাকে।
এইবাৰ আমি VBA ৰ Mid ফাংচন ব্যৱহাৰ কৰি ইমেইল ঠিকনাৰ এক্সটেনচনসমূহ এক্সট্ৰেক্ট কৰিম।
The ভিবিএ ক'ড হ'ব:
⧭ ভিবিএ ক'ড:
8477
টোকা: এই ক'ড এক্সটেনচন নামৰ এটা ফাংচন সৃষ্টি কৰে।
⧭ আউটপুট:
এইটো চলাওক আপোনাৰ কাৰ্য্যপত্ৰিকাৰ যিকোনো ঘৰত এটা ইমেইলৰ সৈতে কাৰ্য্য কৰকঠিকনা ক যুক্তি হিচাপে।
ইয়াত, E4 কোষত, আমি সূত্ৰটো দিছো:
=Extension(D4)
ই প্ৰথম ইমেইল ঠিকনাৰ এক্সটেনচন ঘূৰাই দিছে।
তাৰ পিছত আপুনি সকলো ইমেইলৰ এক্সটেনচন এক্সট্ৰেক্ট কৰিবলৈ Fill Handle টানিব পাৰিব ঠিকনাসমূহ।
⧭ ক'ডৰ ব্যাখ্যা
- প্ৰথমে আমি কল কৰা এটা ফাংচন ঘোষণা কৰোঁ এক্সটেনচন যি যিকোনো নামক ইনপুট হিচাপে লয় Function Extension(Email_Address) শাৰীটোৰ দ্বাৰা।
- তাৰ পিছত আমি এটা for-loop<2 ৰ সৈতে এটা পুনৰাবৃত্তি আৰম্ভ কৰোঁ> যিয়ে ইমেইল ঠিকনা ৰ প্ৰতিটো আখৰ পৰীক্ষা কৰে যাতে ই @ হয় নে নহয় চাব পাৰে যদি Mid(Email_Address, i, 1) = “@” তেন্তে .
- যদি ই এটা @ পায়, তেন্তে ই ইমেইল ঠিকনা ৰ পৰা প্ৰয়োজনীয় সম্প্ৰসাৰণটো এক্সটেনচন = মিড(ইমেইল_ঠিকনা, i + 1, Len(Email_Address) – (i + 4)) .
- শেষত আমি ফাংচনটোৰ শেষ ঘোষণা কৰিম।
3. কিছুমান লিখনীত এটা নিৰ্দিষ্ট লিখনী আছে নে নাই চাবলৈ পৰীক্ষা কৰা
Mid function ৰ এটা গুৰুত্বপূৰ্ণ ব্যৱহাৰ হৈছে এটা লিখনীত এটা নিৰ্দিষ্ট লিখনী আছে নে নাই চাব লাগে .
ইমেইল ঠিকনা ত “gmail” শব্দটো আছে নে নাই পৰীক্ষা কৰিবলৈ এটা ফাংচন বিকশিত কৰোঁ আহক।
আপুনি নিম্নলিখিত <ব্যৱহাৰ কৰিব পাৰে 1>VBA ক'ড:
⧭ VBA ক'ড:
7876
টোকা: এই ক'ডে এটা ফাংচন সৃষ্টি কৰে কল কৰিছিল পৰীক্ষা কৰা .
⧭ আউটপুট:
এই ফাংচন যিকোনো কোষত চলাওক আপোনাৰ কাৰ্য্যপত্ৰিকাৰ দুটা লিখনীক যুক্তি হিচাপে লৈ।
ইয়াত, E4 কোষত, আমি সূত্ৰটো দিছো:
=Checking(D4,"gmail")
ই হয় ঘূৰাই দিছে কাৰণ 1st ইমেইল ঠিকনাটো এটা Gmail ঠিকনা।
তাৰ পিছত আপুনি টানিব পাৰে সকলো ইমেইল আইডিৰ বাবে একে কাম কৰিবলৈ হেণ্ডেল পূৰণ কৰক।
⧭ ক'ডৰ ব্যাখ্যা:
- প্ৰথমে আমি Checking নামৰ এটা ফাংচন ঘোষণা কৰোঁ যিয়ে Function Checking(Text1,Text2) শাৰীৰ দ্বাৰা দুটা টেক্সটক আৰ্গুমেণ্ট হিচাপে লয়।
- তাৰ পিছত আমি এটা for লুপ আৰম্ভ কৰোঁ যিয়ে Text1 ৰ প্ৰতিটো ছেগমেণ্ট 1 স্থানৰ পৰা আৰম্ভ কৰি পৰীক্ষা কৰে, ই Text2 ৰ সমান নে নহয় চাবলৈ , শাৰীৰ দ্বাৰা যদি Mid(Text1, i, Len(Text2)) = Text2 তেন্তে .
- যদি ই Text2 বিচাৰি পায়, তেন্তে ই “হয়” ঘূৰাই দিয়ে, অন্যথা ই “নাই” ঘূৰাই দিয়ে।
- শেষত আমি ফাংচনটো End Function শাৰীটোৰ দ্বাৰা সমাপ্ত কৰিম।
মনত ৰখা কথাবোৰ
- Mid ফাংচন ৰ 1st যুক্তি সদায় এটা ষ্ট্ৰিং হোৱাৰ প্ৰয়োজন নাই। ই এটা ষ্ট্ৰিং , এটা সংখ্যা , বা আনকি এটা বুলিয়ান মান হ'ব পাৰে।
- কিন্তু দ্বিতীয় আৰু<১> ৩য় যুক্তিসমূহ সংখ্যা হ'ব লাগিব। ইহঁত পূৰ্ণসংখ্যা বা ভগ্নাংশ হব পাৰে কিন্তু সংখ্যা হব লাগিব। যদি সেইবোৰ ভগ্নাংশ হয়, তেন্তে Midফাংচন এ সিহতক নিকটতম পূৰ্ণসংখ্যা লৈ ৰূপান্তৰ কৰিব।