Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Thema

Wahrheitsprüfung einer mit Zellwerten zusammengestzten Formel

Gruppe

Boolean

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