Det er viktig å huske på at ikke alle funksjoner i et Excel-regneark kan brukes i Visual Basic for Applications . Imidlertid kan " ERTOM "-funksjonen brukes både som en formel i et regneark, og i VBA for å tjene det samme formålet - som er å kontrollere om en celle er tom . Denne funksjonen brukes ofte i en sløyfe for å gå gjennom en kolonne eller rad med celler til du kommer til en tom celle . Instruksjoner
en

Klikk på " Developer " og klikk " Visual Basic " for å åpne VB editor vinduet . Klikk på " Insert"-menyen og klikk " Module" for å sette inn en ny modul
2

Opprett en sub prosedyre ved å legge følgende kode: .

Private Sub checkForBlankCell ( )

3

Lag et heltall variabel og gi den en verdi på 1 :

Dim x As Integer

X = 1
4 < p> Legge til data i de ti første radene av A1 : .

Range (" A1 ") Velg

ActiveCell.FormulaR1C1 = " 1 "

Range (" A2" . ) Velg

ActiveCell.FormulaR1C1 = " 2 "

Range (" A1 : A2" . ) Velg

Selection.AutoFill Destinasjon: = Range (" A1 : A10 ") , Type : = xlFillDefault

Range (" A1 : " . ) Velg

Range (" . A10 A1 ") Velg
5

Lag en løkke og sjekk om cellen er tom ved å bruke " erTom " cellefunksjon og vise hver celle verdi over Umiddelbar vinduet : en

inntil erTom ( ActiveCell.Value )

Range (" A" og X ) . Velg

Debug.Print ( ActiveCell.Value )

X = X + 1

Loop
6

End prosedyren ved å skrive "End Sub " og trykk " Ctrl" og " G " for å vise det gjeldende vinduet . Klikk på " F5 " for å kjøre prosedyren.