જો તમે VBA નો ઉપયોગ કરીને પંક્તિ કાઢી નાખવાની કેટલીક સરળ રીતો શોધી રહ્યાં છો, તો તમે યોગ્ય સ્થાને છો.

ચાલો મુખ્ય લેખમાં જઈએ.

વર્કબુક ડાઉનલોડ કરો

VBA નો ઉપયોગ કરીને પંક્તિ કાઢી નાખવાની 14 રીતો

અહીં, મારી પાસે ત્રણ ડેટા છે VBA નો ઉપયોગ કરીને પંક્તિઓ કાઢી નાખવાની રીતો બતાવવા માટે કોષ્ટકો. પ્રથમ કોષ્ટકમાં કંપનીના કેટલાક ઉત્પાદનો અને તેમના કદ , કિંમત છે.

બીજા એક પાસે કેટલાક ઉત્પાદન કોડ્સ અને તેમના અનુરૂપ ઉત્પાદન કદ અને કિંમત

અને છેલ્લું કોડ ધરાવે છે કેટલાક પ્રોજેક્ટ નામો અને તેમના સંબંધિત પ્રારંભ તારીખો અને ખર્ચ .

લેખ બનાવવા માટે, હું Microsoft Excel 365 સંસ્કરણનો ઉપયોગ કર્યો છે, તમે તમારી અનુકૂળતા અનુસાર કોઈપણ અન્ય સંસ્કરણોનો ઉપયોગ કરી શકો છો.

પદ્ધતિ-1: VBA નો ઉપયોગ કરીને એક પંક્તિ કાઢી નાખો

ચાલો, તમે ઉત્પાદન જૂતા 1, ધરાવતી પંક્તિને કાઢી નાખવા માંગો છો અને આ એક પંક્તિને કાઢી નાખવા માટે તમે આ પદ્ધતિને અનુસરી શકો છો.

સ્ટેપ-01 :

➤ ડેવલપર ટેબ>> વિઝ્યુઅલ બેઝિક વિકલ્પ

પછી, વિઝ્યુઅલ બેઝિક એડિટર ખુલશે.

➤ ઇનસર્ટ ટેબ>> મોડ્યુલ વિકલ્પ

તે પછી, એક મોડ્યુલ બનાવવામાં આવશે.

સ્ટેપ-02 :

➤ફોલ લખો લોઇંગ કોડ

6976

અહીં, "સિંગલ" છે 11/12/2021 તારીખ ધરાવતા કોષોને અનુરૂપ બહુવિધ શ્રેણીઓનું જોડાણ અને અંતે, શ્રેણીઓ કાઢી નાખવામાં આવશે.

➤ દબાવો F5

પરિણામ :

તે પછી, તમે 11/12/2021 ની ચોક્કસ તારીખવાળી પંક્તિઓ કાઢી નાખશો .

સંબંધિત સામગ્રી: વિશિષ્ટ ડેટા (9 ઉદાહરણો) સાથે પંક્તિઓ કાઢી નાખવા માટે એક્સેલ VBA

પ્રેક્ટિસ વિભાગ

તમારી જાતે પ્રેક્ટિસ કરવા માટે અમે પ્રેક્ટિસ નામની શીટમાં નીચેની જેમ પ્રેક્ટિસ વિભાગ પ્રદાન કર્યો છે. કૃપા કરીને તે જાતે કરો.

નિષ્કર્ષ

આ લેખમાં, મેં VBA નો અસરકારક રીતે ઉપયોગ કરવાની સૌથી સરળ રીતોને આવરી લેવાનો પ્રયાસ કર્યો પંક્તિઓ કાઢી રહ્યા છીએ. આશા છે કે તમને તે ઉપયોગી લાગશે. જો તમારી પાસે કોઈ સૂચનો અથવા પ્રશ્નો હોય, તો તેને ટિપ્પણી વિભાગમાં શેર કરવા માટે નિઃસંકોચ.

.EntireRow.Delete સમગ્ર પંક્તિ 7 કાઢી નાખશે.

➤ દબાવો F5

પરિણામ :

આ રીતે, તમે <1 ધરાવતી પંક્તિ કાઢી નાખશો>ઉત્પાદન નામ જૂતા 1 .

વધુ વાંચો: એક્સેલમાં પંક્તિઓ કેવી રીતે કાઢી નાખવી: 7 પદ્ધતિઓ

પદ્ધતિ-2: VBA નો ઉપયોગ કરીને બહુવિધ પંક્તિઓ કાઢી નાખો

જો તમે ઉત્પાદન નામો જૂતા1<ધરાવતી પંક્તિઓ જેવી ઘણી પંક્તિઓ કાઢી નાખવા માંગતા હો. 9>, Shoe2, અને Shoe3 , પછી તમે આ VBA કોડને અનુસરી શકો છો.

સ્ટેપ-01 :

➤અહીં, પંક્તિ નંબર 13, 10 , અને 7 કાઢી નાખવામાં આવશે અને ક્રમિક રીતે લખવામાં આવતા પંક્તિ નંબરો તમારે છેલ્લી પંક્તિ નંબરથી આ કોડની જેમ પ્રથમ-પંક્તિ નંબર પર લખવાના છે.

નહીંતર, પ્રથમ પંક્તિ જેમ કે પંક્તિ 7 કાઢી નાખ્યા પછી બાકીની આ પંક્તિની નીચેની પંક્તિઓ એક પંક્તિને ઉપર લઈ જશે અને આમ પંક્તિ 10 એ પંક્તિ 9 હશે અને 13મી પંક્તિ 12મી પંક્તિ હશે. આ માટે ફરીથી આસન, તમે સાચી પંક્તિઓ કાઢી નાખવામાં સમર્થ હશો નહીં.

➤ F5

પરિણામ દબાવો :

પછી, તમે ઉત્પાદન નામો જૂતા 1 , શૂ2, અને શૂ3 ધરાવતી પંક્તિઓ કાઢી નાખશો.

વધુ વાંચો: એક્સેલમાં બહુવિધ પંક્તિઓ કેવી રીતે કાઢી નાખવી (3 પદ્ધતિઓ)

પદ્ધતિ-3 :

પસંદ કરીને પંક્તિ કાઢી નાખવી, અહીં, હું પંક્તિ કાઢી નાખવાનો માર્ગ બતાવીશતે પંક્તિના સક્રિય કોષના સંદર્ભમાં.

સ્ટેપ-01 :

➤ફોલો કરો સ્ટેપ-01 માંથી પદ્ધતિ-1

5673

તે સક્રિય સેલ ધરાવતી પંક્તિને કાઢી નાખશે.

➤કોડ સાચવો.

સ્ટેપ-02 :

➤તમે ડિલીટ કરવા માંગતા હો તે પંક્તિનો કોઈપણ સેલ પસંદ કરો ( અહીં મેં સેલ B7 પસંદ કર્યો છે)

➤ વિકાસકર્તા ટેબ>> મેક્રોઝ વિકલ્પ

તે પછી, મેક્રો <2 પર જાઓ>વિઝાર્ડ ખુલશે.

➤ મેક્રો નામ dltrow3 પસંદ કરો અને ચલાવો

<3 દબાવો>

પરિણામ :

પછી, તમે ઉત્પાદન નામ જૂતા 1 ધરાવતી પંક્તિ કાઢી નાખશો.

પદ્ધતિ-4: પસંદગીની બધી પંક્તિઓ કાઢી નાખવી

પસંદગીની તમામ પંક્તિઓ કાઢી નાખવા માટે તમે આ પદ્ધતિને અનુસરી શકો છો.

સ્ટેપ-01 :

➤ ફોલો કરો પદ્ધતિ-1

6183

તે પસંદગીની બધી પંક્તિઓ કાઢી નાખશે.

➤કોડ સાચવો.

સ્ટેપ-02 :

➤તમે કાઢી નાખવા માંગો છો તે પંક્તિઓની શ્રેણી પસંદ કરો (અહીં, મેં શ્રેણી B7:D9 પસંદ કરી છે)

➤ વિકાસકર્તા ટેબ>> મેક્રોઝ વિકલ્પ

તે પછી, મેક્રો વિઝાર્ડ ખુલશે.

➤ મેક્રો નામ dltrow4 પસંદ કરો અને ચલાવો

પરિણામ :

પછી, તમે ધરાવતી પંક્તિઓ કાઢી નાખશો. ઉત્પાદન નામો જૂતા 1 , જેકેટ1, અને જેકેટ2 .

વધુ વાંચો: એક્સેલમાં પસંદ કરેલી પંક્તિઓ કેવી રીતે કાઢી નાખવી(8 અભિગમો)

પદ્ધતિ-5: જો કોઈ સેલ ખાલી હોય તો પંક્તિ કાઢી નાખવી

અહીં, મારી પાસે ખાલી સેલ છે જે B9 છે (મેં આ માટે આ સેલમાંથી વેલ્યુ દૂર કરી છે. પદ્ધતિ), અને VBA કોડનો ઉપયોગ કરીને હું B9 સેલ ધરાવતી પંક્તિ કાઢી નાખીશ.

પગલું-01 :

➤ અનુસરો પદ્ધતિ-1

7302

ના પગલું-01 તે શ્રેણી <1 માંની બધી પંક્તિઓ કાઢી નાખશે>“B5:D13” કોઈપણ ખાલી કોષ હોય.

➤ F5

પરિણામ<2 દબાવો>:

પછી, તમે ખાલી કોષ ધરાવતી પંક્તિને કાઢી નાખવામાં સમર્થ હશો.

વધુ વાંચો: Excel માં ખાલી પંક્તિઓ કેવી રીતે દૂર કરવી (11 પદ્ધતિઓ)

પદ્ધતિ-6: જો આખી પંક્તિ ખાલી હોય તો પંક્તિ કાઢી નાખવી

અહીં, મારી પાસે એક ખાલી સેલ છે જે <1 છે>B9 (મેં આ પદ્ધતિ માટેના મૂલ્યો દૂર કર્યા છે), અને એક ખાલી પંક્તિ કે જે પંક્તિ 12 છે (મેં આ પદ્ધતિ માટેના મૂલ્યો દૂર કર્યા છે), અને VBA કોડ અને <1 નો ઉપયોગ કરીને>COUNTA કાર્ય જે પંક્તિ ખાલી છે તે હું કાઢી નાખીશ.

સ્ટેપ-01 :

➤ફોલો કરો સ્ટેપ-01 ની પદ્ધતિ-1

3917

“B5:D13” ડેટા શ્રેણી છે અને FOR લૂપ દરેક કોષ માટે કામ કરશે આ શ્રેણી.

CountA(cell.EntireRow) બિન-ખાલી કોષોની સંખ્યા પરત કરશે અને જ્યારે તે 0 થશે ત્યારે પંક્તિ કાઢી નાખવામાં આવશે.

<38

➤ દબાવો1 આ પંક્તિના કોષો ખાલી છે.

વધુ વાંચો: એક્સેલમાં ખાલી પંક્તિઓ કાઢી નાખવા VBA નો ઉપયોગ કેવી રીતે કરવો

પદ્ધતિ-7: દરેક nમી પંક્તિ કાઢી નાખવી

તમે આ પદ્ધતિને અનુસરીને દરેક nમી પંક્તિ (આ કિસ્સામાં દર 3જી પંક્તિ) કાઢી શકો છો.

➤અનુસરો પદ્ધતિ-1

5431

“B5 માંથી પગલું-01 :D13” એ ડેટા રેંજ છે અને rc આ રેન્જની કુલ પંક્તિ નંબર આપશે જે 9 છે.

અહીં, માટે લૂપ છેલ્લી પંક્તિથી શરૂ થશે જે આ કિસ્સામાં rc અથવા 9 છે અને પ્રથમ પંક્તિ સાથે સમાપ્ત થાય છે.

સ્ટેપ -3 આ શ્રેણીની દરેક ત્રીજી પંક્તિને કાઢી નાખવામાં મદદ કરશે.

➤ F5

<દબાવો 1>પરિણામ :

પછી, તમે ઉત્પાદન નામો જૂતા 1 , શૂ2, અને <8 ધરાવતી પંક્તિઓ કાઢી નાખશો>Shoe3 .

વધુ વાંચો: દર nth R કેવી રીતે કાઢી નાખવું ow Excel માં (સૌથી સરળ 6 રીતો)

સમાન વાંચન:

• એક્સેલ VBA સાથે પસંદ કરેલી પંક્તિઓ કેવી રીતે કાઢી નાખવી (એક પગલું- બાય-સ્ટેપ માર્ગદર્શિકા)
• એક્સેલમાં બિનઉપયોગી પંક્તિઓ કાઢી નાખો (8 સરળ રીતો)
• એક્સેલમાં છુપાયેલી પંક્તિઓ કેવી રીતે કાઢી નાખવી (3 પદ્ધતિઓ)
• એક્સેલમાં અનંત પંક્તિઓ કાઢી નાખો (5 સરળ રીતો)
• એક્સેલમાં પંક્તિઓ કેવી રીતે કાઢી નાખવી જે કાયમ ચાલુ રહે છે (4 સરળરીતો)

પદ્ધતિ-8: સેલ વેલ્યુના આધારે પંક્તિ કાઢી નાખવી

આ પદ્ધતિમાં, હું ચોક્કસ મૂલ્ય ધરાવતી પંક્તિ કાઢી નાખીશ શર્ટ 2 .

સ્ટેપ-01 :

➤ફોલો કરો પદ્ધતિ-01 માંથી પદ્ધતિ- 1

1956

“B5:D13” ડેટા રેન્જ છે અને ફોર લૂપ આ રેન્જના દરેક કોષ માટે કામ કરશે.

જો પંક્તિના કોઈપણ કોષમાં “શર્ટ 2” મૂલ્ય હોય તો પંક્તિ કાઢી નાખવામાં આવશે.

➤ F5<2 દબાવો

પરિણામ :

આ રીતે, તમે ઉત્પાદન નામ શર્ટ 2 ધરાવતી પંક્તિ કાઢી નાખશો.

વધુ વાંચો: જો સેલમાં એક્સેલમાં મૂલ્ય હોય તો પંક્તિ કાઢી નાખવા માટે VBA મેક્રો (2 પદ્ધતિઓ)

પદ્ધતિ-9: ડુપ્લિકેટ પંક્તિઓ કાઢી નાખવી

અહીં, મારી પાસે પ્રોડક્ટ કોડ 97375 ધરાવતી બે પંક્તિઓ છે અને તેથી હું આ પંક્તિઓમાંથી એકને કાઢી નાખવા માંગુ છું જે દ્વારા ચિહ્નિત થયેલ છે. નીચે એક લાલ બૉક્સ.

સ્ટેપ-01 :

➤ સ્ટેપ-01 ને અનુસરો>મેથડ-1

5769

અહીં, “B5:D13” ડેટા રેન્જ છે અને કૉલમ્સ:=1 me જવાબ તે માત્ર એક કૉલમમાં ડુપ્લિકેટ મૂલ્યો શોધશે જે પ્રારંભિક કૉલમ છે કૉલમ B પરંતુ જો તમે અન્ય કૉલમમાં પણ શોધવા માંગતા હોવ તો તમે તમારી જરૂરિયાતો અનુસાર આ નંબરનો ઉપયોગ કરી શકો છો.

➤ દબાવો F5

પરિણામ :

પછીથી, તમે જે પંક્તિ છે તે કાઢી નાખવામાં સમર્થ હશો બીજી પંક્તિ જેવી જ.

વધુ વાંચો: માં ડુપ્લિકેટ પંક્તિઓ કેવી રીતે કાઢી નાખવીVBA સાથે એક્સેલ (8 અસરકારક રીતો)

પદ્ધતિ-10: કોષ્ટકમાંથી પંક્તિઓ કાઢી નાખવી

ધારો કે, તમારી પાસે નીચેનું કોષ્ટક છે જેનું નામ ટેબલ1 અને હવે તમે આ કોષ્ટકની પંક્તિ નંબર 6 કાઢી નાખવા માંગો છો. આ કરવા માટે તમે આ પદ્ધતિને અનુસરી શકો છો.

સ્ટેપ-01 :

➤ફોલો કરો સ્ટેપ-01 <2 પદ્ધતિ-1

5511

અહીં, "ટેબલ" શીટનું નામ છે, "ટેબલ1" ટેબલનું નામ છે અને 6 આ કોષ્ટકનો પંક્તિ નંબર છે જેને તમે કાઢી નાખવા માંગો છો.

➤ F5

<1 દબાવો>પરિણામ :

આ રીતે, તમે આ કોષ્ટકની તમારી ઇચ્છિત પંક્તિ કાઢી નાખશો.

વધુ વાંચો: એક્સેલ VBA નો ઉપયોગ કરીને એક કૉલમ પર આધારિત ડુપ્લિકેટ પંક્તિઓ કેવી રીતે દૂર કરવી

પદ્ધતિ-11: ફિલ્ટર કર્યા પછી દૃશ્યમાન પંક્તિઓ કાઢી નાખવી

અહીં, મારી પાસે ડેટા ટેબલ છે જે ફિલ્ટર કરેલું છે $1,500.00 કરતાં વધુ મૂલ્યો માટે કિંમત કૉલમ અને હું ફિલ્ટર કર્યા પછી બધી દૃશ્યમાન પંક્તિઓ કાઢી નાખવા માંગુ છું.

સ્ટેપ-01 :

➤અહીં, “B5: D13” એ ડેટા શ્રેણી છે.

➤ F5

હવે દબાવો, ફિલ્ટર કર્યા પછી બધી દૃશ્યમાન પંક્તિઓ કાઢી નાખવું. તમે હવે કિંમત કૉલમમાં ફિલ્ટર સાઇન પસંદ કરીને છુપાયેલી પંક્તિઓ પાછી લાવી શકો છો.

➤<પર ક્લિક કરો 1>બધા પસંદ કરો વિકલ્પ

➤ દબાવો ઓકે

પરિણામ :

અંતે, તમને છુપાયેલી પંક્તિઓ પાછી મળશેડેટા ટેબલ.

વધુ વાંચો: એક્સેલમાં VBA સાથે પંક્તિઓ કેવી રીતે ફિલ્ટર અને ડિલીટ કરવી (2 પદ્ધતિઓ) <3

પદ્ધતિ-12: છેલ્લા સક્રિય સેલના આધારે પંક્તિ કાઢી નાખવી

અહીં, મારો છેલ્લો સક્રિય સેલ સેલ છે B13 અને હું નીચેનામાંથી છેલ્લો સક્રિય સેલ ધરાવતો આને કાઢી નાખવા માંગુ છું. ડેટા ટેબલ.

સ્ટેપ-01 :

➤ફોલો કરો પદ્ધતિ-01 માંથી પદ્ધતિ -1

4362

અહીં, 2 નો અર્થ છે કૉલમ B જેના પર મારી પાસે મારો સક્રિય સેલ છે, તમે તમારી જરૂરિયાતો અનુસાર નંબર બદલી શકો છો.

➤ દબાવો F5

પરિણામ :

આ રીતે, તમે તમારા છેલ્લી સક્રિય પંક્તિ.

વધુ વાંચો: મલ્ટિપલ સેલ વેલ્યુ (3 માપદંડ) પર આધારિત પંક્તિઓ કાઢી નાખવા માટે એક્સેલ VBA કોડ

પદ્ધતિ-13: કોઈપણ સ્ટ્રીંગ ધરાવતી પંક્તિઓ કાઢી નાખવી

માની લો, તમે કોઈપણ સ્ટ્રિંગ ધરાવતી પંક્તિઓ કાઢી નાખવા માંગો છો, અને આ કરવા માટે તમે આ પદ્ધતિને અનુસરી શકો છો.

<64

પગલું-01 :

➤અનુસરો પદ્ધતિ-1

2138

સાથે સ્ટેટમેન્ટ તમને ઑબ્જેક્ટનો ઉલ્લેખ કરવા દે છે અથવા નિવેદનોની સમગ્ર શ્રેણી માટે એકવાર વપરાશકર્તા-વ્યાખ્યાયિત પ્રકાર.

ઓન એરર રેઝ્યૂમ નેક્સ્ટ સ્ટેટમેન્ટ સ્પષ્ટ કરે છે કે, જ્યારે રન-ટાઇમ ભૂલ થાય છે, ત્યારે કંટ્રોલ સ્ટેટમેન્ટને અનુસરે છે જ્યાં ભૂલ થાય છે.

છેલ્લી હરોળ અને LastColumn ડેટા શ્રેણીની છેલ્લી પંક્તિ અને કૉલમ પરત કરો.

SpecialCells(xlCellTypeConstants, xlTextValues) માં કોઈપણ ટેક્સ્ટ મૂલ્યો ધરાવતી પંક્તિઓ પસંદ કરશે શ્રેણી.

➤ દબાવો F5

પરિણામ :

પછીથી, તમે કોઈપણ ટેક્સ્ટ સ્ટ્રિંગ ધરાવતી પંક્તિઓ કાઢી નાખો.

વધુ વાંચો: પંક્તિઓ કાઢી નાખવા માટે એક્સેલ શોર્ટકટ (બોનસ તકનીકો સાથે) <3

પદ્ધતિ-14: તારીખોના આધારે પંક્તિ કાઢી નાખવી

અહીં, હું આમાં 11/12/2021 (mm/dd/yyyy) વિશેષ તારીખ ધરાવતી પંક્તિઓ કાઢી નાખીશ DATEVALUE ફંક્શન નો ઉપયોગ કરીને પદ્ધતિ.

સ્ટેપ-01 :

➤ફોલો કરો પગલું- 01 માંથી પદ્ધતિ-1

3798

અહીં, “તારીખ” શીટનું નામ છે, આ ડેટા શ્રેણીની પ્રથમ-પંક્તિ નંબર છે 5 અને માપદંડ કૉલમ (જે કૉલમમાં તારીખો છે) નંબર છે 3 .

સાથે સ્ટેટમેન્ટ તમને એકવાર ઑબ્જેક્ટ અથવા વપરાશકર્તા-વ્યાખ્યાયિત પ્રકારનો ઉલ્લેખ કરવા દે છે નિવેદનોની સમગ્ર શ્રેણી માટે.

ઓન એરર નેક્સ્ટ ફરી શરૂ કરો નિવેદન સ્પષ્ટ કરે છે કે, જ્યારે રન-ટાઇમ ભૂલ થાય છે, ત્યારે કંટ્રોલ સ્ટેટમેન્ટને અનુસરે છે જ્યાં ભૂલ થાય છે.

LastRow ડેટા રેન્જની છેલ્લી પંક્તિ પરત કરે છે અને અહીં, FOR લૂપ છેલ્લી પંક્તિથી શરૂ થશે જે આ કિસ્સામાં છેલ્લી હરોળ અથવા 6 છે, અને પ્રથમ પંક્તિ સાથે સમાપ્ત થાય છે.

DATEVALUE ટેક્સ્ટ તારીખને મૂલ્યમાં રૂપાંતરિત કરશે.

અહીં, યુનિયન