নীচে আমরা একটি প্রোগ্রাম দেখব এক্সেল ভিবিএ যা সবগুলির একটি প্রিন্ট প্রিভিউ দেখায় সম্ভাব্য ফুটবল ম্যাচ দলের একটি তালিকা থেকে।
পরিস্থিতি:
1. প্রথমে, আমরা একটি পরিসীমা বস্তু এবং চারটি পরিবর্তনশীল ঘোষণা করি। আমরা রেঞ্জ বস্তুকে rng বলি। একটি স্ট্রিং ভেরিয়েবলকে আমরা ম্যাচনাম বলি, এবং তিনটি ইন্টিজার ভেরিয়েবলকে আমরা কাউন্টার, আই এবং জে বলি।
কোনটিই নয়rngযেমনরেঞ্জ, ম্যাচনেমযেমন স্ট্রিং, পাল্টাযেমন পূর্ণসংখ্যা, আমিযেমন পূর্ণসংখ্যা, জেযেমন পূর্ণসংখ্যা2. আমরা দলের নাম দিয়ে rng আরম্ভ করি। আমরা ব্যাবহার করি বর্তমান অঞ্চল কারণ আমরা পরিসরের সঠিক সীমানা আগে থেকে জানি না (আমরা চাই এই প্রোগ্রামটি 3 টি দলের জন্য কিন্তু 12 টি দলের জন্যও কাজ করে)। আমরা মান 0 দিয়ে কাউন্টার আরম্ভ করি।
আমি কীভাবে স্ক্রোল লক আনলক করব?সেটrng = পরিসীমা ('A1')। CurrentRegion
কাউন্টার = 0
3. আমরা সম্ভাব্য সব ফুটবল ম্যাচ কলাম সি -তে লিখি, প্রথমে আমরা কলাম সি খালি করি।
ওয়ার্কশীট (1)। কলাম (3) = '4. আমরা শুরু a ডাবল লুপ ।
কিভাবে এক্সেল একটি শিরোনাম করতেজন্যআমি = 1প্রতিগণনা
জন্যj = i + 1প্রতিগণনা
5. আমরা পরিবর্তনশীল matchname একটি matchname লিখুন।
matchname = rng.Cells (i)। Value & 'vs' & rng.Cells (j)। মানউদাহরণস্বরূপ, i = 1 এবং j = 2 এর জন্য, এক্সেল ভিবিএ ম্যাচনেম কিকার্স বনাম শ্যুটার লিখে। I = 1 এবং j = 3 এর জন্য, Excel VBA matchname Kickers vs Little Giants ইত্যাদি লিখেছে।
6. আমরা ম্যাথনেম লিখি কলাম সি তে।
কোষ (কাউন্টার + 1, 3)। মান = matchname7. কাউন্টারটি কলাম সি -তে লিখিত ম্যাথনামগুলির সংখ্যা ট্র্যাক করে। এক্সেল ভিবিএ ইনক্রিমেন্ট কাউন্টার 1 দ্বারা প্রতিবার যখন এটি কলাম সি -তে একটি ম্যাচনাম লিখবে এটি অর্জন করতে, নিম্নলিখিত কোড লাইন যোগ করুন:
কাউন্টার = কাউন্টার + 18. দুটি লুপ বন্ধ করতে ভুলবেন না।
পরবর্তীjপরবর্তীআমি
9. আমরা সম্ভাব্য সব ফুটবল ম্যাচের প্রিন্ট প্রিভিউ দেখাই।
দুটি তারিখের মধ্যে সময়ের পার্থক্য গণনা করুনActiveSheet.Columns (3) .PrintPreview
10. প্রোগ্রামটি পরীক্ষা করুন।
ফলাফলের অংশ:
দ্রষ্টব্য: এই ফলাফল পেতে কলাম C ম্যানুয়ালি কেন্দ্রীভূত।
পরবর্তী অধ্যায়ে যান: পরিবর্তনশীল