Punkt hinter Zahl

Hallo Forum

ich möchte in einem variablen Range einen Punkt hinter eine Zahl setzen. Das untenstehende Makro funktioniert dann, wenn ich statt des Punktes einen Buchstaben setze.
Beim Punkt tut sich leider nichts.

Was muss geändert werden?

Dim cell As Range
With activeSheet
For Each cell In .Range("C2:C" & Cells(.Rows.Count, "C").End(xlUp).Row)
'cell.Value = Left(cell.Value, Len(cell.Value) + 1) & "."  'Keine Reaktion
cell.Value = CStr(cell) & "." 'Keine Reaktion
next cell
end with