Conținut clar VBA

Conținut clar VBA Excel

Clear content este o metodă în VBA care este utilizat pentru a șterge sau a elimina valorile care sunt stocate în celulele furnizate, această metodă face ca intervalul de celule să fie gol și este utilizat cu proprietatea range pentru a accesa intervalul de celule specificat, exemplul de utilizare a acestei metode este următorul interval („A1: B2”). ClearContents această metodă va șterge conținutul celulelor de la A1 la B2.

Table of Contents

Toggle

În Excel, adăugarea datelor și ștergerea datelor este o sarcină obișnuită de rutină. Uneori ștergem o singură valoare a celulei, uneori multe valori ale celulelor și, uneori, putem solicita să ștergem tot conținutul foii de lucru. În acest articol, vă vom arăta cum să utilizați metoda „Șterge conținutul” în Excel VBA. În VBA, avem multe metode pentru a face acest lucru, cum ar fi „Șterge”, „Șterge” și „Șterge conținutul”.

Sunteți liber să utilizați această imagine pe site-ul dvs. web, șabloane etc., Vă rugăm să ne furnizați un link de atribuireCum să oferiți atribuire?Link către articol de către hyperlink
De exemplu:
Sursă: VBA Clear Contents (wallstreetmojo.com)

Ce sunt conținutul clar în Excel VBA?

Înainte să vă povestesc despre Clear Contents în VBA, permiteți-mi să vă arăt cum putem șterge sau șterge datele din intervalul specific.

De exemplu, uitați-vă la datele de mai jos.

Acum, dacă vreau să șterg de la celula A1 la C3, trebuie să menționăm mai întâi gama de celule care utilizează obiectul VBA RANGE.

Cod:

Range (“A1:C3”)

După ce menționăm gama de celule utilizând obiectul RANGE, trebuie să selectăm metoda „Clear” pentru a șterge menționarea valorilor celulei.

Cod:

Range (“A1:C3”).Clear

Aceasta va șterge valorile celulei menționate.

Cod:

Sub Clear_Example()

  Range("A1:C3").Clear

End Sub

În afară de metoda clară, putem folosi și metoda „ȘTERGERE”.

Cod:

Range (“A1:C3”).Delete

Aceasta va șterge valorile celulei menționate, la fel cum a făcut metoda noastră clară.

Dacă doriți să ștergeți toate datele celulei, atunci puteți utiliza proprietatea VBA CELLS cu un nume de foaie de lucru.

Worksheets(“Sheet1”).Cells.Delete

Worksheets(“Sheet1”).Cells.Clear

Ambele coduri de mai sus vor șterge toate datele din foaia de lucru „Sheet1”. Acesta va șterge valorile celulei chiar de la prima celulă la ultima celulă a foii de lucru.

Dacă doriți să ștergeți celulele actuale ale foii, puteți utiliza obiectul Foaie activă.

ActiveSheet.Cells.Delete or ActiveSheet.Cells.Clear

Diferența dintre metodele de ștergere și ștergere

Știu că această întrebare ar fi trebuit să te fi jucat deja în mintea ta.

Da, există o diferență între aceste două metode.

Când utilizați metoda „Ștergeți”, aceasta va șterge celula, iar celula de mai jos va prelua poziția celulei șterse.

De exemplu, uitați-vă la imaginea de mai jos.

Acum voi folosi metoda de ștergere pentru a șterge celula A1.

Cod:

Sub Clear_Example()

 Range("A1").Delete

End Sub

Voi rula acest cod și voi vedea ce se întâmplă.

Uite ce s-a întâmplat aici; așa cum am spus când am șters celula A1, aceasta este ștearsă, dar celula A2 mută o celulă în sus și ocupă celula ștearsă. Acest lucru va duce la o nepotrivire a datelor. Așadar, aveți grijă când utilizați metoda Ștergere.

Acum, pentru aceleași date, voi șterge metoda.

Cod:

Sub Clear_Example()

 Range("A1").Clear

End Sub

Acum vezi ce se întâmplă când rulez acest cod.

Acest cod tocmai a eliberat celula A1 fără a modifica alte celule. Aceasta arată o metodă adecvată pentru a șterge doar partea din celule a întregului interval de date.

Utilizați metoda VBA Clear Contents pentru a păstra formatarea celulelor

Dacă ați observat cele două metode anterioare, aceste două metode nu numai că au șters sau au șters celulele furnizate. De asemenea, a șters formatarea celulelor pe care le-am furnizat.

Pentru a păstra formatarea celulelor, nu trebuie să folosim nici „Ștergere”, nici „Ștergere”, ci trebuie să folosim metoda VBA „Ștergere conținut”.

În momentul în care introduceți gama de celule utilizând un obiect RANGE, acesta va afișa toate proprietățile și metodele asociate acestuia.

Putem accesa „Șterge”, putem accesa „Șterge” și putem, de asemenea, metode „ClearContents”.

Selectați această metodă.

Cod:

Sub Clear_Example()

  Range("A1:C3").ClearContents

End Sub

Acum, acest lucru va șterge conținutul de la celula A1 la C3, dar vom avea toate formatările existente așa cum este.

După cum puteți vedea în imaginea de mai sus, avem culoarea celulei în VBA, margini și fiecare formatare asociată cu aceste celule menționate.

În mod similar, putem șterge și conținutul altor foi.

Worksheets(“Sheet1”).Range(“A1:D10”).ClearContents

Aceasta va șterge conținutul din celulele A1 până la D10 din foaia „Sheet1”.

În mod similar, putem șterge și celelalte celule deschise ale registrului de lucru.

Workbooks(“Book1.xlsx”).Worksheets(“Sheet1”).Range(“A1:D10”).ClearContents

Parcurgeți toate fișele de lucru și conținutul clar al gamei specifice

Să presupunem că aveți multe foi în registrul de lucru și doriți să ștergeți gama de celule de la A1 la C15 din toate foile pe care trebuie să le folosim pentru fiecare buclă din VBA pentru a face acest lucru.

Codul de mai jos va face treaba.

Cod:

Sub Clear_All()

Dim Ws As Worksheet

For Each Ws In ActiveWorkbook.Worksheets
Ws.Range("A1:C15").ClearContents
Next Ws

End Sub

Doar în cazul în care doriți să ștergeți toate datele foii de lucru, atunci trebuie să utilizați codul de mai jos.

Cod:

Sub Clear_All()

 Dim Ws As Worksheet

 For Each Ws In ActiveWorkbook.Worksheets
   Ws.Cells.ClearContents
 Next Ws

End Sub

Puteți descărca acest șablon Excel VBA Clear Contents Excel aici – Șablon de conținut VBA Clear.

Articole recomandate

Acesta a fost un ghid pentru conținutul clar al VBA. Aici aflăm cum să folosim metoda Clear, Delete și ClearContents din VBA pentru a șterge datele în Excel, împreună cu câteva exemple simple până la cele avansate. Mai jos sunt câteva articole Excel utile legate de VBA –

• Linie nouă în VBA MsgBox
• Cum se folosește temporizatorul în VBA?
• Excel VBA Break For Loop
• Buclă Excel VBA Do