Სარჩევი
ეს მოკლე სახელმძღვანელო განმარტავს, თუ როგორ უნდა წაშალოთ ყოველი მეორე მწკრივი Excel-ში გაფილტვრით ან VBA კოდით. თქვენ ასევე შეიტყობთ, თუ როგორ უნდა ამოიღოთ ყოველი მე-3, მე-4 ან ნებისმიერი სხვა N-ე მწკრივი.
არსებობს მრავალი შემთხვევა, როდესაც შეიძლება დაგჭირდეთ ალტერნატიული რიგების წაშლა Excel-ის სამუშაო ფურცლებში. მაგალითად, შეიძლება დაგჭირდეთ მონაცემების შენახვა ლუწი კვირების განმავლობაში (მწკრივები 2, 4, 6, 8 და ა.შ.) და გადაიტანოთ ყველა უცნაური კვირა (მწკრივი 3, 5, 7 და ა.შ.) სხვა ფურცელზე.
ზოგადად, Excel-ში ყოველი მეორე მწკრივის წაშლა ალტერნატიული სტრიქონების არჩევით მთავრდება. სტრიქონების არჩევის შემდეგ, ღილაკზე წაშლა ერთი ღილაკი საკმარისია. შემდგომ ამ სტატიაში, თქვენ შეისწავლით რამდენიმე ტექნიკას Excel-ში ყოველი მეორე ან ყოველი მე-მე-მე მწკრივის სწრაფად არჩევისა და წაშლის მიზნით.
როგორ წაშალოთ ყოველი მეორე მწკრივი Excel-ში ფილტრაციის გზით
არსებითად, Excel-ში ყოველი მეორე მწკრივის წაშლის ჩვეულებრივი გზაა ეს: ჯერ ალტერნატიულ რიგებს ფილტრავთ, შემდეგ ირჩევთ და ერთდროულად წაშლით. დეტალური ნაბიჯები შემდეგია ქვემოთ:
- ცარიელ სვეტში თქვენი ორიგინალური მონაცემების გვერდით, შეიყვანეთ ნულების და ერთების თანმიმდევრობა. ამის გაკეთება შეგიძლიათ სწრაფად, აკრიფოთ 0 პირველ უჯრედში და 1 მეორე უჯრედში, შემდეგ დააკოპიროთ პირველი ორი უჯრედი და ჩასვათ ისინი სვეტში ბოლო უჯრედამდე მონაცემებით.
გარდა ამისა, შეგიძლიათ გამოიყენოთ ეს ფორმულა:
=MOD(ROW(),2)ფორმულის ლოგიკა ძალიან მარტივია: ROW ფუნქცია აბრუნებს მწკრივის მიმდინარე ნომერს, MOD ფუნქციასყოფს მას 2-ზე და აბრუნებს ნაშთს მთელ რიცხვზე დამრგვალებულს.
შედეგად, თქვენ გაქვთ 0 ყველა ლუწი მწკრივში (რადგან ისინი იყოფა 2-ზე თანაბრად ნაშთის გარეშე) და 1 ყველა კენტ მწკრივში:
- დამოკიდებულია იმაზე, გსურთ წაშალოთ ლუწი თუ კენტი რიგები, გაფილტრეთ ერთეულები ან ნულები.
ამის შესასრულებლად, აირჩიეთ ნებისმიერი უჯრედი თქვენს დამხმარე სვეტში, გადადით მონაცემები ჩანართზე > დახარისხება და გაფილტვრა ჯგუფში და დააწკაპუნეთ ფილტრი ღილაკი. ჩამოსაშლელი ფილტრის ისრები გამოჩნდება სათაურის ყველა უჯრედში. თქვენ დააჭირეთ ისრის ღილაკს დამხმარე სვეტში და მონიშნეთ ერთ-ერთი ველი:
- 0 ლუწი რიგების წასაშლელად
- 1 კენტი მწკრივების წასაშლელად
ამ მაგალითში ჩვენ ვაპირებთ წაშალოთ რიგები "0" მნიშვნელობებით, ამიტომ გავფილტროთ ისინი:
- ახლა, როდესაც ყველა "1" მწკრივი დამალულია, აირჩიეთ ყველა ხილული "0" სტრიქონი, დააწკაპუნეთ მაუსის მარჯვენა ღილაკით და დააწკაპუნეთ წაშალე მწკრივი :
- ზემოხსენებულმა ნაბიჯმა დატოვა ცარიელი ცხრილი , მაგრამ არ ინერვიულოთ, "1" რიგები ჯერ კიდევ არსებობს. იმისათვის, რომ ისინი ხელახლა იყოს ხილული, უბრალოდ ამოიღეთ ავტომატური ფილტრი ღილაკზე ფილტრი ხელახლა დაწკაპუნებით:
- C სვეტის ფორმულა ხელახლა გამოითვლება დარჩენილი რიგებისთვის, მაგრამ აღარ გჭირდება. ახლა შეგიძლიათ უსაფრთხოდ წაშალოთ დამხმარე სვეტი:
შედეგად, ჩვენს სამუშაო ფურცელში მხოლოდ ლუწი კვირები დარჩა, კენტი კვირები წავიდა!
რჩევა. თუ გნებავთ გადაადგილება ყოველისხვა მწკრივი, ვიდრე საერთოდ წაშალოთ ისინი, ჯერ დააკოპირეთ გაფილტრული რიგები და ჩასვით ისინი ახალ ადგილას, შემდეგ კი წაშალეთ გაფილტრული რიგები.
როგორ წაშალოთ ალტერნატიული რიგები Excel-ში VBA-ით
თუ არ გსურთ დახარჯოთ დრო ტრივიალურ დავალებაზე, როგორიცაა Excel-ის სამუშაო ფურცლების ყოველი მეორე მწკრივის წაშლა, შემდეგ VBA მაკროს შეუძლია პროცესის ავტომატიზაცია თქვენთვის:
Sub Delete_Alternate_Rows_Excel() Dim SourceRange როგორც Range Set SourceRange = Application.Selection Set SourceRange = Application.InputBox( "Range:" , "Select the range" , SourceRange.Address, ტიპი :=8) If SourceRange.Rows.Count >= 2 მაშინ გაანათეთ FirstCell როგორც დიაპაზონი Dim RowIndex როგორც მთელი რიცხვი Application.ScreenUpdating = False For RowIndex = SourceRange.Rows.Count - (SourceRange.Rows.Count Mod 2) 1 საფეხურზე -2 დააყენეთ FirstCell = SourceRange.Cells(RowIndex, 1) FirstCell.EntireRow.Deleteen NextUpdplication. End If End Subროგორ წავშალოთ ყოველი მეორე მწკრივი Excel-ში მაკროს გამოყენებით
I ჩადეთ მაკრო თქვენს სამუშაო ფურცელში ჩვეულებრივი გზით Visual Basic რედაქტორის მეშვეობით:
- დააჭირეთ Alt + F11 Visual Basic აპლიკაციების ფანჯრის გასახსნელად.
- ზედა მენიუს ზოლში, დააწკაპუნეთ ჩასმა > მოდული და ჩასვით ზემოთ მოცემული მაკრო მოდულში
- დააჭირეთ F5 ღილაკს მაკროს გასაშვებად.
- გამოჩნდება დიალოგი და მოგთხოვთ აირჩიოთ დიაპაზონი. აირჩიეთ თქვენი ცხრილი და დააწკაპუნეთკარგი:
შესრულებულია! არჩეულ დიაპაზონში ყოველი მეორე მწკრივი წაიშლება:
როგორ წავშალოთ ყოველი მე-მერე მწკრივი Excel-ში
ამ ამოცანისთვის ჩვენ ვაპირებთ გავაფართოვოთ ფილტრაცია ტექნიკა, რომელიც ჩვენ გამოვიყენეთ ყოველი მეორე მწკრივის მოსაშორებლად. განსხვავება არის ფორმულაში, რომელზედაც დაფუძნებულია ფილტრაცია:
MOD(ROW()- m, n)სად:
- m არის პირველი უჯრედის მწკრივის ნომერი, მონაცემების გამოკლებით 1
- n არის მე-მე მწკრივი, რომლის წაშლა გსურთ
ვთქვათ, რომ თქვენი მონაცემები იწყება მე-2 მწკრივიდან და გსურთ წაშალოთ ყოველი მე-3 რიგი. ასე რომ, თქვენს ფორმულაში n უდრის 3-ს და m უდრის 1-ს (2 მწკრივი გამოკლებული 1):
=MOD(ROW() - 1, 3)
თუ ჩვენი მონაცემები დაიწყო მწკრივი 3, შემდეგ m უდრის 2-ს (სტრიქონი 3 გამოკლებული 1) და ა.შ. ეს შესწორება საჭიროა რიგების თანმიმდევრულად დასანომრად, დაწყებული ნომრით 1.
რას აკეთებს ფორმულა არის ფარდობითი მწკრივის რიცხვის გაყოფა 3-ზე და დაბრუნების დარჩენილი ნაწილი გაყოფის შემდეგ. ჩვენს შემთხვევაში, ის იძლევა ნულს ყოველი მესამე მწკრივისთვის, რადგან ყოველი მესამე რიცხვი იყოფა 3-ზე ნარჩენების გარეშე (3,6,9 და ა.შ.):
და ახლა, თქვენ შეასრულეთ უკვე ნაცნობი ნაბიჯები "0" რიგების გასაფილტრად:
- აირჩიეთ ნებისმიერი უჯრედი თქვენს ცხრილში და დააწკაპუნეთ ღილაკზე ფილტრი მონაცემები
- გაფილტრეთ დამხმარე სვეტი, რათა აჩვენოს მხოლოდ "0" მნიშვნელობები.
- აირჩიეთ ყველა ხილული "0" სტრიქონი, დააწკაპუნეთ მაუსის მარჯვენა ღილაკით და აირჩიეთ წლის წაშლა კონტექსტური მენიუდან.
- მოხსენით ფილტრი დაწაშალეთ დამხმარე სვეტი.
მსგავსი წესით, შეგიძლიათ წაშალოთ ყოველი მე-4, მე-5 ან ნებისმიერი სხვა N-ე რიგი Excel-ში.
რჩევა. იმ შემთხვევაში, თუ დაგჭირდებათ არარელევანტური მონაცემების მქონე რიგების ამოღება, შემდეგი სახელმძღვანელო გამოგადგებათ: როგორ წავშალოთ რიგები უჯრედის მნიშვნელობის მიხედვით.
მადლობას გიხდით წაკითხვისთვის და იმედი მაქვს, მომავალ კვირას კვლავ გნახავთ ჩვენს ბლოგზე .
