Wertübergabe an Zelle - Formatproblem
KViertel
ich suche Hilfe bei folgendem Problem:
Mit "ActiveSheet.Cells(zeile, 14).Value = IIf(vj_flae(i1, y, i, 3) > 0, _
Val(Format(vj_flae(i1, y, i, 3), "0.0")), Null)" soll ein Wert, der z.B 0,1 beträgt übergeben werden. Obwohl die Empfangszelle als Zahl mit 1 Dezimalstelle definiert ist, erscheint 0,0. Es wird jeder Wert abgerundet, 12,9 sind 12,0, obwohl nirgendwo etwa Runden angesprochen wird.
Hat jemand eine Idee?
Mit dank im Vorraus, Klaus