Gruppen
- Top Gruppen
- Betriebsysteme
- Windows classik
- Linux
- BS-Sonstige
- Software
- Datenbanken
- Bildbearbeitung
- Audio/mp3/Video
- Security/Viren
- SW-Sonstige
- Hardware
- Mainboard/CPU
- Grafikkarten
- Peripherie
- Laptop/Notebook
- HW-Sonstiges
- Netzwerk
- Telefon,ISDN,Modem
- W-Lan
- NW-Sonstiges
- Programmierung
- PHP,ASP,Perl...
- Java,C++...
- Webseiten/HTML
- Sonstiges
- PC-Sonstiges
- Plauderecke
- SN Intern
- Test
/ Forum / Tabellenkalkulation
Tabellenkalkulation
Fragevon 12345 vom 13.05.2021, 20:50 Options
Werte aus Textfeldern summieren
Hallo,
als VBA-Neuling komme ich bei folgendem Problem nicht mehr weiter und hoffe dass mir jemand weiterhelfen kann.
Ich habe momentan ein Formular mit 3 Textfeldern. Neben jedem Textfeld befinden sich zwei Befehlsschaltflaechen. Von diesen Schaltflaechen laedt eine eine bestimmte Zahl in das Textfeld und mit der anderen Schalftlaeche, kann diese Zahl wieder "geloescht" werden. Soweit so gut.
Zu diesem Formular moechte ich jetzt noch ein viertes Textfeld einfuegen. Das jeweils, sofern vorhanden, die Werte aus den Textfeldern addiert.
Beispiel: Textfeld1 = 100, Textfeld2= 200 --> Textfeld4 = 300...
Eigentlich duerfte dieser Befehl doch nicht so schwierig sein - so zumindest meine Meinung als Anfaenger, aber momentan komme ich nicht darauf und meine Mittel sind doch noch sehr begrenzt.
Ich bedanke mich schon vorab fuer eure Hilfe
und bin schon auf die Loesung gespannt.
Stefan
P.S.: Ich verwende momentan Excel2003
als VBA-Neuling komme ich bei folgendem Problem nicht mehr weiter und hoffe dass mir jemand weiterhelfen kann.
Ich habe momentan ein Formular mit 3 Textfeldern. Neben jedem Textfeld befinden sich zwei Befehlsschaltflaechen. Von diesen Schaltflaechen laedt eine eine bestimmte Zahl in das Textfeld und mit der anderen Schalftlaeche, kann diese Zahl wieder "geloescht" werden. Soweit so gut.
Zu diesem Formular moechte ich jetzt noch ein viertes Textfeld einfuegen. Das jeweils, sofern vorhanden, die Werte aus den Textfeldern addiert.
Beispiel: Textfeld1 = 100, Textfeld2= 200 --> Textfeld4 = 300...
Eigentlich duerfte dieser Befehl doch nicht so schwierig sein - so zumindest meine Meinung als Anfaenger, aber momentan komme ich nicht darauf und meine Mittel sind doch noch sehr begrenzt.
Ich bedanke mich schon vorab fuer eure Hilfe
und bin schon auf die Loesung gespannt.
Stefan
P.S.: Ich verwende momentan Excel2003
Antwort 1 von Beverly vom 14.05.2021, 11:10 Options
Hi Stefan,
da Textfelder Text enthalten, musst du die "Zahl" vorher in eine Zahl umwandeln:
Textfeld4 = CDbl(Textfeld1) + CDbl(Textfeld2) + CDbl(Textfeld3)
Bis später,
Karin
da Textfelder Text enthalten, musst du die "Zahl" vorher in eine Zahl umwandeln:
Textfeld4 = CDbl(Textfeld1) + CDbl(Textfeld2) + CDbl(Textfeld3)
Bis später,
Karin
Antwort 2 von 12345 vom 14.05.2021, 15:07 Options
Hallo Karin,
vielen, vielen Dank fuer deine Hilfe. Wieder etwas gelernt.
Aber leider ist Textfeld4 immer noch "tot".
In Anlehnung an deinen Vorschlag hab ich folgende Formel versucht (usrWerte ist der Name des Formulars):
usrWerte.TextBox4.Value = CDbl(TextBox1) + CDbl(TextBox2) + CDbl(TextBox3) - aber leider wird wieder nichts angezeigt.
Ich hab auch weiter geforscht und unter anderem mit der Summenfunktion gearbeitet, was nach meinem Wissensstand so aussehen koennte:
usrWerte.TextBox4.Value = Application.WorksheetFunction.Sum(CDbl(TextBox1), CDbl(TextBox2), CDbl(TextBox3) - aber auch hier wieder kein Ergebnis in Textfeld4.
Nun, momentan weiss ich wirklich nicht weiter.
Hast du oder vielleicht auch jemand anderer einen Voschlag?
Ich bin fuer jede Hilfe dankbar.
Stefan
vielen, vielen Dank fuer deine Hilfe. Wieder etwas gelernt.
Aber leider ist Textfeld4 immer noch "tot".
In Anlehnung an deinen Vorschlag hab ich folgende Formel versucht (usrWerte ist der Name des Formulars):
usrWerte.TextBox4.Value = CDbl(TextBox1) + CDbl(TextBox2) + CDbl(TextBox3) - aber leider wird wieder nichts angezeigt.
Ich hab auch weiter geforscht und unter anderem mit der Summenfunktion gearbeitet, was nach meinem Wissensstand so aussehen koennte:
usrWerte.TextBox4.Value = Application.WorksheetFunction.Sum(CDbl(TextBox1), CDbl(TextBox2), CDbl(TextBox3) - aber auch hier wieder kein Ergebnis in Textfeld4.
Nun, momentan weiss ich wirklich nicht weiter.
Hast du oder vielleicht auch jemand anderer einen Voschlag?
Ich bin fuer jede Hilfe dankbar.
Stefan
Antwort 3 von 12345 vom 18.05.2021, 15:14 Options
Hallo,
das Problem ist geloest:
With Form1
.TextBox4.Value = Val(.TextBox1.Value) + Val(.TextBox2.Value) + Val(.TextBox3.Value)
End With
Stefan
das Problem ist geloest:
With Form1
.TextBox4.Value = Val(.TextBox1.Value) + Val(.TextBox2.Value) + Val(.TextBox3.Value)
End With
Stefan
Ähnliche Themen
Spalten summieren, durch Anzahl der Spalten teilen - wenn Werte ungleich Null
Petra65 29.01.2008 - 108 Hits - 2 Antworten
Inhalt von Textfeldern nach Excel importieren
RPFL57 12.04.2008 - 92 Hits - 10 Antworten
Werte aus verschiedenen Tabellen Summieren
joe.do 30.09.2008 - 238 Hits - 44 Antworten
Prozentwerte summieren
wundi23 18.09.2008 - 16 Hits - 1 Antwort
Zahlen > x summieren
Casy11 09.12.2008 - 51 Hits - 2 Antworten
Hinweis
Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..
Neue Einträge
