Jag har två strängar som innehåller decimal värden.
Hur gör jag för att summera ihop dessa?

Ex:
str1="012,12"
str2="4556,12"
a=str1+str2


Vill även få med decimaltalen

Gör så här:

str1="012,12"
str2="4556,12"
a=Round(str1+str2, 2)

round-funktionen funkar så att det tar talet och skriver ut talet och antalet decimaler som du sätter in istället för 2:an

//FX

ska "a" vara double?

Njet, jag får inte med decimalerna.
Vad gör jag för fel?

<code>
Dim str1 As String, str2 As String

str1 = "012,12"
str2 = "4556,12"
Debug.Print CDbl(str1) + CDbl(str2)
</code>

/Johan

Jag tror att problemet är decimaltecknet. Du har decimalkomma på talen i dina strängar men VB vill ha decimal punkt i stället. Om man byter ut decimaltecknen med Replace-funktionen och sedan gör om det till en double med Val-funktionen fungerar det hos mig.

<code>
Dim str1, str2 As String
Dim a As Double

str1 = "012,12"
str2 = "4556,12"
a = Val(Replace(str1, ",", ".")) + Val(Replace(str2, ",", "."))
</code>