Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 22:18:24
Liste mit Links - tricky
26.09.2025 18:34:36
Welches Datum gibt mein M-Code aus?
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
640to644
640to644
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Funktion wie Taschenrechner?

Forumthread: Funktion wie Taschenrechner?

Funktion wie Taschenrechner?
25.07.2005 19:54:16
Konrad
Hallo an alle Freaks.........
Thema eine UserForm unter VBA
Eingaben sind Werte, die unter Visual Basic in Berechnungen weiterverwertet werden müssen.
Angenommen ich bekomme von einer Eingabe den (String?)
14 + 17 * 2
zurück.
Wie muss ich es anstellen, dass die Berechnung ausgeführt wird und am Schluss 48 zur Weiterverarbeitung zur Verfügung steht?
Ich weiss, das stellt eigentlich einen Taschenrechner dar, doch sind Anwender immer faul und wollen direkt bei der Eingabe auch noch berechnen lassen ........... ;-)
Hat jemand eine Idee oder gar ein Codefragment?
Derjenige, der gute Ideen hat, wird für den nächsten Award vorgeschlagen, sofern irgend jemand auf mich hört ......... ;-)
Hi
Konrad
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Funktion wie Taschenrechner?
25.07.2005 19:59:56
Sigi
Hallo Konrad,
etwa so ...

Sub Test()
Dim Text As String
Dim Erg As Double
Text = "14 + 17 * 2"
Erg = Evaluate(Text)
MsgBox Erg
End Sub

Gruß
Sigi
AW: Funktion wie Taschenrechner?
25.07.2005 20:00:15
Manfred
hi Konrad
so zum Beispiel

Sub drei()
strx = "14 + 17 * 2"
intx = Evaluate(strx)
End Sub

MfG
Manfred
Anzeige
AW: Funktion wie Taschenrechner?
25.07.2005 20:02:34
Nepumuk
Hi,
Beispiel:
Public Sub berechnen()
    MsgBox Application.Evaluate("14 + 17 * 2")
End Sub
Gruß
Nepumuk
Excel & VBA – Beispiele
Anzeige
AW: Funktion wie Taschenrechner?
25.07.2005 20:02:43
Leo
Hi,
wenn keine Dezimalzahlen vorkommen einfach mit Evaluate, ansonsten musst du das
Komma zuvor in einen Punkt umwandeln.
mfg Leo
AW: Funktion wie Taschenrechner?
25.07.2005 20:19:41
Konrad
Hallo an alle.......
war schon überwältigend, wie viele sich auf meine Anfängerfrage gemeldet haben --
--- und es funktioniert!!!!!!!!
Vielen Dank an alle!!!!
mfg
Konrad
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige