? En tom VBA teller i Excel bruker den innebygde editor for å skrive Visual Basic for Applications -kode som teller tom celle . Bruk denne koden for å finne ut om visse celler ikke inneholder tall, bokstaver eller mellomrom. Skrive denne koden er mulig i en rekke måter . Men koden du din blank VBA telle, bruke informasjonen til å finne disse cellene og endre eller slette dem . Funksjon

"Utvikler " fanen i Microsoft Excel gir deg tilgang til VBA editor for å skrive kode som sjekker statusen til de enkelte celler eller områder av celler. Hvis regnearket holder orden på viktige data, for eksempel antall gjenstander , eller om en oppgave er fullført, må du rask metode for å finne ut om noen celler er tomme . Opprette en tom celletall VBA makro lar deg finne tomme celler automatisk uten manuell celle -by - celle søk .
ErTom

Excel VBA editor inkluderer en innebygd funksjon for å avgjøre om en celle inneholder alle data , slik at du ikke trenger for å lage din egen custom kode for å sjekke for tomme celler . Den " erTom ( ActiveCell.Value )" -funksjonen returnerer verdien " true" hvis noen av cellene du merker i regnearket er tom. Å ha makroen gi en melding om en celle er tom , legger i en " Hvis da " uttalelse som " Hvis erTom ( ActiveCell.Value ) Deretter MsgBox ' The Range Inneholder aktive celler ."


COUNTBLANK

Visual Basic programmeringsspråk inkluderer " TELLBLANKE " metoden, som gjør at du vet er nøyaktig hvor mange celler innenfor et angitt område tom. Å bruke " TELLBLANKE "-metoden , må du først erklære en variabel , for eksempel " Dim emptyCells så lenge . " Når du har en variabel for å holde antall tomme celler , kaller " TELLBLANKE " metoden med en kodelinje som " emptyCells = Application.WorksheetFunction.CountBlank ( Range (" A1 : A50 ")) . "
Slette tomme celler

gang har du utført en tom celletall og identifisert hvilke celler som er tomme , kan du ikke lenger trenger disse cellene . Snarere enn å manuelt fjerne hver celle , lar VBA du bruke " SpecialCells " metode for å automatisk fjerne hver av de tomme celler fra regnearket . Kjøre en makro med linjen med kode " Selection.SpecialCells ( xlCellTypeBlanks ) . Slett ( xlShiftUp ) " sletter alle de tomme celler i dag finnes i Excel regneark.