in A1 habe einen Geldbetrag eingetragen-die Zelle ist auch entsprechend formatiert
nun möchte ich per vba mit diesem Wert weiterarbeiten, komme aber mit der Aufbereitung der Variablen nicht klar.
geld = Range("A1")
Mein Problem:
A1 = 100,00 dann ist geld = 100
A1 = 100,50 dann ist geld = 100,5
A1 = 100,99 dann ist geld = 100,99
Was muss ich tun, um dieses Ergebnis zu bekommen?:
A1 = 100,00 dann ist geld = 100,00
A1 = 100,50 dann ist geld = 100,50
A1 = 100,99 dann ist geld = 100,99
Mein Lösungsansatz mittels InStrRev funzt nicht, da die Kommastelle doch von links gesucht wird - ich denke, ich habe die Funktion falsch verstanden :( Sub Test() Dim geld As String geld = Range("A1") komma = InStrRev(Range("A1"), ",") If komma = 0 Then geld = geld & ",00" Else If komma = 1 Then geld = geld & "0" End If End If MsgBox geld End Sub
Gruß Steffen