powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Формат числа (округлить и отбросить)
4 сообщений из 4, страница 1 из 1
Формат числа (округлить и отбросить)
    #33461517
LMe
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
LMe
Гость
Добрый день.
У меня всего один небольшой скорее математический вопрос.
Проблема в следующем.
В таблице ecxel есть ряд вычисляемых значений. Точность после вычисления 5-7 знаков после запятой. (x*y/1000)
Необходимо чтобы в результате точность была 4 знака.
Т.е. необходимо округлить до 4-го знака и все остальное отбросить.
Метод .NumberFormat = "0.0000" дает только представление чисел на экране.
При дальнейших расчетах все равно продолжает использоваться длинное число. Что приводит к потере данных.
E.g.
0,0001 + 0,0002=0,0003
0,00005+0,00019=0,00024=0,0002

Спасибо.
...
Рейтинг: 0 / 0
Формат числа (округлить и отбросить)
    #33461551
Код: plaintext
1.
2.
3.
4.
A1 =  2 , 12345 

Range("B1").Formula = "=ROUND(A1,4)"

B1 =  2 , 1235 
...
Рейтинг: 0 / 0
Формат числа (округлить и отбросить)
    #33461582
Nikz
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
как вариант
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)

Dim d As Double
If IsNumeric(Target.Value) = False Or Target.Value = "" Then Exit Sub
d = Target.Value
d = Format(d, "0.0000")
Target.Value = d

End Sub
...
Рейтинг: 0 / 0
Формат числа (округлить и отбросить)
    #33461663
LMe
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
LMe
Гость
Nikz , так слишком круто для программы вида "замена калькулятора и 2-3 дам со склада". :) (Я так не умею.) Но все равно спасибо.

Пользователь2 , спасибо, пойду попробую. :)
...
Рейтинг: 0 / 0
4 сообщений из 4, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Формат числа (округлить и отбросить)
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]