Excel97: Bedingte Berechnung
Erich Jung
Folgendes Problem kann ich nicht lösen:
Ich möchte in Zellen, in die verschiedene Währungen eingetragen werden
können, in DM umrechnen.
Beispiel:
A1 = 10 US$
A2 = 10 Euro
.
. usw.
und dann
A10 = SUMME(A1:A9) ..... Hier soll der Gesamtbetrag in DM berechnet
werden.
Es sollen aber keine Hilfszellen bzw. Hilfsspalte für eine
Zwischenrechnung eingefügt werden und das ganze soll ohne VBA
funktionieren!
Wie kann ich die Summenformel gestalten, dass zwischen den einzelnen
Währungen unterschieden wird und dennoch eine Aufsummierung möglich ist.
Ich habe auch schon an verschiedenfarbige Einträge gedacht. Leider habe
ich keinen Plan wie so etwas gehen kann, wenn überhaupt.
Ich hoffe auf Eure Hilfe.
Gruss Erich
Andreas Toschka
Erich Jung <erich...@de.bosch.com> schrieb in im Newsbeitrag:
3A6EA001...@de.bosch.com...
vielleicht mit der Funktion Summewenn, für die einzelnen Währungen
verschachtelt. Ist mir so eben durch den Kopf gegangen.
--
CU Andy
andreas...@gmx.de
Peter Dorigo
also versuchen wir's :-)
um die Übersicht zu behalten, müssen wir das Ganze ein wenig strukturieren;
unter "Einfügen-Namen-festlegen" ist einzugeben:
Namen in der Arbeitsmappe:
Input.Range
Bezieht sich auf:
=A$1:A$9
(Hier wird der Eingabebereich festgelegt)
Namen in der Arbeitsmappe:
Betrag
Bezieht sich auf:
=WENN(Input.Range<>"";WERT(LINKS(Input.Range;FINDEN(" ";Input.Range)-1)))
(Extrahiert den Währungs-Betrag aus den Strings)
Namen in der Arbeitsmappe:
Währung
Bezieht sich auf:
=RECHTS(Input.Range;LÄNGE(Input.Range)-FINDEN(" ";Input.Range))
(Extrahiert die Währung aus den Strings)
Namen in der Arbeitsmappe:
Währung.Nr
Bezieht sich auf:
=VERGLEICH(Währung;{"USD";"Euro";"SFr"};)
(Berechnet den Index der Währung)
Namen in der Arbeitsmappe:
Kurs
Bezieht sich auf:
=WENN(Input.Range<>"";WAHL(Währung.Nr;1,789;1,98765;1,2345))
(Hier wird der Kurs festgelegt, Wichtig: Reihenfolge entsprechend "Währung.Nr)
jetzt lautet die Summen-Formel in A10:
=SUMMENPRODUKT(Betrag;Kurs)
auf korrekte Schreibweise der Währungskürzel und Leerzeichen zwischen Betrag und
Währung achten!
Die Währungen kannst Du beliebig erweitern, die Umrechnungskurse sind Beispiele
und deshalb der Realität anzupassen
auf Wunsch kann ich dir auch eine Demomappe mailen.
mfg Peter
Erich Jung <erich...@de.bosch.com> schrieb in im Newsbeitrag:
3A6EA001...@de.bosch.com...
Peter Dorigo
> um die Übersicht zu behalten, müssen wir das Ganze ein wenig strukturieren;
> unter "Einfügen-Namen-festlegen" ist einzugeben:
*zuvor* Zellcursor in Spalte A stellen!
Erich Jung
klasse, funktioniert prima.
Vielen Dank für Deine schnelle Hilfe.
Gruss Erich
Erich Jung
Noch eine anschliessende Frage.
Da ich nicht nur einen Bereich wie genannt A1:A9 habe, sondern 20 Spalten, möchte
ich gerne die Zwischensummen aus dem Spaltenbereich und dem Zeilenbereich haben.
Also der gesamte Bereich erstreckt sich über A1:F20. Nun sollen die
Spalten-Zwischensummen in A21, B21.....F21 und ausserdem noch die
Zeilen-Zwischensummen aus A1:F1 .... A20:F20 in G1 bis G20 berechnet werden.
Hast Du hier vielleicht noch so eine elegante Lösung.
Vielen Dank.
Gruss Erich mailto: erich...@t-online.de
Peter Dorigo
Erich Jung <erich...@de.bosch.com> schrieb in im Newsbeitrag:
3A702728...@de.bosch.com...
> Hallo Peter.
> Noch eine anschliessende Frage.
>
> Da ich nicht nur einen Bereich wie genannt A1:A9 habe, sondern 20 Spalten,
möchte
^^^^^^^^
Zeilen???
> ich gerne die Zwischensummen aus dem Spaltenbereich und dem Zeilenbereich
haben.
>
> Also der gesamte Bereich erstreckt sich über A1:F20. Nun sollen die
> Spalten-Zwischensummen in A21, B21.....F21 und ausserdem noch die
das ist noch kein Problem, die Festlegung des Bereiches A$1:A$9 (bzw neu:
A$1:A$20) ist für Spalten relativ, dh Du kannst die Formel in jeder Spalte
verwenden; sie berechnet die Summen der Zeilen 1...20 der jeweiligen Spalten. Du
musst nur darauf achten, dass sich der Zellcursor in SpalteA befindet, wenn Du
den Input.Range festlegst. In den Zellen A21...F21 kannst Du die Formel:
=SUMMENPRODUKT(Betrag;Kurs)
verwenden.
> Zeilen-Zwischensummen aus A1:F1 .... A20:F20 in G1 bis G20 berechnet werden.
hier muss ein zweiter, horizontal orientierter Eingabebereich festgelegt werden:
Namen in der Arbeitsmappe:
_Input.Range ' (der _Unterstrich suggeriert: horizontal) :-))
Bezieht sich auf:
=$A1:$F1
hierzu muss der Zellcursor in Zeile1 stehen. (am Besten Du stellst den Cursor in
Zelle A1)
zudem müssen auch die "Horizontal-Formeln" ;-) erstellt werden:
_Betrag
=WENN(_Input.Range<>"";WERT(LINKS(_Input.Range;FINDEN(" ";_Input.Range)-1)))
_Währung
=RECHTS(_Input.Range;LÄNGE(_Input.Range)-FINDEN(" ";_Input.Range))
_Währung.Nr
=VERGLEICH(_Währung;{"USD";"Euro";"SFr"};)
_Kurs
=WENN(_Input.Range<>"";WAHL(_Währung.Nr;1.89;1.96;1.22))
jetzt kannst Du für die Zeilensummen die Formel:
=SUMMENPRODUKT(_Betrag;_Kurs)
in G1...G20 eintragen.
mfg Peter
Peter Dorigo
Erich Jung <erich...@de.bosch.com> schrieb in im Newsbeitrag:
3A702728...@de.bosch.com...
> Hallo Peter.
> Noch eine anschliessende Frage.
>
> Da ich nicht nur einen Bereich wie genannt A1:A9 habe, sondern 20 Spalten,
möchte
> ich gerne die Zwischensummen aus dem Spaltenbereich und dem Zeilenbereich
haben.
>
> Also der gesamte Bereich erstreckt sich über A1:F20. Nun sollen die
> Spalten-Zwischensummen in A21, B21.....F21 und ausserdem noch die
> Zeilen-Zwischensummen aus A1:F1 .... A20:F20 in G1 bis G20 berechnet werden.
>
> Hast Du hier vielleicht noch so eine elegante Lösung.
vergiss mein erstes Reply, ändere einfach die Definition für "Input.Range" auf:
=WENN(ZELLE("spalte";A:1)<7;A$1:A$20;$A1:$F1)
hierzu vorher Zellcursor in Zelle A1 stellen!
mfg Peter
Erich Jung
danke für die Hilfe.
Bei Verwendung Deines Vorschlages aus dem letzten Reply bekomme ich aber immer die
Fehlermeldung dass die Formel nicht korrekt sei.
Gruss erich
Peter Dorigo schrieb:
Peter Dorigo
Erich Jung <erich...@de.bosch.com> schrieb in im Newsbeitrag:
3A7522A3...@de.bosch.com...
> Hallo Peter,
> danke für die Hilfe.
>
> Bei Verwendung Deines Vorschlages aus dem letzten Reply bekomme ich aber immer
die
> Fehlermeldung dass die Formel nicht korrekt sei.
> > =WENN(ZELLE("spalte";A:1)<7;A$1:A$20;$A1:$F1)
> > hierzu vorher Zellcursor in Zelle A1 stellen!
Ja, XL hat recht, die Formel war nicht korrekt :-(
lass mal den ":" weg zwischen "A" und "1" :
(hat sich unbemerkt eingeschlichen, das Schlitzohr ;-))
=WENN(ZELLE("spalte";A1)<7;A$1:A$20;$A1:$F1)
*hierzu vorher Zellcursor in Zelle A1 stellen!*
klappt's jetzt?
mfg Peter
Erich Jung
danke klappt.
Hätt ich auch selber draufkommem können ;-(
Gruss erich
Peter Dorigo schrieb:
> Hallo Erich