Отправляет email-рассылки с помощью сервиса Sendsay

[Office] разрядность чисел

как в Exel определить количество разрядов числа перед запятой?
т.е. если число 1234,56 - то надо, чтобы выдавало 4 разряда.
понимаю, что писать функцию надо на VB, но с ним не дружу.
Помогите, кто чем может.
Просто есть показания датчиков, когда показания переходят через круг, т.е. с
9999 на 0001, надо корректно вычислить разность, проблема в том, что есть
несколько датчиков и у всех разрядность разная от 3-х до 6-и разрядов. Как
на FoxPro сделать - знаю, но надо именно в Exel, а забивать вместо 1 число
10001 некорректно, но тогда считает простым вычитанием.
Спасибо.

Ответить   "DimaS_Kesbyt" Wed, 20 Dec 2006 12:13:20 +0300 (#622410)

 

Ответы:

Здравствуйте, DimaS_Kesbyt.

Вы писали 20 декабря 2006 г., 11:13:20:

Через две формулы попробуй в двух следующих колонках: 1234,56
В первой функцию =ОТБР(A1) отбросить дробную часть: 1234
Вторая ячейка =ДЛСТР(B2) длина строки ставшейся: 4

с

В этом подходе есть проблема для числа 0,1 количество 1,
для нуля тоже 1 разряд.

Ответить   Wed, 20 Dec 2006 13:05:11 +0200 (#622421)

 

сам справился, RTFM+Example Help
вставил модуль о описал новую функцию =Разряд(<значение>).

Function Разряд(ТекЧисло)
If ТекЧисло = Null Or ТекЧисло = 0 Then
Разряд = 1
Exit Function
End If
Dim Counter
Counter = 0
While ТекЧисло >= 1
ТекЧисло = ТекЧисло / 10
Counter = Counter + 1
Wend
Разряд = Counter
Debug.Print Counter
End Function

Спасибо, всем.

Ответить   "DimaS_Kesbyt" Wed, 20 Dec 2006 14:27:08 +0300 (#622446)