|
Textfelder addieren + Summe mit Dezimalstellen
|
| Autor |
Nachricht |
lurchi
Ich gebe mein bestes....
Verfasst am: 07. Feb 2008, 11:26 Rufname:
|
|
| Version: Office XP (2002) |
|
Hallo,
ich habe 30 Textboxen, welche addiert werden sollen.
| Code: |
Private Sub Betrag1_Change()
Summe1.Value = Val(Betrag1.Value) + Val(Betrag2.Value) + Val(Betrag3.Value) + Val(Betrag4.Value) + Val(Betrag5.Value) + Val(Betrag6.Value) + Val(Betrag7.Value) + Val(Betrag8.Value) + Val(Betrag9.Value) + Val(Betrag10.Value) + Val(Betrag11.Value) + Val(Betrag12.Value) + Val(Betrag13.Value) + Val(Betrag14.Value) + Val(Betrag15.Value) + Val(Betrag16.Value) + Val(Betrag17.Value) + Val(Betrag18.Value) + Val(Betrag19.Value) + Val(Betrag20.Value) + Val(Betrag21.Value) + Val(Betrag22.Value) + Val(Betrag23.Value) + Val(Betrag24.Value) + Val(Betrag25.Value) + Val(Betrag26.Value) + Val(Betrag27.Value) + Val(Betrag28.Value) + Val(Betrag29.Value) + Val(Betrag30.Value)
End Sub |
Für jede Textfeld (Betrag1 bis Betrag30) hab ich den obenen Code erstellt.
Das Feld, wo die Summe stehen soll heißt "Summe1"
Es ist wie folgt formatiert:
| Code: | Private Sub Summe1_Change()
Summe1.Value = Format(Summe1.Value, "#,##0.00 €")
End Sub |
Es funktioniert auch, nur er rechnet die Dezimalstellen nicht zusammen.
Was hab ich falsch?
Vielen Dank
Gruß lurchi
|
|
Cayenne25
Excel/ VBA-Anfänger
Verfasst am: 07. Feb 2008, 13:08 Rufname:
Wohnort: Hannover
|
| |
| Version: Office XP (2002) |
|
Hi Lurchi!
Also ich kenn mich auch nicht super aus, aber versuchs doch mal mit Round statt Format???
Ich muss bei mir auch 3 Textboxen addieren in denen Werte stehen, und als Ausgabe bekomme ich das richtige raus.
So hab ich das zum Beispiel:
TxtbxSUMME_in_pro_j1.Value = Round(TxtbxLTC_j1.Value, 2) + Round(TxtbxLTC_pot_j1.Value, 2) + Round(TxtbxEKL_in_pro_j1.Value, 2)
gruß cayenne
|
|
| Verwandte Themen |
| Forum / Themen |
Antworten |
Autor |
Aufrufe |
Letzter Beitrag |
 |
Excel Hilfe: Felder mit Dropdown Menü definieren und addieren? |
2 |
Gast |
104 |
03. Feb 2010, 22:06 Lorsch  |
 |
Excel VBA (Makros): Summe einer Gruppe automatisch bilden (Variable Zeilenanzahl |
14 |
Bernd_1977 |
306 |
14. Okt 2009, 10:10 Gast  |
 |
Excel Formeln: Summe mehrere TABS + 2 Bedingungen |
12 |
Kimba |
203 |
11. Jul 2009, 11:23 Zero  |
 |
Excel Auswertungen: Diagramm erstellen mit Anzeige von Summe |
2 |
dmtaucher |
712 |
08. Jul 2009, 19:04 dmtaucher  |
 |
Excel Auswertungen: Nach 2 Kriterien suchen und summe bilden |
2 |
Psychotorsten |
102 |
30. Apr 2009, 08:05 Gast  |
 |
Excel VBA (Makros): Zeit fortlaufend addieren und vergleichen |
3 |
onwog |
708 |
21. Okt 2008, 14:11 onwog  |
 |
Excel Auswertungen: Werte in Grafik addieren (kummulieren) |
3 |
Hassler |
1620 |
11. Sep 2008, 17:06 Thomas Ramel  |
 |
Excel Formeln: =SUMME ergibt falsches Ergebnis |
2 |
frankl_sgh |
303 |
08. Feb 2008, 15:21 frankl_sgh  |
 |
Excel Formeln: Summe wenn... |
2 |
.:Guest:. |
202 |
10. Jan 2008, 20:38 Guest  |
 |
Excel Formeln: Summe ergibt immer 0 |
3 |
mawi |
306 |
14. Aug 2007, 12:30 GeDe  |
 |
Excel VBA (Makros): Beträge addieren und Summen teilen |
4 |
Hugo10 |
1215 |
16. Apr 2007, 15:16 Gast  |
 |
Excel Formeln: Suche von Zahlen mit > oder < und dann addieren |
2 |
Idrabu |
305 |
15. März 2007, 15:41 Idrabu  |
| |