প্রতিটি লুপের জন্য কীভাবে ভিবিএ ব্যবহার করবেন? (এক্সেল উদাহরণ সহ)
প্রতিটি লুপের জন্য এক্সেল ভিবিএ
প্রতিটি লুপের জন্য ভিবিএ সমস্ত বস্তু বা আইটেমের সংগ্রহের মধ্য দিয়ে যায় এবং একই ধরণের ক্রিয়াকলাপ সম্পাদন করে। এটি সমস্ত উপলব্ধ নির্দিষ্ট বস্তুর বিবেচনায় নেবে এবং প্রতিটি বস্তুর নির্দেশিত ক্রিয়াকলাপ সম্পাদন করবে।
ভিবিএতে ভিবিএতে লুপগুলি বোঝা বাধ্যতামূলক। একটি লুপ আপনাকে এক্সেলের অনেকগুলি কক্ষ বা বস্তুর জন্য একই ধরণের ক্রিয়াকলাপ পরিচালনা করতে দেয়। আজকের নিবন্ধে, আমরা প্রতিটি লুপ প্রক্রিয়াটির জন্য মনোনিবেশ করতে যাচ্ছি।
বাক্য গঠন
প্রতিটি লুপের জন্য অবজেক্ট বা আইটেমের সমস্ত সেট সংগ্রহের মধ্য দিয়ে লুপ আসতে পারে। সংগ্রহটি "সমস্ত খোলা ওয়ার্কবুকগুলি", "একটি কার্যপদে সমস্ত কার্যপত্রক", "কার্যপদে সমস্ত আকার এবং চার্টের সংগ্রহ" ছাড়া কিছুই নয়।
আসুন সিনট্যাক্সটি দেখুন।
প্রতিটির জন্য সংগ্রহের বিষয়টিতে কী করবেন? পরবর্তী অবজেক্ট
উদাহরণস্বরূপ, আপনার কার্যপত্রে 10 টি শীট রয়েছে এবং আপনি যা করছেন তা ছাড়া আপনি সমস্ত কার্যপত্রকটি আড়াল করতে চান man আপনি নিজেই লুকাতে পারবেন, হ্যাঁ আপনি পারেন তবে যদি আপনার মতো 100 টি শিট থাকে তবে এটি বিরক্তিকর এবং সময় নয় চূড়ান্ত কাজ। আপনি প্রতিটি লুপ ব্যবহার করে এটি করতে পারেন।
ভিবিএতে প্রতিটি লুপের জন্য কীভাবে ব্যবহার করবেন? (উদাহরণ)
আপনি প্রতিটি লুপ টেমপ্লেটের জন্য এই ভিবিএটি এখানে ডাউনলোড করতে পারেন - প্রতিটি লুপ টেমপ্লেটের জন্য ভিবিএউদাহরণ # 1 - সমস্ত পত্রকে একই পাঠ্য সন্নিবেশ করান
আমরা সাধারণ উদাহরণ সহ ভিবিএতে কীভাবে প্রত্যেকের জন্য ব্যবহার করব তা দেখতে পাব। ধরুন আপনার একটি কার্য পুস্তকে 5 টি কার্যপত্রক রয়েছে এবং আপনি ঘর 1 এ সমস্ত কার্যপত্রকগুলিতে "হ্যালো" শব্দটি সন্নিবেশ করতে চান।
আমরা প্রতিটি লুপের মাধ্যমে এটি করতে পারি। আপনাকে এখানে একটি জিনিস মনে রাখতে হবে আমরা হ'ল আমরা প্রতিটি ওয়ার্কশিটে এই ক্রিয়াকলাপটি সম্পাদন করছি, একই ওয়ার্কশিটে নয়। ভিবিএ কোড লেখার জন্য নীচের পদক্ষেপগুলি অনুসরণ করুন।
ধাপ 1: এক্সেল ম্যাক্রো শুরু করুন।
কোড:
সাব ফর_এচ_একটি নমুনা 1 () শেষ সাব
ধাপ ২: যেহেতু আমরা কার্যপত্রকগুলিকে উল্লেখ করছি তারা ভেরিয়েবলটিকে "ওয়ার্কশিট" হিসাবে ঘোষণা করে।
কোড:
সাব ফর_এচ_একটি নমুনা 1 () ডিমে ডাব্লু ওয়ার্কশিট শেষ সাব হিসাবে
ধাপ 3: এখন প্রতিটি লুপের জন্য ব্যবহার করে আমাদের সক্রিয় ওয়ার্কবুকের প্রতিটি কার্যপত্রকটি উল্লেখ করতে হবে।
কোড:
অ্যাক্টিভ ওয়ার্কবুক-ওয়ার্কশিটগুলিতে প্রতিটি ডাব্লুয়ের জন্য ওয়ার্কশিট হিসাবে ডিম ডাব্লু ডেস ডাব্লুএস
পদক্ষেপ 4: এখন প্রতিটি ওয়ার্কশিটে আমরা কী করতে চাই তা লিখুন। প্রতিটি কার্যপত্রকটিতে, আমাদের কক্ষ এ 1 এ "হ্যালো" শব্দটি রাখা উচিত।
কোড:
অ্যাক্টিভ ওয়ার্কবুক. ওয়ার্কশিটস ডাব্লু। রেঞ্জ ("এ 1") -র জন্য প্রতিটি ফর্ম_এচ_একসাম্পাইল 1 () ডিম ডাব্লু ওয়ার্কশিট হিসাবে ওয়ার্কশিট হিসাবে 
পদক্ষেপ 5: এখন বিকল্পটি বা শর্টকাট কী এফ 5 টিপুন এই কোডটি ম্যানুয়ালি চালান, আপনার কাছে কত শীট রয়েছে তা সমস্ত কার্যপত্রকটিতে "হ্যালো" শব্দটি inোকান তা বিবেচ্য নয়।
উদাহরণ # 2 - সমস্ত পত্রক লুকান
যেমন পোস্টে আগেই বলা হয়েছিল যে আপনি যে শপটি রয়েছেন তা বাদ দিয়ে যদি আপনার কাছে কয়েকশো শীট থাকে তবে প্রতিটি লুপের জন্য ব্যবহার করে আমরা সমস্ত শীটকে এক্সেলে লুকিয়ে রাখতে পারি।
ধাপ 1: আপনার নাম দিয়ে ম্যাক্রো শুরু করুন।
কোড:
সাব ফর_এচ_একটি নমুনা 2 () শেষ সাব
ধাপ ২: পরিবর্তনশীল হিসাবে ঘোষণা করুনডাব্লু”.
কোড:
সাব ফর_এচ_একটি নমুনা 2 () ডিমে ডাব্লু ওয়ার্কশিট শেষ সাব হিসাবে
ধাপ 3: এখন প্রতিটি ওয়ার্কশিটে আপনাকে যা করতে হবে তা হ'ল শীটটি লুকানো।
কোড:
অ্যাক্টিভ ওয়ার্কবুক-ওয়ার্কশিটগুলিতে ওয়ার্কশিটস -ভিজিবল = xlSheetVeryHID নেক্সট ওয়ার্ল্ড শেষ সাব
পদক্ষেপ 4: তবে আপনি যদি উপরের কোডটি চালান তবে এটি সমস্ত শিটটি আড়াল করার চেষ্টা করবে তবে এক্সেলের কমপক্ষে একটি শীট দৃশ্যমান হতে হবে। সুতরাং আমাদের জানাতে হবে কোন শীটটি লুকানো উচিত নয়।
কোড:
অ্যাক্টিভ ওয়ার্কবুক-ওয়ার্কশিটগুলিতে ডাব্লু ডাব্লুএস ওয়ার্কশিট হিসাবে ডাব্লু ডাব্লু ওয়ার্কশীট হিসাবে
দ্য অপারেটর প্রতীক মানে ভিবিএ তে সমান নয়.
সুতরাং কোডটি বলে যে আপনি যখন সক্রিয় ওয়ার্কবুকের সমস্ত ওয়ার্কশিটগুলিতে লুপিং করছেন কেবল তখনই লুকাতে হবে যখন শীটের নাম মেইন শিটের শিটের নামের সাথে সমান হয় না।
এটি ভিবিএতে আইএফ স্টেটমেন্ট ব্যবহার করে করা যেতে পারে। কোডটি আইএফ ডাব্লু.এসনাম হিসাবে “মেইন শিট” লিখুন তারপরে লুকান বা এটি শীট নামটির সাথে "মেইন শীট" এর সমান হয় তবে আড়াল করবেন না।
পদক্ষেপ 5: এখন কোডটি এফ 5 কী বা ম্যানুয়ালি ব্যবহার করে চালান, এটি "মেইন শীট" হিসাবে নামক ব্যতীত সমস্ত কার্যপত্রকটি আড়াল করবে।
উদাহরণ # 3 - সমস্ত পত্রক প্রদর্শন করুন
আমরা দেখতে পেয়েছি কীভাবে সমস্ত শিটগুলিকে আমরা কীভাবে আড়াল করব সেগুলি ছাড়া কীভাবে। একইভাবে আমরা সমস্ত কার্যপত্রকটিও লুকিয়ে রাখতে পারি।
আমাদের কেবল কোডটি পরিবর্তন করা দরকার xlSheetVeryHided প্রতি xlSheetVisible।
কোড:
অ্যাক্টিভ ওয়ার্কবুক-ওয়ার্কশিটগুলিতে ওয়ার্কশিট = এক্সএলশীটভিজিবল নেক্সট ডাব্লু সমাপ্ত সাব
এখানে আমাদের যদি আইফির শর্তের প্রয়োজন হয় না কারণ আমরা সমস্ত শিটটি গোপন করছি। আপনি যদি কোনও নির্দিষ্ট শীটটি গোপন রাখতে না চান তবে আপনি যদি আইএফ শর্তটি ব্যবহার করতে পারেন এবং শীটের নাম সরবরাহ করতে পারেন।
উদাহরণ # 4 - সমস্ত পত্রক সুরক্ষিত এবং আনপ্রোটেক্ট করুন
সমস্ত পত্রক সংরক্ষণ করুন: আমরা কেবলমাত্র এক টুকরো কোড দিয়ে ওয়ার্কবুকের সমস্ত শীটকে সুরক্ষা দিতে পারি। সমস্ত কোড একই জিনিস যা আমাদের এখানে করতে হবে তা ডাব্লু এর পরিবর্তে। দৃশ্যমান আমাদের কোড ডাব্লু লাগাতে হবে। সুরক্ষা এবং পাসওয়ার্ড টাইপ করুন।
কোড:
অ্যাক্টিভ ওয়ার্কবুক. ওয়ার্কশিটস ডাব্লু.স্রোকেট পাসওয়ার্ডে সাব ফোর_এচ_এক্সেম্পল ৪ () ডিএম ডাব্লু ওয়ার্কশিট হিসাবে ওয়ার্কশিট হিসাবে: = "এক্সেল @ 2019" নেক্সট ডাব্লু এন্ড সাব
সমস্ত পত্রককে অরক্ষিত করুন: অনুরূপ নোটে, ভিবিএ ব্যবহার করে আমরা ওয়ার্কবুকটিতে সুরক্ষিত সমস্ত শিটগুলি অরক্ষিত করতে পারি। আমাদের কেবল অপ্রয়োজনীয় এবং পাসওয়ার্ড শব্দটি রাখা দরকার।
কোড:
অ্যাক্টিভ ওয়ার্কবুক.ওয়ার্কশীট Ws.Unprotect পাসওয়ার্ডে প্রতিটি Ws এর ওয়ার্কশিট হিসাবে ডিম ডাব্লু ডাব্লুএসকে ডাব্লু ডাব্লু
মনে রাখার মতো ঘটনা
- প্রতিটি বস্তু সংগ্রহের জন্য।
- এটি সুনির্দিষ্ট ওয়ার্কবুকের সমস্ত নির্দিষ্ট বস্তু বিবেচনা করবে।
- ভেরিয়েবল ঘোষণার সময় আমাদের প্রয়োজন হয় আমরা কোন বস্তুর সাথে উল্লেখ করছি। উদাহরণস্বরূপ ওয়ার্কশিট, ওয়ার্কবুক, চার্ট ইত্যাদি
