Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Пробле автоподбора типа ячейки в excel / 18 сообщений из 18, страница 1 из 1
15.02.2007, 10:38:28
    #34332353
glazz_gms
glazz_gms
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Пробле автоподбора типа ячейки в excel
Приветствую Вас знатоки.

Проблема такова: занашу в ячейку переменную типа Currency, а excel переделывает данное по своему.
Например: пишу в ячейку переменную типа Currency (знач: 2,416), а в этоге получается 2 416 (он счттает что это не 2,416 а 2 416(после двойки пробел как разделитель разряда.))

Sub Help()

Dim n as Currncy

n=2,416

cells(1,1).value=n

End Sub

На выходе в ячейке 2 416 (после двойки пробел как разделитель разряда)

Помогите советом. Плиз!!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.02.2007, 10:58:40
    #34332434
vbapro
vbapro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Пробле автоподбора типа ячейки в excel
glazz_gmsDim n as Currncy неужели в коде так и указано?
glazz_gmsn=2,416 опять же, неужели в коде разделитель запятая?

у меня вот так работает без ошибки, хотя точность теряется до двух знаков
Код: plaintext
1.
2.
3.
4.
Sub Help()
Dim n As Currency
    n =  2 . 416 
    Cells( 1 ,  1 ).Value = n
End Sub
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.02.2007, 16:28:15
    #34334111
glazz_gms
glazz_gms
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Пробле автоподбора типа ячейки в excel
да ошибка вышла. Извиняюсь.

Но вот как избавиться от округления.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.02.2007, 16:38:17
    #34334164
vbapro
vbapro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Пробле автоподбора типа ячейки в excel
glazz_gmsНо вот как избавиться от округления.
используй Double. Вряд ли будет потребность оперировать с суммами, превышающими предел 15 разрядов мантиссы (триллион будет считаться сточностью до копеек) :)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.02.2007, 16:57:38
    #34334240
glazz_gms
glazz_gms
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Пробле автоподбора типа ячейки в excel
Значит не ошибка. Но как этообъяснить

Вот скрины:
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.02.2007, 16:57:55
    #34334243
glazz_gms
glazz_gms
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Пробле автоподбора типа ячейки в excel
и вот
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.02.2007, 16:58:46
    #34334246
glazz_gms
glazz_gms
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Пробле автоподбора типа ячейки в excel
прокоментируйте плиз! Первоначальный вопрос и скрины!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.02.2007, 17:00:28
    #34334254
vbapro
vbapro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Пробле автоподбора типа ячейки в excel
при помещении значения переменной типа currency тип ячейки тоже становится таким.
Код: plaintext
1.
2.
3.
4.
Sub Help()
Dim n As Currency
    n =  2 . 416 
    Cells( 1 ,  1 ).Value = cdbl(n)
End Sub
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.02.2007, 18:34:57
    #34334700
glazz_gms
glazz_gms
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Пробле автоподбора типа ячейки в excel
Ув. vbapro

Кстати тип переменной "Curency" имеет 4 знака после запятой (Например: Х,ХХХХ)
я опубликовал картинки в которых явно видно, что в переменная "n" имеет значение с запятой.

Excel у меня работает с Curency и в нем запятая. Как это обяснить не знаю но это факт.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.02.2007, 18:45:24
    #34334734
glazz_gms
glazz_gms
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Пробле автоподбора типа ячейки в excel
Поясните ответ на первоначальный вопрос!

У меня даже функции (as Currency) возвращают данные с запятой.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.02.2007, 18:55:37
    #34334774
vbapro
vbapro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Пробле автоподбора типа ячейки в excel
glazz_gmsКстати тип переменной "Curency" имеет 4 знака после запятой (Например: Х,ХХХХ) с этим не поспоришь :)
glazz_gmsя опубликовал картинки в которых явно видно, что в переменная "n" имеет значение с запятой.Внутри программы, как видно в коде, числовые литералы пишутся с точкой в качестве десятичного разделителя. Запятая, а точнее разделитель Application.International(xlDecimalSeparator) появляется при конвертировании числовго значения в текст и не зависит от типа.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.02.2007, 20:04:32
    #34334932
glazz_gms
glazz_gms
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Пробле автоподбора типа ячейки в excel
Дайте мне (плиз) практический совет. Как мне победить ",". У меня все функции которые возвращают ( as Currency) они возвращают значение с запятой. Как мне это быть.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.02.2007, 20:26:27
    #34334976
vbapro
vbapro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Пробле автоподбора типа ячейки в excel
1. посмотри так что получается?
Код: plaintext
1.
2.
3.
4.
Sub Help()
Dim n As Currency
    n =  2 . 416 
    Cells( 1 ,  1 ).FormulaLocal = n
End Sub

2. что у тебя стоит в системных настройках региональных стандартов в качестве разделителя групп разрядов.
это также можно узнать через
Код: plaintext
Debug.Print Application.International(xlThousandsSeparator)
если точка, то замени на пробел, если это не имеет значения
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.02.2007, 20:33:29
    #34334986
glazz_gms
glazz_gms
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Пробле автоподбора типа ячейки в excel
Debug.Print Application.International(xlThousandsSeparator) у меня равно " " (пробел), что дальше?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.02.2007, 21:02:01
    #34335019
vbapro
vbapro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Пробле автоподбора типа ячейки в excel
Код: plaintext
1.
2.
3.
4.
Sub Help()
Dim n As Currency
    n =  2 . 416 
    Cells( 1 ,  1 ).FormulaLocal = n
End Sub
а здесь что получается, тысячи или дробное число?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.02.2007, 21:06:19
    #34335028
glazz_gms
glazz_gms
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Пробле автоподбора типа ячейки в excel
Результат процедуры : HELP = "2,42р."
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.02.2007, 22:07:01
    #34335094
vbapro
vbapro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Пробле автоподбора типа ячейки в excel
это не все, еще какой-то вопрос остался открытым?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.02.2007, 09:20:14
    #34335478
vkodor
vkodor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Пробле автоподбора типа ячейки в excel
Код: plaintext
1.
2.
3.
4.
Sub Help()
Dim n As Currency
    n =  2 . 416 
    Cells( 1 ,  1 ).Value2 = n
End Sub
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Пробле автоподбора типа ячейки в excel / 18 сообщений из 18, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 350ms
Закрыть
start [/forum/topic.php?fid=61&mobile=1&tid=2183436]:
 0ms
get settings:
 10ms
get forum list:
 18ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 25ms
get topic data:
 10ms
get forum data:
 2ms
get page messages:
 45ms
get tp. blocked users:
 1ms
others: 233ms
total:  350ms
x
x
Закрыть


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