Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / экспоненциальный формат / 4 сообщений из 4, страница 1 из 1
18.08.2010, 21:17
    #36798881
segail
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
экспоненциальный формат
Здравствуйте.
В примере код
Код: plaintext
1.
2.
3.
Private Sub CommandButton1_Click()
    TextBox2 = Val(TextBox3.Value) - Cells(i +  451 ,  18 ).Value
    Range("S1") = Val(TextBox2.Value) + Cells(i +  451 ,  18 ).Value
End Sub
TextBox2 отображается формат экспоненциальный, хотя должно отобразится отрицательное значение ячейки Cells(i + 451, 18) , почему, или так должно быть?
...
Рейтинг: 0 / 0
19.08.2010, 10:33
    #36799443
AndreTM
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
экспоненциальный формат
У вас Офис 2003 или ниже? Вам не нравится значение в S1 или в TextBox?

В ячейке R451 после деления у вас после запятой 16 нулей - естественно, отображение переводится в экспоненциальную форму. Если хотите получить просто 0 - используйте ROUND(), используйте в настройках Экзеля "Вычисления"-"Отображение как на экране"...
http://support.microsoft.com/kb/78113

И еще - Range("S1").Value = или [S1] = , TextBox2.Value =
...
Рейтинг: 0 / 0
19.08.2010, 18:24
    #36801132
segail
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
экспоненциальный формат
Что бы в TextBox2 отобразилось фактическое числовое значение, а не экспоненциальный формат.
У меня Excel 2007.
...
Рейтинг: 0 / 0
20.08.2010, 02:28
    #36801604
AndreTM
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
экспоненциальный формат
Код: plaintext
1.
2.
Private Sub CommandButton1_Click()
    TextBox2.Value = Format(Val(TextBox3.Value) - Cells(i +  451 ,  18 ).Value, "#0." + String( 30 , "#"))
...
...
Рейтинг: 0 / 0
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / экспоненциальный формат / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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