Excel ত VBA ৰ Mid Function কেনেকৈ ব্যৱহাৰ কৰিব (৩টা উদাহৰণ)

  • এইটো শ্বেয়াৰ কৰক
Hugh West

এক্সেলত 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ফাংচন এ সিহতক নিকটতম পূৰ্ণসংখ্যা লৈ ৰূপান্তৰ কৰিব।

হিউ ৱেষ্ট এজন অতি অভিজ্ঞ এক্সেল প্ৰশিক্ষক আৰু বিশ্লেষক আৰু তেওঁৰ উদ্যোগটোত ১০ বছৰতকৈও অধিক অভিজ্ঞতা আছে। তেওঁ একাউণ্টিং আৰু বিত্ত বিষয়ত স্নাতক ডিগ্ৰী আৰু ব্যৱসায় প্ৰশাসনত স্নাতকোত্তৰ ডিগ্ৰী লাভ কৰিছে। হিউৰ পাঠদানৰ প্ৰতি আকৰ্ষণ আছে আৰু তেওঁ এক অনন্য শিক্ষকতা পদ্ধতি গঢ়ি তুলিছে যিটো অনুসৰণ আৰু বুজিবলৈ সহজ। এক্সেলৰ বিষয়ে তেওঁৰ বিশেষজ্ঞ জ্ঞানে বিশ্বজুৰি হাজাৰ হাজাৰ ছাত্ৰ-ছাত্ৰী আৰু পেছাদাৰীক তেওঁলোকৰ দক্ষতা বৃদ্ধি আৰু কেৰিয়াৰত উৎকৃষ্টতা প্ৰদৰ্শন কৰাত সহায় কৰিছে। তেওঁৰ ব্লগৰ জৰিয়তে হিউৱে নিজৰ জ্ঞান বিশ্বৰ সৈতে ভাগ-বতৰা কৰে, ব্যক্তি আৰু ব্যৱসায়ীসকলক তেওঁলোকৰ সম্পূৰ্ণ সম্ভাৱনাক লাভ কৰাত সহায় কৰিবলৈ বিনামূলীয়া এক্সেল টিউটোৰিয়েল আৰু অনলাইন প্ৰশিক্ষণ আগবঢ়ায়।