Vba: hoe "als niet leeg" te gebruiken

U kunt Not IsEmpty in VBA gebruiken om te controleren of een cel niet leeg is.

Hier is een voorbeeld van hoe u deze syntaxis in een macro kunt gebruiken:

 Sub IfNotBlank()
    Dim i As Integer

    For i = 2 To 13
        If Not IsEmpty(Range(" A " & i)) Then
        Result = “ Cell is Not Empty ”
        Else
        Result = “ Cell is Empty ”
        End If
    Range(" B " & i) = Result
    Next i
End Sub

In dit specifieke voorbeeld wordt gecontroleerd of elke cel in het bereik A2:A13 niet leeg is en wordt vervolgens „Cel is niet leeg“ of „Cel is leeg“ afgedrukt voor elke overeenkomende cel in het bereik B2:B13 .

Het volgende voorbeeld laat zien hoe u deze syntaxis in de praktijk kunt gebruiken.

Voorbeeld: hoe u „If not empty“ gebruikt in VBA

Stel dat we de volgende lijst met basketbalteamnamen in Excel hebben:

Stel dat we willen controleren of elke cel in het bereik A2:A13 niet leeg is, en vervolgens de resultaten willen weergeven in de overeenkomstige cellen in het bereik B2:B8 .

We kunnen hiervoor de volgende macro maken:

 Sub IfNotBlank()
    Dim i As Integer

    For i = 2 To 13
        If Not IsEmpty(Range(" A " & i)) Then
        Result = “ Cell is Not Empty ”
        Else
        Result = “ Cell is Empty ”
        End If
    Range(" B " & i) = Result
    Next i
End Sub

Wanneer we deze macro uitvoeren, ontvangen we de volgende uitvoer:

Kolom B vertelt ons of elk van de overeenkomstige cellen in kolom A leeg is of niet.

U kunt ook de volgende macro gebruiken om eenvoudigweg de teamnaam zelf in kolom B terug te geven als de waarde in kolom A niet leeg is:

 Sub IfNotBlank()
    Dim i As Integer

    For i = 2 To 13
        If Not IsEmpty(Range(" A " & i)) Then
        Result = Range(" A " & i).Value
        Else
        Result = " Empty "
        End If
    Range(" B " & i) = Result
    Next i
End Sub

Wanneer we deze macro uitvoeren, ontvangen we de volgende uitvoer:

Kolom B retourneert nu de teamnaam in kolom A als de cel niet leeg is.

Opmerking : u kunt hier de volledige documentatie voor de VBA IsEmpty- methode vinden.

Aanvullende bronnen

In de volgende tutorials wordt uitgelegd hoe u andere veelvoorkomende taken in VBA kunt uitvoeren:

VBA: het aantal tekens in een string tellen
VBA: hoe controleer je of een string een andere string bevat?
VBA: een formule voor “Als” de cel bevat “