Below is the code that I am using, however I also need to convert it to number from text.. as this isn't done automatically when doing it with VBA.
Do I need to multiply each cell with 1?
' Makes sure that data i column K in Sheet Data Collection, is numbers.
' Replaces the value . in the cells with ,
Sheets("Data Collection").Select
Range("K4").Select
Range(Selection, Selection.End(xlDown)).Select
Selection.Replace What:=".", Replacement:=",", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Bookmarks