সুচিপত্র
আপনি যদি VBA ব্যবহার করে সারি মুছে ফেলার কিছু সহজ উপায় খুঁজছেন, তাহলে আপনি সঠিক জায়গায় আছেন।
আসুন মূল নিবন্ধে ডুব দেওয়া যাক।
ওয়ার্কবুক ডাউনলোড করুন
VBA Delete Row.xlsm
14 VBA ব্যবহার করে সারি মুছে ফেলার উপায়
এখানে, আমার কাছে তিনটি ডেটা আছে VBA ব্যবহার করে সারি মুছে ফেলার উপায় দেখানোর জন্য টেবিল। প্রথম টেবিলে একটি কোম্পানির কিছু পণ্য এবং তাদের আকার , দাম রয়েছে।
দ্বিতীয়টি একটিতে কিছু পণ্য কোড এবং তাদের সংশ্লিষ্ট পণ্যের আকার এবং মূল্য
11>
এবং শেষটিতে রয়েছে কিছু প্রকল্পের নাম এবং তাদের নিজ নিজ শুরু করার তারিখ এবং খরচ ।
নিবন্ধ তৈরি করার জন্য, আমি Microsoft Excel 365 সংস্করণ ব্যবহার করেছেন, আপনি আপনার সুবিধা অনুযায়ী অন্য যেকোনো সংস্করণ ব্যবহার করতে পারেন।
পদ্ধতি-1: VBA ব্যবহার করে একটি একক সারি মুছুন
ধরুন, আপনি পণ্য জুতা 1, যুক্ত সারিটি মুছে ফেলতে চান এবং এই একক সারিটি মুছতে আপনি এই পদ্ধতিটি অনুসরণ করতে পারেন৷
ধাপ-01 :
➤এ যান ডেভেলপার ট্যাব>> ভিজ্যুয়াল বেসিক বিকল্প
তারপর, ভিজ্যুয়াল বেসিক এডিটর খুলবে।
➤এ যান ঢোকান ট্যাব>> মডিউল বিকল্প
এর পরে, একটি মডিউল তৈরি হবে৷
পদক্ষেপ-02 :
➤ফলটি লিখুন নিম্ন কোড
8583
এখানে, "একক" হল 11/12/2021 তারিখ থাকা কক্ষগুলির সাথে সংশ্লিষ্ট একাধিক রেঞ্জের মিলন, এবং অবশেষে, রেঞ্জগুলি মুছে ফেলা হবে৷
➤ চাপুন F5
ফলাফল :
এর পরে, আপনি 11/12/2021 একটি নির্দিষ্ট তারিখের সারিগুলি মুছে ফেলবেন .
সম্পর্কিত বিষয়বস্তু: Excel VBA নির্দিষ্ট ডেটা সহ সারি মুছে ফেলুন (9 উদাহরণ)
অনুশীলন করুন বিভাগ
নিজে অনুশীলন করার জন্য আমরা অভ্যাস নামের একটি শিটে নীচের মত একটি অনুশীলন বিভাগ প্রদান করেছি। অনুগ্রহ করে এটি নিজে করুন৷
উপসংহার
এই নিবন্ধে, আমি VBA কার্যকরভাবে ব্যবহার করার সবচেয়ে সহজ উপায়গুলি কভার করার চেষ্টা করেছি সারি মুছে ফেলা হচ্ছে। আশা করি আপনার কাজে লাগবে। যদি আপনার কোন পরামর্শ বা প্রশ্ন থাকে, তাহলে মন্তব্য বিভাগে সেগুলি শেয়ার করুন৷
৷ওয়ার্কশীটের নাম, এবং সারি(7)সারি নম্বর নির্বাচন করবে।.EntireRow.Delete সম্পূর্ণ সারি 7 মুছে ফেলবে।
➤ চাপুন F5
ফলাফল :
এইভাবে, আপনি <1 সম্বলিত সারিটি মুছে ফেলবেন>পণ্য নাম জুতা 1 ।
আরো পড়ুন: এক্সেলের সারিগুলি কীভাবে মুছবেন: 7 পদ্ধতি
পদ্ধতি-2: VBA ব্যবহার করে একাধিক সারি মুছুন
যদি আপনি পণ্য নাম জুতা1<ধারণকারী সারিগুলির মত একাধিক সারি মুছে ফেলতে চান 9>, Shoe2, এবং Shoe3 , তারপর আপনি এই VBA কোডটি অনুসরণ করতে পারেন৷
ধাপ-01 :
➤অনুসরণ করুন পদক্ষেপ-01 এর পদ্ধতি-1
2431
এখানে, সারি সংখ্যা 13, 10 , এবং 7 মুছে ফেলা হবে এবং ক্রমিকভাবে লিখিত সারি নম্বরগুলি আপনাকে শেষ সারি নম্বর থেকে এই কোডের মতো প্রথম-সারির নম্বরে লিখতে হবে৷
অন্যথায়, প্রথম সারি মুছে ফেলার পরে সারি 7 এর মতো বাকিগুলি এই সারির নীচের সারিগুলি একটি সারিকে উপরে নিয়ে যাবে এবং এইভাবে 10 নং সারিটি হবে 9 নং সারি এবং 13 নং সারিটি 12 নং সারি হবে৷ ason, আপনি সঠিক সারি মুছে ফেলতে পারবেন না।
➤ চাপুন F5
ফলাফল :
তারপর, আপনি পণ্য নামের Shoe 1 , Shoe2, এবং Shoe3 নামের সারিগুলি মুছে ফেলবেন।
আরো পড়ুন: এক্সেলের একাধিক সারি কীভাবে মুছবেন (3টি পদ্ধতি)
পদ্ধতি-3 :
নির্বাচন করে একটি সারি মুছে ফেলা এখানে, আমি একটি সারি মুছে ফেলার উপায় দেখাবসেই সারির একটি সক্রিয় কক্ষের ক্ষেত্রে।
ধাপ-01 :
➤অনুসরণ করুন ধাপ-01 এর পদ্ধতি-1
7057
এটি একটি সক্রিয় সেল থাকা সারিটি মুছে দেবে।
25>
➤কোডটি সংরক্ষণ করুন।
ধাপ-02 :
➤ আপনি মুছে ফেলতে চান এমন একটি সারির যেকোন সেল নির্বাচন করুন ( এখানে আমি সেল B7 )
➤ ডেভেলপার ট্যাব>> ম্যাক্রো বিকল্প
26>
এর পরে, ম্যাক্রো <2 এ যান>উইজার্ড খুলবে।
➤ ম্যাক্রো নাম dltrow3 নির্বাচন করুন এবং চালান
<3 টিপুন
ফলাফল :
পরে, আপনি পণ্য নাম জুতা 1 সম্বলিত সারিটি মুছে ফেলবেন।
পদ্ধতি-4: নির্বাচনের সমস্ত সারি মুছে ফেলা
একটি নির্বাচনের সমস্ত সারি মুছে ফেলার জন্য আপনি এই পদ্ধতিটি অনুসরণ করতে পারেন৷
ধাপ-01 :
➤অনুসরণ করুন পদ্ধতি-1
4469
এর ধাপ-01 অনুসরণ করুন নির্বাচনের সমস্ত সারি মুছে ফেলবে৷
➤ কোডটি সংরক্ষণ করুন৷
ধাপ-02 :
➤ আপনি মুছে ফেলতে চান এমন সারিগুলির পরিসর নির্বাচন করুন (এখানে, আমি পরিসর নির্বাচন করেছি B7:D9 )
➤ ডেভেলপার ট্যাব>> ম্যাক্রোস বিকল্প
<0 এ যানএর পরে, ম্যাক্রো উইজার্ড খুলবে।
➤ ম্যাক্রো নাম dltrow4 নির্বাচন করুন এবং Run
Result :
চাপুন তারপর, আপনি ধারণকারী সারিগুলি মুছে ফেলবেন পণ্যের নাম জুতা 1 , জ্যাকেট1, এবং জ্যাকেট2 ।
আরো পড়ুন: এক্সেলের নির্বাচিত সারিগুলি কীভাবে মুছবেন (8 পদ্ধতি)
পদ্ধতি-5: কোনো সেল খালি থাকলে একটি সারি মুছে ফেলা
এখানে, আমার কাছে একটি খালি সেল আছে যা হল B9 (এর জন্য আমি এই সেল থেকে মান সরিয়ে দিয়েছি পদ্ধতি), এবং একটি VBA কোড ব্যবহার করে আমি B9 সেলের সারিটি মুছে দেব।
ধাপ-01 :
➤অনুসরণ করুন পদক্ষেপ-01 এর পদ্ধতি-1
2602
এটি <1 রেঞ্জের সমস্ত সারি মুছে দেবে>“B5:D13” কোনও ফাঁকা ঘর আছে।
➤ চাপুন F5
ফলাফল :
তারপর, আপনি ফাঁকা ঘর সম্বলিত সারিটি মুছে ফেলতে সক্ষম হবেন৷
আরো পড়ুন: কিভাবে এক্সেলে খালি সারি অপসারণ করবেন (11 পদ্ধতি)
পদ্ধতি-6: একটি সারি মুছে ফেলা যদি পুরো সারিটি খালি থাকে
এখানে, আমার একটি খালি সেল আছে যা হল B9 (আমি এই পদ্ধতির মানগুলি সরিয়ে দিয়েছি), এবং একটি খালি সারি যা হল সারি 12 (আমি এই পদ্ধতির মানগুলি সরিয়ে দিয়েছি), এবং একটি VBA কোড এবং <1 ব্যবহার করে>COUNTA ফাংশন আমি যে সারিটি খালি আছে সেটি মুছে দেব।
ধাপ-01 :
➤অনুসরণ করুন ধাপ-01 এর পদ্ধতি-1
5701
"B5:D13" হল ডেটা পরিসর এবং FOR লুপ প্রতিটি কক্ষের জন্য কাজ করবে এই পরিসর।
CountA(cell.EntireRow) অ-খালি ঘরের সংখ্যা ফেরত দেবে এবং যখন এটি 0 হবে তখন সারিটি মুছে ফেলা হবে।
<38
➤ চাপুন F5
ফলাফল :
এর পরে, আপনি খালি সারিটি মুছে ফেলতে সক্ষম হবেন তবে এটি কোনও সারি মুছে ফেলবে না যেখানে সমস্ত কিছুই নেই এই সারির ঘরগুলি খালি৷
আরো পড়ুন: এক্সেলের ফাঁকা সারিগুলি মুছতে কীভাবে VBA ব্যবহার করবেন
পদ্ধতি-7: প্রতিটি nম সারি মুছে ফেলা
এই পদ্ধতি অনুসরণ করে আপনি প্রতিটি nম সারি (এই ক্ষেত্রে প্রতি 3য় সারি) মুছে ফেলতে পারেন।
<0 ধাপ-01:
➤অনুসরণ করুন পদ্ধতি-1
5937
“B5 :D13” এটি ডেটা পরিসর এবং rc এই রেঞ্জের মোট সারি নম্বর প্রদান করবে যা হল 9 ।
এখানে, ফর লুপ শেষ সারি থেকে শুরু হবে যা এই ক্ষেত্রে rc বা 9 এবং প্রথম সারি দিয়ে শেষ হবে।
ধাপ -3 এই রেঞ্জের প্রতিটি 3য় সারি মুছে ফেলতে সাহায্য করবে।
➤ F5
<টিপুন 1>ফলাফল :
তারপর, আপনি পণ্য নামের জুতা 1 , জুতা2, এবং <8 সম্বলিত সারিগুলি মুছে ফেলবেন>Shoe3 ।
আরো পড়ুন: প্রতি তম আর কিভাবে মুছে ফেলবেন ow Excel-এ (সবচেয়ে সহজ 6 উপায়)
একই রকম রিডিং:
- এক্সেল ভিবিএ দিয়ে কীভাবে নির্বাচিত সারিগুলি মুছবেন (একটি ধাপ- বাই-স্টেপ গাইডলাইন)
- এক্সেলে অব্যবহৃত সারিগুলি মুছুন (8 সহজ উপায়)
- এক্সেলে লুকানো সারিগুলি কীভাবে মুছবেন (3 পদ্ধতি)
- এক্সেলে অসীম সারিগুলি মুছুন (5টি সহজ উপায়)
- এক্সেলের সারিগুলি কীভাবে মুছবেন যা চিরকালের জন্য চলে (4টি সহজউপায়)
পদ্ধতি-8: সেল মানের উপর ভিত্তি করে সারি মুছে ফেলা
এই পদ্ধতিতে, আমি একটি নির্দিষ্ট মানযুক্ত সারি মুছে দেব শার্ট 2 ।
ধাপ-01 :
➤অনুসরণ করুন পদক্ষেপ-01 এর পদ্ধতি- 1
8352
“B5:D13” ডাটা পরিসর এবং FOR লুপ এই পরিসরের প্রতিটি কক্ষের জন্য কাজ করবে।
যদি সারির যেকোনো ঘরে “শার্ট 2” মান থাকে তাহলে সারিটি মুছে যাবে।
➤ F5<2 টিপুন
ফলাফল :
এইভাবে, আপনি পণ্য নাম শার্ট 2 সম্বলিত সারিটি মুছে ফেলবেন।
আরো পড়ুন: সেলে এক্সেলের মান থাকলে সারি মুছে ফেলার জন্য VBA ম্যাক্রো (2 পদ্ধতি)
পদ্ধতি-9: ডুপ্লিকেট সারি মুছে ফেলা
এখানে, আমার কাছে পণ্য কোড 97375 সহ দুটি সারি রয়েছে এবং তাই আমি এই সারিগুলির একটি মুছে ফেলতে চাই যা দ্বারা চিহ্নিত করা হয়েছে নিচে একটি লাল বক্স।
ধাপ-01 :
➤অনুসরণ করুন ধাপ-01 এর পদ্ধতি-1
8765
এখানে, “B5:D13” ডাটা পরিসীমা এবং কলাম:=1 আমি উত্তর এটি শুধুমাত্র একটি কলামে ডুপ্লিকেট মানগুলি অনুসন্ধান করবে যা শুরুর কলাম কলাম B কিন্তু আপনি যদি অন্য কলামগুলিতেও অনুসন্ধান করতে চান তবে আপনি আপনার প্রয়োজন অনুসারে এই নম্বরটি ব্যবহার করতে পারেন৷
➤ চাপুন F5
ফলাফল :
পরে, আপনি সারিটি মুছে ফেলতে সক্ষম হবেন যা অন্য সারির অনুরূপ।
আরো পড়ুন: কিভাবে ডুপ্লিকেট সারি মুছে ফেলবেনVBA সহ এক্সেল (8 কার্যকরী উপায়)
পদ্ধতি-10: একটি টেবিলের সারি মুছে ফেলা
ধরুন, আপনার কাছে নিম্নলিখিত টেবিল রয়েছে যার নাম টেবিল1 এবং এখন আপনি এই টেবিলের সারি নম্বর 6 মুছতে চান। এটি করার জন্য আপনি এই পদ্ধতিটি অনুসরণ করতে পারেন।
ধাপ-01 :
➤অনুসরণ করুন ধাপ-01 <2 পদ্ধতি-1
1974
এখানে, "টেবিল" পত্রকের নাম, "টেবিল1" হল টেবিলের নাম এবং 6 এই টেবিলের সারি নম্বর যা আপনি মুছতে চান।
➤ F5
<1 টিপুন>ফলাফল :
এইভাবে, আপনি এই টেবিলের আপনার কাঙ্খিত সারি মুছে ফেলবেন।
আরো পড়ুন: এক্সেল VBA ব্যবহার করে একটি কলামের উপর ভিত্তি করে ডুপ্লিকেট সারিগুলি কীভাবে সরানো যায়
পদ্ধতি-11: ফিল্টার করার পরে দৃশ্যমান সারিগুলি মুছে ফেলা
এখানে, আমার কাছে একটি ডেটা টেবিল রয়েছে যা ফিল্টার করা হয়েছে মূল্য $1,500.00 এর বেশি মানের জন্য কলাম এবং আমি ফিল্টার করার পরে সমস্ত দৃশ্যমান সারি মুছে ফেলতে চাই৷
ধাপ-01 :
➤অনুসরণ করুন পদক্ষেপ-01 এর পদ্ধতি-1
2630
এখানে, “B5: D13” হলো ডেটা পরিসর।
➤ F5
এখন, ফিল্টার করার পর দৃশ্যমান সব সারি টিপুন মুছে ফেলা আপনি এখন মূল্য কলামে ফিল্টার সাইন নির্বাচন করে লুকানো সারিগুলি ফিরিয়ে আনতে পারেন৷
➤এ ক্লিক করুন 1>সমস্ত নির্বাচন করুন বিকল্প
➤ চাপুন ঠিক আছে
ফলাফল :
অবশেষে, আপনি লুকানো সারিগুলি ফিরে পাবেনডাটা টেবিল।
আরো পড়ুন: এক্সেলে VBA দিয়ে সারি ফিল্টার এবং মুছে ফেলার উপায় (2 পদ্ধতি) <3
পদ্ধতি-12: লাস্ট অ্যাক্টিভ সেলের উপর ভিত্তি করে সারি মুছে ফেলা হচ্ছে
এখানে, আমার শেষ সক্রিয় সেল হল সেল B13 এবং আমি নিচের শেষ সক্রিয় সেলটি মুছে ফেলতে চাই ডেটা টেবিল।
ধাপ-01 :
➤অনুসরণ করুন পদক্ষেপ-01 এর পদ্ধতি -1
8161
এখানে, 2 এর অর্থ হল কলাম B যেখানে আমার সক্রিয় সেল আছে, আপনি আপনার প্রয়োজন অনুযায়ী নম্বর পরিবর্তন করতে পারেন।<3
➤ চাপুন F5
ফলাফল :
এইভাবে, আপনি আপনার মুছে ফেলবেন শেষ সক্রিয় সারি।
আরো পড়ুন: এক্সেল VBA কোড একাধিক সেল ভ্যালুর উপর ভিত্তি করে সারি মুছে ফেলতে (3 মানদণ্ড)
পদ্ধতি-13: যেকোনো স্ট্রিং থাকলে সারি মুছে ফেলা
ধরুন, আপনি যে কোনো স্ট্রিং থাকা সারি মুছে ফেলতে চান এবং এটি করতে আপনি এই পদ্ধতি অনুসরণ করতে পারেন।
<64
ধাপ-01 :
➤অনুসরণ করুন পদ্ধতি-1
9828<0 এর ধাপ-01 অনুসরণ করুন>এখানে, “স্ট্রিং” শিটের নাম, এই ডেটা রেঞ্জের প্রথম-সারির নম্বর হল 5 এবং শুরুর কলাম নম্বর হল 2
With স্টেটমেন্ট আপনাকে একটি বস্তু নির্দিষ্ট করতে দেয় অথবা বিবৃতিগুলির একটি সম্পূর্ণ সিরিজের জন্য একবার ব্যবহারকারী-সংজ্ঞায়িত টাইপ।
অন-এরর রিজুম নেক্সট স্টেটমেন্টে উল্লেখ করা হয়েছে যে, যখন একটি রান-টাইম ত্রুটি দেখা দেয়, তখন কন্ট্রোল স্টেটমেন্টের অনুসরণ করে স্টেটমেন্টে যায় যেখানে ত্রুটি দেখা দেয়।
LastRow এবং LastColumn ডেটা পরিসরের শেষ সারি এবং কলাম ফেরত দেয়।
SpecialCells(xlCellTypeConstants, xlTextValues) তে যে কোন টেক্সট মান আছে এমন সারি নির্বাচন করবে পরিসীমা।
➤ চাপুন F5
ফলাফল :
পরে, আপনি পাবেন যেকোনো টেক্সট স্ট্রিং আছে এমন সারি মুছে দিন।
আরো পড়ুন: সারি মুছে ফেলার জন্য এক্সেল শর্টকাট (বোনাস কৌশল সহ) <3
পদ্ধতি-14: তারিখের উপর ভিত্তি করে সারি মুছে ফেলা
এখানে, আমি এখানে একটি বিশেষ তারিখের সারিগুলি মুছে দেব 11/12/2021 (mm/dd/yyyy) DATEVALUE ফাংশন ব্যবহার করে পদ্ধতি।
ধাপ-01 :
➤অনুসরণ করুন ধাপ- 01 এর পদ্ধতি-1
4437
এখানে, "তারিখ" শিটের নাম, এই ডেটা রেঞ্জের প্রথম-সারির নম্বর হল 5 এবং মানদণ্ডের কলামটি (যে কলামে তারিখ রয়েছে) সংখ্যা হল 3 ।
সহ বিবৃতিটি আপনাকে একবার একটি বস্তু বা ব্যবহারকারী-সংজ্ঞায়িত প্রকার নির্দিষ্ট করতে দেয় বিবৃতিগুলির একটি সম্পূর্ণ সিরিজের জন্য।
অন-এরর রিজিউম নেক্সট বিবৃতিতে উল্লেখ করা হয়েছে যে, যখন একটি রান-টাইম ত্রুটি ঘটে, তখন কন্ট্রোল বিবৃতিতে চলে যায় যেখানে ত্রুটি ঘটে।
LastRow ডেটা পরিসরের শেষ সারিটি ফেরত দেয় এবং এখানে FOR লুপ শেষ সারি থেকে শুরু হবে যা LastRow অথবা 6 এই ক্ষেত্রে, এবং প্রথম সারি দিয়ে শেষ হবে।
DATEVALUE টেক্সট তারিখকে মানে রূপান্তর করবে।
এখানে, ইউনিয়ন টি ফেরত দেবে