Kommawerte per Makro übernehmen
rolfi
ich habe 2 Tabellenblätter. In einem (B) stehen die Daten, die in (A) übernommen werden sollen.
Dies funktioniert so, dass der zu übernehmene Wert aus Blatt (B) in Spalte 4 auf der Variable AbwTrans gespreichert wird
Sheets(2).activate
AbwTrans = ActiveCell.Offset(0, 4)
und dann in Blatt (A) in Spalte 5 eingefügt wird
Sheets(1).Activate
ActiveCell.Offset(0, 5) = AbwTrans
AbwTrans ist als integer definiert.
Das funktioniert auch so weit mit ganzen Zahlen recht gut. Doch immer wenn z.B. 0,5 übernommen werden soll, wird nur eine 0 eingefügt, obwohl die Variable AbwTrans den Wert 0,5 hat (hab ich mir per Message-Box ausgeben lassen).
Weiß jemand woran dies liegen könnte?