Страницы: 1
RSS
Очистить ячейку от мусора и получить число
 
Собираю ценовую информацию с сайтов. Она бывает представлена в виде текстового выражения.    
 
Затрудняюсь макросом удалить из ячейки все кроме сути. Мешают буквы, пробелы, невидимые символы (см. А2-А4), разделители разрядов. Десятичный раздетилель может быть в виде точки или запятой. Тоже затрудняюсь с ним что-то сделать.    
 
Дробную часть надо сохранить. Т.е. получить нормальное число с двумя знаками после запятой.
 
Так:
 
The_Prist, мне кажется, эта функция не справляется, если разделитель - точка.  
 
Казанский, результат хорош. Только макроса в примере нет. Можете прислать?
 
Пардон :)  
 
Function qq(s$)  
qq = Val(Replace(Replace(s, "'", ""), ",", "."))  
End Function
 
Спасибо, Казанский. Отличная штука, но у The_Prist более мощная (ваша не умеет убирать текст перед цифрами).  
 
The_Prist, я так и не смог справиться с Вашей задачкой. У меня тогда вообще десятичный разделитель пропадает. Вы не могли бы вставить этот код в нужное место и положить в виде примера?
 
Спасибо большое.
Страницы: 1
Читают тему
Наверх