округлить до

[olimpus]

Подскажите как убрать из столбца "L" все ноли, как показано а столбце "N"
Знак минуса нужно оставить

[SAS888]

А почему у Вас, например, 0,0015 - это 15, а 0,03 - это 0,03? В чем разница?

[olimpus]

[QUOTE=SAS888;332383]А почему у Вас, например, 0,0015 - это 15, а 0,03 - это 0,03? В чем разница?[/QUOTE


Это я ошибся , 0,03 значит 3

[SAS888]

Тогда еще вопрос:
Например, в ячейке "L2" отображается значение 0,0014. На самом же деле, в ней находится значение 0,139999999999996.
Какое число должно получиться в итоговой ячейке? И почему?

[olimpus]

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

[SAS888]

Выделите требуемый диапазон и выполните макрос:

Sub Conv()
    Dim x As Range, Cell As Range: Application.ScreenUpdating = False
    Set x = Intersect(Selection, ActiveSheet.UsedRange)
    For Each Cell In x
        If Cell <> "" Then If IsNumeric(Cell) Then Cell.Value = Round(Cell.Value, 4)
    Next
    For Each Simb In Array("0", ",", "."): x.Replace what:=Simb, ReplaceMent:="": Next
End Sub

[olimpus]

м-М-м THANKS!