In diesem Beispiel zeigen wir Ihnen, wie sich ganz einfach ermitteln lässt, welcher Datentyp sich in einer Zelle befindet.
VBA unterscheidet dabei grundsätzlich folgende Inhalts-Typen:

• Formel
• Zahl
• Datum
• Fehler
• Text

Mit Hilfe des folgenden VBA-Codes wird der Inhalt der gerade aktuellen Zelle analysiert und über eine Message-Box ausgegeben:

PublicSub zellinhalt_prüfen()
'prüfen, ob in einer Formel eine Zahl, eine Formeln, ein Datum
'ein Fehler oder Text steht
'geprüft wird die aktive Zelle
If ActiveCell.HasFormula = True Then
 MsgBox "Formel"
 ElseIf IsNumeric(ActiveCell) Then
 MsgBox "Zahl"
 ElseIf IsDate(ActiveCell) Then
 MsgBox "Datum"
 ElseIf IsError(ActiveCell) Then
 MsgBox "Fehler"
 Else: MsgBox "Text"
End If
End Sub
{/codecitation}