VBA Contingut clar | Com esborrar o eliminar contingut mitjançant el codi VBA?
Contingut net d’Excel VBA
Esborrar contingut és un mètode a VBA que s’utilitza per suprimir o eliminar els valors que s’emmagatzemen a les cel·les que se li proporcionen, aquest mètode fa que l’interval de cel·les estigui buit i s’utilitza amb la propietat de rang per accedir a l’interval de cel·les especificat. interval ("A1: B2"). ClearContents aquest mètode esborrarà el contingut de les cel·les d'A1 a B2.
En Excel, afegir les dades i eliminar-les és una tasca habitual. De vegades, suprimim el valor d'una sola cel·la, de vegades molts valors de cel·les, i de vegades és possible que necessitem suprimir també tot el contingut del full de càlcul. En aquest article, us mostrarem com utilitzar el mètode "Esborra el contingut" a Excel VBA. A VBA tenim molts mètodes per fer-ho, com ara "Esborra", "Suprimeix" i "Esborra contingut".
Què són els continguts clars a Excel VBA?
Abans d’explicar-vos sobre Esborra el contingut a VBA, deixeu-me mostrar com podem eliminar o esborrar les dades de l’interval específic.
Per exemple, mireu les dades següents.
Ara, si vull esborrar de la cel·la A1 a C3, primer hem d’esmentar l’interval de cel·les que utilitzen l’objecte VBA RANGE.
Codi:
Rang ("A1: C3")
Després d'esmentar l'abast de cel·les mitjançant l'objecte RANGE, hem de seleccionar el mètode "Esborra" per esborrar l'esment dels valors de la cel·la.
Codi:
Rang ("A1: C3"). Esborra
Això esborrarà els valors de cel·la esmentats.
Codi:
Sub Clear_Example () Range ("A1: C3"). Esborra End Sub
A part del mètode clar, també podem utilitzar el mètode "SUPRIMIR".
Codi:
Rang ("A1: C3"). Suprimeix
Això suprimirà els valors de cel·la esmentats tal com ha fet el nostre mètode clar.
Si voleu eliminar totes les dades de la cel·la, podeu utilitzar la propietat VBA CELLS amb un nom de full de càlcul.
Fulls de treball ("Full1"). Cel·les. Suprimeix
Fulls de treball ("Full1"). Cel·les. Clar
Tots dos codis anteriors suprimiran totes les dades del full de treball "Full1". Suprimirà els valors de les cel·les des de la primera cel·la fins a l'última cel·la del full de treball.
Si voleu eliminar les cel·les del full actuals, podeu utilitzar l'objecte Full actiu.
ActiveSheet.Cells.Delete o ActiveSheet.Cells.Clear
Diferència entre els mètodes d'esborrar i eliminar
Sé que aquesta pregunta ja hauria d’haver-se jugat al cap.
Sí, hi ha una diferència entre aquests dos mètodes.
Quan utilitzeu el mètode "Suprimeix", esborrarà la cel·la i la cel·la següent prendrà la posició de la cel·la suprimida.
Per obtenir un exemple, mireu la imatge següent.
Ara faré servir el mètode d’eliminació per eliminar la cel·la A1.
Codi:
Sub Clear_Example () Range ("A1"). Suprimeix End Sub
Executaré aquest codi i veuré què passa.
Mireu el que va passar aquí, tal com he dit quan he esborrat la cel·la A1, se suprimeix, però la cel·la A2 es mou una cel·la i ocupa la cel·la suprimida. Això provocarà un desajustament de les dades. Per tant, aneu amb compte mentre utilitzeu el mètode Delete.
Ara, per a les mateixes dades, netejaré el mètode.
Codi:
Sub Clear_Example () Range ("A1"). Clear Final Sub
Ara vegeu què passa quan executo aquest codi.
Aquest codi acaba de deixar la cel·la A1 sense alterar altres cel·les. Això sembla un mètode adequat per eliminar només la part de les cel·les de tot l'interval de dades.
Utilitzeu el mètode VBA Clear Contents per conservar el format de les cel·les
Si heu observat els dos mètodes anteriors, aquests dos mètodes no només van suprimir o esborrar les cel·les proporcionades. També va suprimir el format de les cel·les que hem proporcionat.
Per conservar el format de les cel·les no hem d’utilitzar ni “Suprimeix” ni “Esborra”, sinó que hem d’utilitzar el mètode VBA “Esborra el contingut”.
En el moment que introduïu el rang de cel·les mitjançant un objecte RANGE, mostrarà totes les propietats i mètodes associats.
Podem accedir a "Suprimeix", podem accedir a "Esborra" i també podem utilitzar mètodes "ClearContents".
Seleccioneu aquest mètode.
Codi:
Sub Clear_Example () Range ("A1: C3"). ClearContents End Sub
Ara, esborrarà el contingut de la cel·la A1 a la C3, però tindrem tot el format existent tal com és.
Com podeu veure a la imatge anterior, tenim color de cel·la en VBA, vores i tots els formats associats a les cel·les esmentades.
De la mateixa manera, també podem esborrar el contingut d'altres fulls.
Fulls de treball ("Full1"). Interval ("A1: D10"). ClearContents
Això esborrarà el contingut de les cel·les A1 a D10 del full "Full1".
De la mateixa manera, també podem eliminar les altres cel·les obertes del llibre.
Llibres de treball ("Llibre1.xlsx"). Fulls de treball ("Full1"). Rang ("A1: D10"). ClearContents
Passeu per tots els fulls de treball i esborreu el contingut d'un rang específic
Suposem que teniu molts fulls al vostre llibre i voleu suprimir l’interval de cel·les d’A1 a C15 en tots els fulls que necessitem per a cada bucle de VBA per fer-ho.
El codi següent farà la feina.
Codi:
Sub Clear_All () Dim Ws com a full de càlcul per a cada W de ActiveWorkbook.Whesheets Ws.Range ("A1: C15"). ClearContents Next Ws End SubNota: Podeu canviar l'interval de cel·les segons el vostre desig.
Per si de cas, si voleu esborrar totes les dades del full de càlcul, haureu d’utilitzar el codi següent.
Codi:
Sub Clear_All () Dim Ws com a full de treball per a cada W de ActiveWorkbook.Whesheets Ws.Cells.ClearContents Next Ws End Sub
Podeu descarregar aquesta plantilla Excel VBA Clear Contents aquí: plantilla VBA Clear Contents