Помогите пожалуйста
Задача преобразовать в числа и не потерять ничего...
Все помечены в Excel треугольничками, пытаюсь применить подобный код

With ws.Range(ws.Cells(18, 2), ws.Cells(789, 9))
.NumberFormat = "0#,0######"
.Value = .Value
End With

Получается, что некоторые преобразуются в число, но явное нарушение порядка числа...
Большая часть не преобразуется...
По сравнению с функцией текст() все неправильно....
Хотелось бы исправить данные на месте расположения (без использования функции text()) и именно средствами VBA
Попытки преобразовать в текст: .Value = "'" & .Value, чтобы почистить строки приводят к ошибке Type mismatch, тоже не могу понять, вроде variant/string и тут тоже string

Спасибо если подскажете, пришлось осваивать, давно уже без программирования, пример данных во вложенном файле

Большое спасибо! Все получилось!