Vba: isdate gebruiken om te controleren of cel een datum is


U kunt de functie IsDate in VBA gebruiken om te controleren of een bepaalde cel een datum is.

Deze functie retourneert True als de waarde in een bepaalde cel als een datum wordt herkend.

Anders retourneert de functie False .

Hier is een gebruikelijke manier om deze functie in de praktijk te gebruiken:

 SubCheckDate ()
    
Dim i As Integer

For i = 1 To 9
    
    If IsDate(Range(" A " & i)) = True Then
        Range(" B " & i) = " Is a Date "
    Else
        Range(" B " & i) = " Is Not a Date "
    End If
Next i
    
End Sub

Deze specifieke macro controleert of elke cel in het bereik A1:A9 een datum is.

Als een cel een datum is, wordt „Is een datum“ geretourneerd in de overeenkomstige cel in het bereik B1:B9 .

Als een cel geen datum is, wordt in plaats daarvan „Is geen datum“ geretourneerd.

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

Voorbeeld: IsDate 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 datum is.

We kunnen hiervoor de volgende macro maken:

 SubCheckDate ()
    
Dim i As Integer

For i = 1 To 9
    
    If IsDate(Range(" A " & i)) = True Then
        Range(" B " & i) = " Is a Date "
    Else
        Range(" B " & i) = " Is Not a Date "
    End If
Next i
    
End Sub

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

Kolom B vertelt ons of elke overeenkomende cel in kolom A al dan niet als datum wordt herkend.

Houd er rekening mee dat we ervoor kiezen om „Is een datum“ of „Is geen datum“ te retourneren, maar u kunt retourneren wat u maar wilt met behulp van de If Else -instructie.

Opmerking : u kunt hier de volledige documentatie voor de VBA IsDate- functie vinden.

Aanvullende bronnen

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

VBA: Hoe de maandnaam van de datum te krijgen
VBA: hoe de DateValue-functie te gebruiken
VBA: getal groter dan datum

Einen Kommentar hinzufügen

Deine E-Mail-Adresse wird nicht veröffentlicht. Erforderliche Felder sind mit * markiert