Vba: isnumeric gebruiken om te controleren of cel een getal is
U kunt de functie IsNumeric in VBA gebruiken om te controleren of een bepaalde cel een getal is.
Deze functie retourneert True als de waarde van een bepaalde cel als een getal wordt herkend.
Anders retourneert de functie False .
Hier is een gebruikelijke manier om deze functie in de praktijk te gebruiken:
SubCheckNumeric ()
Dim i As Integer
For i = 1 To 9
If IsNumeric(Range(" A " & i)) = True Then
Range(" B " & i) = " Numeric Value "
Else
Range(" B " & i) = " Not a Numeric Value "
End If
Next i
End Sub
Deze specifieke macro controleert of elke cel in het bereik A1:A9 een getal is.
Als een cel een getal is, wordt „Numerieke waarde“ geretourneerd in de overeenkomstige cel in het bereik B1:B9 .
Als een cel geen getal is, wordt in plaats daarvan ‚Geen numerieke waarde‘ geretourneerd.
Het volgende voorbeeld laat zien hoe u deze syntaxis in de praktijk kunt gebruiken.
Voorbeeld: IsNumeric gebruiken in VBA
Stel dat we de volgende kolom met waarden in Excel hebben:
Stel dat we willen controleren of elke cel in kolom A een getal is.
We kunnen hiervoor de volgende macro maken:
SubCheckNumeric ()
Dim i As Integer
For i = 1 To 9
If IsNumeric(Range(" A " & i)) = True Then
Range(" B " & i) = " Numeric Value "
Else
Range(" B " & i) = " Not a Numeric Value "
End If
Next i
End Sub
Wanneer we deze macro uitvoeren, ontvangen we de volgende uitvoer:
Kolom B geeft een resultaat weer dat ons vertelt of elke overeenkomende cel in kolom A al dan niet als een getal wordt herkend.
Hier zijn enkele interessante dingen om op te merken in het resultaat:
- Getallen met cijfers achter de komma worden herkend als getallen.
- Percentages worden herkend als getallen.
- Datums worden niet als cijfers herkend.
- Teksten die cijfers bevatten, worden niet als cijfers herkend.
Opmerking : u kunt hier de volledige documentatie voor de VBA IsNumeric- functie vinden.
Aanvullende bronnen
In de volgende tutorials wordt uitgelegd hoe u andere veelvoorkomende taken in VBA kunt uitvoeren:
Hoe tekenreeks naar int in VBA te converteren
Hoe een string naar dubbel te converteren in VBA
Hoe u kunt controleren of een string een andere string bevat in VBA