Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Summe von TextBox in UserForm

Forumthread: Summe von TextBox in UserForm

Summe von TextBox in UserForm
20.02.2003 07:55:06
Michael
Hallo Excelfans,
ich hab da ein Problem mit der Summenbildung von mehreren TextBoxen in die Werte eingetragen werden. oder aber auch nicht.
In einem Label in der gleichen UserForm möchte ich mit eingabe von Werten im Label die aktuelle Summe anzeigen. Ich habe gedacht das es so füntioniereb müßte:

Private Sub B2040_Change()
Ablassen.labSumme.Caption = Summe(Ablassen.B2040.Value, Ablassen.Behälter1.Value, Ablassen.Behälter2.Value)
End Sub

Aber leider falsch angenommen. Entweder bekomme ich den Fehler Sub oder Funktion nicht definiert oder aber Typen unverträglich was ich darauf zurückführe, wenn eine TextBox leer bleibt.

Vielen DAnk für jede Hilfe

Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Summe von TextBox in UserForm
20.02.2003 08:39:08
Ramses

Hallo Michael

ohne das ganze jetzt ins Detail zu prüfen

Private Sub B2040_Change()
Ablassen.labSumme.Caption = CDbl(Ablassen.B2040.Value) + CDbl(Ablassen.Behälter1.Value) + CDbl(Ablassen.Behälter2.Value)
End Sub

Gruss Rainer

Re: Summe von TextBox in UserForm
20.02.2003 10:49:03
Michael

Hallo Rainer,
bei deinem Code erhalte ich leider auch die Fehlermeldung Typen unverträglich.

Anzeige
Re: Summe von TextBox in UserForm
20.02.2003 11:39:29
gordon

Hallo Michael,

vielleicht bin ich auch gerade auf dem falschen Fuß, aber SUMME in VBA ?
=sum(...) und ann natürlich erstmal wie Ramses vorgeschlagen hat die Texte in Werte umwandeln.

Gruß
gordon

Re: Summe von TextBox in UserForm
20.02.2003 11:47:43
Ramses

Hallo Michael

Ich weiss nicht was du in deine Textboxen da reinschreibst, aber dieser Beispielcode funktioniert z.B. bei mir, wenn Werte drin stehen, die in ein Zahlenformat (CDbl) umgewandelt werden können:

Private Sub CommandButton1_Click()
MsgBox CDbl(Me.TextBox1.Value) + CDbl(Me.TextBox2.Value)
End Sub

Gruss Raienr

Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

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