وی بی اے مجموعہ | وی بی اے میں کلیکشن آبجیکٹ کیسے بنائیں؟

ایکسل وی بی اے کلیکشن آبجیکٹ

وی بی اے کو ایک گروپ کے تحت موجود اشیاء کے موجودہ ذخیرے کے علاوہ کوڈنگ میں ہم بھی اپنے اپنے اکٹھا کرنے والے گروپس تشکیل دے سکتے ہیں۔ ہمارے بہت سے مضامین میں ، ہم نے آبجیکٹ متغیر کے بارے میں بات کی ہے اور اس ٹیوٹوریل میں ، ہم وی بی اے کلیکشن آبجیکٹ کو تفصیل سے لیں گے۔

اگر آپ ہمارے پچھلے آرٹیکل "VBA Arrays" سے گزر چکے ہیں تو آپ کے سمجھنے میں یہ بہت آسان ہوجائے گا۔ ارایوں کو ایک ہی چھت کے نیچے گروپ متغیر کرنے کے لئے استعمال کیا جاتا ہے ، اسی طرح ، متغیرات کے ایک گروپ کو ذخیرہ کرنے کے لئے بھی مجموعہ استعمال ہوتا ہے۔

جمع کرنے کا استعمال اشیاء کو محفوظ کرنے کے لئے کیا جاتا ہے۔ وہ VBA arrays کے مقابلے میں کہیں زیادہ لچکدار ہیں جبکہ صفوں میں سائز کی حد مقرر ہوتی ہے لیکن مجموعہ میں کسی بھی وقت مقررہ سائز کی حد نہیں ہوتی ہے اور یہاں تک کہ دستی سائز میں بھی ضرورت نہیں ہوتی ہے۔

وی بی اے مجموعہ "وی بی اے لغت" سے بہت ملتا جلتا ہے لیکن لغت میں بیرونی آبجیکٹ کا حوالہ مطلوبہ ریفرنس ونڈو کے نیچے ترتیب دینے کی ضرورت ہے۔ وی بی اے لغت کے ذریعہ ہمیں حوالہ کی قسم کو "مائیکروسافٹ اسکرپٹنگ رن ٹائم" کے طور پر متعین کرنے کی ضرورت ہے لیکن مجموعہ میں ان اضافی متعلقہ اشیاء میں سے کسی کی ضرورت نہیں ہوتی ہے۔

وی بی اے میں کلیکشن آبجیکٹ کیسے بنائیں؟

سب سے پہلے جمع کرنے کے ساتھ شروع کرنے کے لئے ہمیں متغیر کو اسی طرح ڈیکلئیر کرنے کی ضرورت ہے "مجموعہ"۔

آپ یہ وی بی اے کلیکشن ایکسل ٹیمپلیٹ یہاں ڈاؤن لوڈ کرسکتے ہیں

کوڈ:

 ذیلی مجموعہ_مثال () دھیما کالم بطور کلکشن اختتام سب 

چونکہ کلیکشن ایک آبجیکٹ متغیر ہے لہذا ہمیں ایک نئی مثال پیدا کرکے آبجیکٹ کا حوالہ ترتیب دینے کی ضرورت ہے۔

کوڈ:

 ذیلی مجموعہ_مثال () دھیان سے بطور کلیکشن سیٹ کرنل = نیا مجموعہ اختتام سب 

اب متغیر کے ساتھ ، ہم مجموعہ متغیر “کرنل” کے تمام طریقوں تک رسائی حاصل کرسکتے ہیں۔

کوڈ:

 ذیلی مجموعہ_مثال () دھیان سے بطور کلکشن سیٹ کول = نیا کلیکشن کرنل اینڈ سب 

ان طریقوں کو استعمال کرنے سے پہلے ہمیں تغیر کے بطور تغیر دینے کی ضرورت ہوتی ہے۔

کوڈ:

 ذیلی مجموعہ_مثال () ڈم کول چونکہ بطور مجموعہ سیٹ کرنل = نیا مجموعہ ڈم کالرسول اسٹرنگ اینڈ سب کے مطابق 

اب متغیر "کرنل" کا انتخاب "شامل کریں" کا طریقہ استعمال کریں۔

کوڈ:

 ذیلی مجموعہ_مثال () دھیان سے بطور کلکشن سیٹ کول = نیا مجموعہ کرنل۔ اختتام سب شامل کریں 

ایڈ کے طریقہ کار کے تحت ، ہمارے پاس کچھ پیرامیٹر ہیں۔ فرض کریں کہ ہم موبائل برانڈ کے نام مارکیٹ میں ان کی اوسط فروخت کی قیمت کے ساتھ اسٹور کر رہے ہیں۔

کے تحت آئٹم ، دلیل موبائل کی قیمت میں داخل ہوتی ہے۔

کوڈ:

 ذیلی مجموعہ_مثال () دھیان سے بطور مجموعہ سیٹ Col = نیا مجموعہ Col. شامل کریں آئٹم: = 15000 ، اختتامی سب 

اگلا ، کے تحت چابی دلائل موبائل برانڈ نام درج کریں۔

کوڈ:

 ذیلی مجموعہ_مثال () دھیان سے بطور مجموعہ سیٹ Col = نیا مجموعہ Col. شامل کریں آئٹم: = 15000 ، کلید: = "Redmi" اختتامی سب 

اب متغیر "ColResult" کے ل we ، ہم "Col" آبجیکٹ متغیر کا نتیجہ ذخیرہ کریں گے۔

کوڈ:

 ذیلی مجموعہ_مثال () دھیان سے بطور مجموعہ سیٹ Col = نیا مجموعہ Col. شامل کریں آئٹم: = 15000 ، کلید: = "Redmi" ColResult = Col (اختتام سب 

جب آپ متغیر "کرنل" کی قوسین کھولتے ہیں تو ہم دلیل کو دیکھ سکتے ہیں اشاریہ اس دلیل کے لئے ہمیں سپلائی کرنے کی ضرورت ہے چابی جمع کرنے سے استدلال کی قیمت شامل کریں یعنی موبائل برانڈ کا نام۔

کوڈ:

 ذیلی مجموعہ_مثال () دھیان سے بطور مجموعہ سیٹ Col = نیا مجموعہ Col. شامل کریں آئٹم: = 15000 ، کلید: = "Redmi" ColResult = Col ("Redmi") اختتام سب 

اب VBA میں میسج باکس میں نتیجہ دکھائیں۔

کوڈ:

 ذیلی مجموعہ_مثال () دھیان سے بطور مجموعہ سیٹ Col = نیا مجموعہ Col. شامل کریں 

ٹھیک ہے ، جب ہم کوڈ چلاتے ہیں تو ہمیں کیا جاتا ہے جب ہمیں موبائل برانڈ "ریڈمی" کی قیمت دیکھنی چاہئے۔

کلیدی اور آئٹم پیرامیٹرز کی بہتر تفہیم

مجھے یقین ہے کہ جمع کرنے والی چیز کے پیرامیٹرز کو سمجھنا آسان نہیں ہے۔ ایک آسان مثال کے ساتھ آپ کو سمجھاؤں۔

ذرا تصور کریں کہ آپ کے پاس پھلوں کے نام اور پھلوں کی قیمت کے ساتھ پھلوں کا ایک مینو ہے۔ فرض کریں کہ آپ پھل کے نام سے "ایپل" پھلوں کی قیمت تلاش کررہے ہیں۔

پھلوں کی قیمت تلاش کرنے کے ل we ہمیں پھل کے نام کا ذکر کرنے کی ضرورت ہے یعنی کلیکشن VBA زبان میں پھل کا نام ہے چابی اور پھلوں کی قیمت ہے "آئٹم"۔

یہ VLOOKUP یا HLOOKUP فنکشن کو لگانے کے مترادف ہے ، تلاش کی قیمت کی بنیاد پر ہم ڈیٹا بیس سے مطلوبہ ڈیٹا حاصل کریں گے۔ یہاں دیکھنے کی قیمت ہے چابی اور نتیجہ ہے آئٹم

اعلی درجے کی مثال

ذرا تصور کریں کہ آپ کسی ایک خوردہ اسٹور میں اسٹور منیجر ہیں اور آپ صارفین کے سوالات کو سنبھالنے کے ذمہ دار ہیں۔ ایسے ہی صارفین سے استفسار کرنا مصنوعات کی قیمت کے بارے میں تفتیش ہے۔

آپ کو صارف کو مکمل معلومات کے ساتھ مصنوعات کی قیمت تلاش کرنے کی اجازت دینے کی ضرورت ہے۔ اسی طرح ، کوئی اعداد و شمار نہ ملنے کی صورت میں آپ کو پیغام دکھانا ہوگا۔ ذیل میں مثال کے طور پر کوڈ ہے جو صارف کے سامنے ان پٹ باکس پیش کرے گا اور اس کی ضرورت ہوتی ہے کہ وہ جس مصنوع کی تلاش کر رہے ہیں اس کا نام درج کریں ، اگر مصنوعات کی وصولی میں موجود ہے تو یہ ذکر شدہ مصنوعات کی قیمت دکھائے گا ورنہ یہ اس پیغام کو بطور "دکھائیں کہ آپ جس مصنوع کی تلاش کر رہے ہیں وہ موجود نہیں ہے"۔

کوڈ:

 ذیلی مجموعہ_اختیار 2 () ڈم آئٹمزکول بطور مجموعہ ڈم کولرسلسٹ جیسے اسٹرنگ سیٹ آئٹمز کول = نیا کلیکشن آئٹمز کول۔ شامل کریں کلید: = "ایپل" ، آئٹم: = 150 آئٹم کولک شامل کریں: = "اورنج" ، آئٹم: = 75 آئٹمکول شامل کریں۔ کلید شامل کریں: = "آبی تربوز" ، آئٹم: = 45 آئٹمز کولک۔ اڈ کی کلید: = "مش میلان" ، آئٹم: = 85 آئٹمز کول۔ ایڈ کلید: = "آم" ، آئٹم: = 65 کالرسلٹ = ایپلیکیشن: اشارہ: = "براہ کرم فروٹ کا نام درج کریں ") اگر آئٹمز کولک (ColResult)" "پھر MsgBox" پھلوں کی قیمت "& ColResult &" ہے: "اور آئٹمز کول (ColResult) اور MsgBox" جس پھل کی آپ تلاش کر رہے ہیں اس میں موجود نہیں ہے۔ مجموعہ "اختتام اگر ختم ہو تو