თუ თქვენ ეძებთ გამოსავალს ან სპეციალურ ხრიკებს დიაპაზონის შიგთავსის გასასუფთავებლად Excel VBA -ით, მაშინ თქვენ მოხვდით სწორ ადგილას. არსებობს რამდენიმე მარტივი ნაბიჯი დიაპაზონის შიგთავსის გასასუფთავებლად Excel VBA -ით. ეს სტატია გაჩვენებთ თითოეულ ნაბიჯს სათანადო ილუსტრაციებით, ასე რომ თქვენ შეგიძლიათ მარტივად გამოიყენოთ ისინი თქვენი მიზნისთვის. მოდით გადავიდეთ სტატიის ცენტრალურ ნაწილზე.

ჩამოტვირთეთ პრაქტიკის სამუშაო წიგნი

შეგიძლიათ ჩამოტვირთოთ სავარჯიშო სამუშაო წიგნი აქედან:

გაწმინდეთ დიაპაზონის შიგთავსი Excel VBA-ით: 3 შემთხვევა

ვთქვათ, რომ თქვენ გაქვთ მონაცემთა ნაკრები, რომლის ხელახლა გამოყენება გსურს არსებული უჯრედების გასუფთავებით. ამრიგად, შეგიძლიათ გამოიყენოთ VBA კოდი Excel ფაილის შინაარსის გასასუფთავებლად. ამ განყოფილებაში მე გაჩვენებთ სწრაფ და მარტივ მეთოდებს დიაპაზონის შიგთავსის გასასუფთავებლად Excel VBA Windows ოპერაციულ სისტემაზე. თქვენ იხილავთ დეტალურ განმარტებებს თითოეული ნივთის მკაფიო ილუსტრაციებით ამ სტატიაში. აქ გამოვიყენე Microsoft 365 ვერსია . მაგრამ თქვენ შეგიძლიათ გამოიყენოთ ნებისმიერი სხვა ვერსია თქვენი ხელმისაწვდომობის მიხედვით. თუ ამ სტატიიდან რაიმე არ მუშაობს თქვენს ვერსიაში, დაგვიტოვეთ კომენტარი.

შემთხვევა 1: გაწმინდეთ დიაპაზონის ყველა შინაარსი

შეგიძლიათ გამოიყენოთ როგორც Clear ბრძანება, ასევე Delete Command მიმდინარე სამუშაო ფურცელში კონკრეტული დიაპაზონის შინაარსის გასასუფთავებლად ან სხვა სამუშაო ფურცლებზე, თუნდაც სხვა სამუშაო წიგნებიდან. მე ვიზამგაჩვენებთ ყველა შემთხვევას სათითაოდ.

ი. უჯრედების კონკრეტული დიაპაზონის შიგთავსის გასუფთავება

თუ გსურთ კონკრეტული დიაპაზონის შიგთავსის გასუფთავება, მიჰყევით ქვემოთ მოცემულ ნაბიჯებს:

📌 ნაბიჯები:

• ამისთვის, ჯერ გადადით ზედა ლენტაზე და დააჭირეთ დეველოპერს , შემდეგ დააჭირეთ Visual Basic ვარიანტს მენიუდან.
• თქვენ შეგიძლიათ გამოიყენოთ ALT + F11 „Microsoft Visual Basic აპლიკაციებისთვის“ ფანჯრის გასახსნელად, თუ არ გაქვთ დამატებული დეველოპერის ჩანართი.

• ახლა გამოჩნდება ფანჯარა სახელად „Microsoft Visual Basic აპლიკაციებისთვის“ . აქ ზედა მენიუს ზოლიდან დააჭირეთ „ჩასმა“ და გამოჩნდება მენიუ. მათგან აირჩიეთ „მოდული“ ოფცია.

• ახლა ახალი „მოდული“ გამოჩნდება ფანჯარა. და ჩასვით ეს VBA კოდი ველში.

Clear Command-ის გამოყენებით:

6722

• კოდის გასაშვებად გადადით ზედა მენიუში, დააჭირეთ Run ოპციას და აქ გაიხსნება რამდენიმე სხვა ვარიანტი და აირჩიეთ Run Sub/UserForm ასევე შეგიძლიათ უბრალოდ დააჭიროთ F5 კოდის გასაშვებად.

• Clear ბრძანების გამოყენებით, უჯრედები გასუფთავდება ასევე ფორმატირებაც წაიშლება. მაგრამ ცარიელი უჯრედები იქ იქნება.

წაშლის ბრძანების გამოყენებით:

ასევე შეგიძლიათ გამოიყენოთ ბრძანების წაშლა Clear ბრძანების ნაცვლად. შემდეგ ჩასვითშემდეგი კოდი მოდულში.

6781

წაშლის ბრძანების გამოყენებით, კოდის გაშვებისას, უჯრედების არჩეული დიაპაზონი წაიშლება სრულიად.

დაწვრილებით: Excel VBA: შიგთავსის გასუფთავება, თუ უჯრედი შეიცავს კონკრეტულ მნიშვნელობებს

განსხვავება შორის ბრძანების გასუფთავება და წაშლა Excel VBA-ში:

ძირითადი განსხვავება Clear და Delete ბრძანებებს შორის Excel VBA არის ის, რომ წაშლა ბრძანება აშორებს უჯრედების არჩეულ დიაპაზონს და Clear ბრძანება შლის მხოლოდ უჯრედის მნიშვნელობას და ფორმატირებას, მაგრამ ცარიელი უჯრედი იქნება იქ.

ii. სრული სამუშაო ფურცლის შიგთავსის გასუფთავება

თუ გსურთ სამუშაო ფურცლის ყველა უჯრედის გასუფთავება, გამოიყენეთ ქვემოთ მოცემული კოდი. აქ, მე ვასუფთავებ შინაარსს სამუშაო ფურცლიდან სახელად "1.2". თქვენ უნდა ჩასვათ სახელი სამუშაო ფურცლის რომლის გასუფთავება გსურთ შებრუნებულ მძიმეებში.

9275

ასევე, შეგიძლიათ გამოიყენოთ წაშლა ბრძანება სამუშაო ფურცლის ყველა გამოყენებული უჯრედის წასაშლელად. შემდეგ, თქვენ უნდა გამოიყენოთ ქვემოთ მოცემული კოდი. უბრალოდ, შეცვალეთ სამუშაო ფურცლის სახელი შებრუნებულ მძიმეებში.

9716

iii. აქტიური სამუშაო ფურცლის შიგთავსის გასუფთავება

ზოგჯერ შეიძლება დაგჭირდეთ მხოლოდ აქტიური სამუშაო ფურცლის შიგთავსის გასუფთავება. ამ შემთხვევაში, თქვენ უნდა შეიყვანოთ ქვემოთ მოცემული მარტივი კოდი:

1578

ასევე შეგიძლიათ გამოიყენოთ delete ბრძანება უჯრედების მთლიანად ამოსაღებად.აქტიური სამუშაო ფურცელი. ამისათვის ჩასვით შემდეგი კოდი მოდულში.

Sub Delete_Contents_Range()

ActiveSheet.Cells.Delete

End Sub

დაწვრილებით: სხვაობა Excel-ში შიგთავსის წაშლასა და გასუფთავებას შორის

შემთხვევა 2: დიაპაზონის შიგთავსის გასუფთავება ფორმატირების შენარჩუნებით

წინა მეთოდებში თქვენ შენიშნეთ, რომ წაშლით უჯრედის მნიშვნელობები ასევე უჯრედის ფორმატირების გასწვრივ. ასე რომ, თუ გსურთ უჯრედის მნიშვნელობების ამოღება მხოლოდ ფორმატის შენარჩუნებისას იგივე.

ი. კონკრეტული დიაპაზონის შიგთავსი

შეგიძლიათ გამოიყენოთ ClearContents ბრძანება Excel VBA კონკრეტული დიაპაზონის შიგთავსის გასასუფთავებლად. ამისათვის ჩასვით შემდეგი კოდი მოდულში.

9644

შედეგად, კოდის გაშვებისას ნახავთ, რომ არჩეული უჯრედები გასუფთავებულია, მაგრამ ფორმატები კვლავ რჩება .

დაწვრილებით: როგორ გავასუფთავოთ უჯრედები გარკვეული მნიშვნელობით Excel-ში (2 გზა)

ii. კონკრეტული სამუშაო ფურცლის შიგთავსი

როდესაც გსურთ კონკრეტული სამუშაო ფურცლის შიგთავსის გასუფთავება ფორმატების უცვლელად შენარჩუნებისას, უნდა გამოიყენოთ ქვემოთ მოცემული კოდი:

8424

გსურთ სხვა სახელის სამუშაო ფურცლის გამოძახება, შემდეგ ჩადეთ სამუშაო ფურცლის სახელი შებრუნებულ მძიმეებში.

iii. შიგთავსი სხვა სამუშაო წიგნიდან

ასევე შეგიძლიათ წაშალოთ კონტენტი სხვა სამუშაო წიგნის VBA კოდის გამოყენებით. მაგრამ ამისათვის თქვენ უნდა გაინახოთ ეს სამუშაო წიგნი ღია . ამისათვის გამოიყენეთ შემდეგი კოდი:

8324

🔎 VBA კოდის განმარტება:

• Workbooks(“ფაილი 1”) უწოდებს სამუშაო წიგნს სახელად “ფაილი 1”. თქვენი სამუშაო წიგნების გამოყენებისას თქვენ უნდა ჩაწეროთ სამუშაო წიგნის სახელი შებრუნებულ მძიმეებში.
• Worksheets(“Sheet1”) უწოდებს სამუშაო ფურცელს სახელად “ფურცელი 1”. ნებისმიერი სხვა სამუშაო ფურცლის გამოსაძახებლად, უბრალოდ ჩადეთ სამუშაო ფურცლის სახელი -ის ნაცვლად. "ფურცელი 1" ამ კოდში.
• და, დიაპაზონი("B3:D13") მიუთითებს უჯრედების დიაპაზონს, რომელიც გასუფთავდება. თქვენ შეგიძლიათ დაარედაქტიროთ უჯრედების დიაპაზონი თქვენი საჭიროებისამებრ.

დაწვრილებით: როგორ წავშალოთ შინაარსი ფორმულების წაშლის გარეშე VBA-ს გამოყენებით Excel-ში

შემთხვევა 3: ყველა სამუშაო ფურცლის კონკრეტული დიაპაზონის შიგთავსის ერთდროულად გასუფთავება

თუ გჭირდებათ წაშალოთ შინაარსი მრავალი სამუშაო ფურცლის კონკრეტული დიაპაზონის შეგიძლიათ ამის გაკეთება ერთდროულად VBA კოდის გამოყენებით. თქვენ უნდა გამოიყენოთ For loop ამ ამოცანის შესასრულებლად. ჩასვით ეს კოდი მოდულში, რათა წაშალოთ დიაპაზონის B2:D4 შინაარსი ყველა სამუშაო ფურცლისგან. თუ გსურთ უჯრედების დიაპაზონის შეცვლა, შეცვალეთ მე-4ხაზი და ჩადეთ თქვენი მონაცემთა დიაპაზონი.

2128

დასამახსოვრებელი რამ

• Clear ბრძანების გამოყენებით მხოლოდ გაასუფთავეთ უჯრედების მნიშვნელობები და ფორმატები.
• წაშლა ბრძანება მთლიანად წაშლის უჯრედებს.
• ClearContents ბრძანება გაასუფთავებს მხოლოდ უჯრედების მნიშვნელობებს და შეინახეთ უჯრედების ფორმატები ხელუხლებლად.

დასკვნა

ამ სტატიაში თქვენ იპოვნეთ როგორ გაწმინდოთ დიაპაზონის შიგთავსი Excel VBA-ით . იმედი მაქვს, რომ ეს სტატია თქვენთვის სასარგებლო აღმოჩნდა. შეგიძლიათ ეწვიოთ ჩვენს ვებსაიტს ExcelWIKI მეტი Excel-თან დაკავშირებული შინაარსის გასაგებად. გთხოვთ, დაწეროთ კომენტარები, წინადადებები ან შეკითხვები, თუ გაქვთ რაიმე კომენტარების განყოფილებაში ქვემოთ.