Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1940to1944
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Währung beim Wert in separater Zeile ausweisen

Währung beim Wert in separater Zeile ausweisen
23.08.2023 10:58:17
N3R0
Hallo Zusammen

Ich habe ein Problem mit einem hoffentlich simplen Fall.

In Spalte A habe ich diverse Beträge in unterschiedlicher Währung:
10 EUR
8 CHF
$ 15
...

Da in der Spalte A die Wähung nicht als Text, sondern als Zahl hinterlegt ist, kriege ich die Währung nicht raus.
In Spalte B möchte ich gerne die Währung ausweisen.

Gibt es hier eine Lösung?

Im Voraus besten Dank.

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Währung beim Wert in separater Zeile ausweisen
23.08.2023 11:13:29
daniel
Hi
schrieb dir dazu eine Funkion in einem allgemeinen Modul

Function Währrungssymbol(Zelle As Range) As String

Dim txt As String
Dim x
txt = Zelle.Text
For Each x In Array(" ", ",", ".", 0, 1, 2, 3, 4, 5, 6, 7, 8, 9)
txt = Replace(txt, x, "")
Next
Währrungssymbol = txt
End Function

und füge die dann mit
=Währungsymbol(A1)
in B1 ein.
Beachte, dass das Ändern von Formaten keine Neuberechnung der Formeln auslöst.
Gruß Daniel
AW: Währung beim Wert in separater Zeile ausweisen
23.08.2023 11:24:53
N3R0
Hallo Daniel

Besten Dank für Deine Hilfe.
Zuerst funktionierte es nicht, aber in der Formel =Währungsymbol(A1) fehlte noch ein zweites "s" (einfach falls jemand dieses Forum ebenfalls benötigt).

Ich danke Dir für Deine schnelle und super Lösung.

Liebe Grüsse N3R0

Anzeige

301 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige