Wo liegt der Fehler?
Code: Alles auswählen
function WERT(sString)
Select Case sString
Case "1"
sText = "1"
Case "2"
sText = "1. und 2"
End Select
WERT = sText
End function
Code: Alles auswählen
function WERT(sString)
Select Case sString
Case "1"
sText = "1"
Case "2"
sText = "1. und 2"
End Select
WERT = sText
End function