Office: (Office 365) Wechselkurs umrechnen ueber Umweg

Guten Morgen,

ich habe die Wechselkurse der EZB, die ich auch für PL verwenden kann. Da die Wechselkurse, wenn es z.B. € ist, PLN zurückgeben muss, habe ich eine Formel angepasst:
=INDEX('eurorfxref-list_new download19.'!A:AP,MATCH(DATE(LEFT(J256,4),MID(J256,5,2),RIGHT(J256,2)),'eurorfxref-list_new download19.'!A:A,0)+1,MATCH(IF(R256="EUR","PLN",R256),'eurorfxref-list_new download19.'!$1:$1,0))
Wenn ich jetzt z.B. USD als Währung habe müsste ich PLN durch die USD-Rate teilen und hänge gerade ein wenig, wie ich das umsetzen kann. Hat dazu jmd. eine Idee?

Viele Grüsse
Matthias

 

Hi,

=INDEX('eurorfxref-list_new download19.'!$A:$AP;VERGLEICH(A15;'eurorfxref-list_new download19.'!A:A;0);VERGLEICH(C15;'eurorfxref-list_new download19.'!1:1;0))/WENN(B15="EUR";1;INDEX('eurorfxref-list_new download19.'!$A:$AP;VERGLEICH(A15;'eurorfxref-list_new download19.'!A:A;0);VERGLEICH(B15;'eurorfxref-list_new download19.'!1:1;0)))

in B15 USD, in C15 PLN

 

Hallo,

da du Excel365 hast, habe ich dir in den Namensmanager 2 benutzerdefinierte (=LAMBDA)-Funktionen eingefügt, um den Zugriff auf die Arbeitsblätter mit den Daten zu vereinfachen.
=EUWhg(Dt;Whg;[Gl]) greift auf das Arbeitsblatt "eurorfxref-list_new download19." zu und
=PLWhg(Dt;Whg;[Gl]) greift auf das Arbeitsblatt "PLN website" zu.
Dadurch vereinfacht sich die Formel von @BoskoBiati zu: =EUWhg(A15;C15) / WENN(B15="EUR";1;EUWhg(A15; B15))

In strukturierter Gestalt sehen die Funktionen wie folgt aus:


Wie die Funktionen anzuwenden sind, kannst du weiters der beiliegenden Excel-Datei im Arbeitsblatt "eurofxref-hist - Copy" entnehmen.

 

Hallo Exl121150,

auch wenn dem Fragesteller Deine Lösung überhaupt nicht interessiert; ich habe sie mir dafür um so genauer angesehen und festgestelt, daß man optionale Parameter gar nicht mit WurdeAusgelassen() prüfen muß, sondern diesen fehlenden Parametern automatisch der Wert 0 bzw. Falsch zugeordnet wird:
WENN(Gl; "1 EUR = " & TEXT(Kurs; "0,0000 ") & Whg; Kurs)
oder
WENN(WURDEAUSGELASSEN(Gl); Kurs; "1 EUR = " & TEXT(Kurs; "0,0000 ") & Whg)
oder
WENN(Gl=FALSCH; Kurs; "1 EUR = " & TEXT(Kurs; "0,0000 ") & Whg)

Alle 3 Varianten funktionieren im definierten Namen: EUWhg

Gruß von Luschi
aus klein-Paris

 

Hallo @Luschi,

das ist korrekt. Ich verwende die Funktion WURDEAUSGELASSEN(Argument) meist dann, wenn ich der in der Funktion lokal verwendeten Variablen einen davon abweichenden Wert zuweise, sei es dass es ein Stringwert ist oder sei es sonst eine von 0 abweichende Zahl. Das habe ich oben mit dem optionalen Argument 'Gl' gemacht, das in der Funktion nur einen Schalter (0 oder <>0 bzw. FALSCH oder WAHR) darstellen soll.