Zellinhalt auf Formel, Zahl, Datum, Fehler oder Text prüfen
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}