Private col, row As Int
col = 2 'the index of the column to modify
For row = 0 To Table2.NumberOfRows - 1
Private Value As Double
Private sValue As String
Value = Table2.GetValue(col, row) 'gets the cell value and transforms it into a String
sValue = "$ " & NumberFormat2(Value, 1, 0, 0, True) 'formats the value into a string
sValue = sValue.Replace(",", ".") 'replaces the commas by dots.
Table2.SetValue(col, row, sValue) 'sets the new value in the cell
Next