Gruppe
UDF
Bereich
Boolean
Thema
Wahrheitsprüfung einer mit Zellwerten zusammengestzten Formel
Problem
Wie kann ich ein in einer Zelle stehendes Ergebnis einer durch Zellwerte zusammengesetzte Formel auf seinen Wahrheitswert prüfen? In Zelle A1 steht "3", in Zelle B1 "+", in Zelle C1 "5", in Zelle D1 "=" und in Zelle E1 "8". In Zelle F1 soll als Wahrheitsprüfung WAHR angezeigt werden.
Lösung
Geben Sie die nachfolgende benutzerdefinierte Funktion in ein Standardmodul ein.
StandardModule: basMain
Function Pruefung( _
sA As String, _
sB As String, _
sC As String, _
sD As String, _
sE As String) As Boolean
Dim sFormula As String
sFormula = "=" & sA & sB & sC & sD & sE
Pruefung = Evaluate(sFormula)
End Function