Aber wo gebe ich die Funktion ein, damit sie in Excel läuft!!
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Zahlenformat muss Text sein, weil sonst Excel versucht, die Werte als Datum zu interpretieren:
Function KommaPunkt$(Wert$)
Dim Komma
Komma = InStr(Wert, ",")
If Komma <> 0 Then Mid(Wert, Komma, 1) = "."
KommaPunkt = Wert
End Function