Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Bewerten Sie hier bitte das Excel-Portal

Home Zurück Vor

Download Beispiel-Arbeitsmappe

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

Beiträge aus dem Excel-Forum zu den Themen UDF und Boolean

Lohnsteuerberechnung (UDF, XLM-Datei, Webabfrage)

Ergebnis UDF ändert, wenn Tabelle deaktiviert wird

UDF soll nicht auf Daten anderer Dateien zugreifen

vor Ausführung einer UDF Zwischenspeicher "retten&

UDF - Argument ohne " " übergeben möglic

UDF- Beschreibung

Berechnungsdauer einer UDF messen

Hintergrudfarbe ändern??? Finde keine Lösung :-(

Probleme mit IsNumeric, Code per UDF

UDF mittels Ereignis aktualisieren?

UDF, Minuszeichen vor Zahl auswerten

nach Worksheet_Change werden UDF nicht ausgewertet

Excel anhalten bei UDF

UDF, Rückgabewert Text anstelle Zahl

Aufruf einer UDF, Fehler Objekt erforderlich

...(ByVal Cancel As MSForms.ReturnBoolean)

Werte einer UDF werden nicht aktualisiert

Boolean: True = -1 ??

Private Sub Workbook_BeforeClose(Cancel As Boolean

Aufruf von UDF mit Array

Workbook_BeforePrint(Cancel As Boolean)

UDF: Semikolon vs Komma

UDF, erkennen in welcher Zelle die UDF steht

Probleme mit UDF und Worksheet Ereignissen

Formeln über UDF vergleichen

UDF Verweis checken

Private Sub Workbook_BeforeClose(Cancel As Boolean

Intellisense bei User defined functions (UDF)

VBA "Find" in UDF

UDF-Funktionen in eigener Kategorie

UDF Function Variable Info erstellen

UDF, optionaler Parameter als Range, IsEmpty?

UDF verschiedene Bereiche ändern

Makro aus UDF starten

Reihenfolge von UDF's

UDF/ Berechnung Zuschlagszeiten

AddIn UDF in anderem VBA-Project verwenden

Function as Boolean

UDF und Array bzw. Matrix

UDF die Texte in Zahlen umwandelt

Summewenns UDF über mehrere Tabellenblätter

Funktionsargumente für UDF's

Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Can

UDF Reihenfolge Übergabeparamter führt zu #WERT