RE:sumar dos valores CURRENCY
Si contiene el símbolo de Pesos no se puede sumar porque es una cadena y las cadenas se concatenan:
$300 + $700 = $300$700
Para que se sume bien y siga poniendo el símbolo del peso tal como lo quieres debes primero que tomar sólo los números, ignorando el símbolo, sumarlos y luego, una vez convertido de nuevo a cadena, volver a poner el símbolo del peso delante o donde quieras.
Ejemplo:
Var1 = "$1500"
Var2 = "$3640"
Resultado = "$" & CStr(CLng((Mid(Var1, 2, Len(Var1))) + CLng(Mid(Var2, 2, Len(Var2)))))
Resultado = $5140
De nuevo lo tienes como cadena y así siempre.
Yo lo haría sin formato moneda (currency) y sólo lo convertiría después de sumado, o sea, cuando lo debes presentar y así ganas en tiempo y anulas errores.