ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Пробле автоподбора типа ячейки в excel
18 сообщений из 18, страница 1 из 1
Пробле автоподбора типа ячейки в excel
    #34332353
glazz_gms
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
glazz_gms
Участник
Приветствую Вас знатоки.

Проблема такова: занашу в ячейку переменную типа 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:38:28
| Ответить | Цитировать | Написать  
Пробле автоподбора типа ячейки в excel
    #34332434
vbapro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vbapro
Участник
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, 10:58:40
| Ответить | Цитировать | Написать  
Пробле автоподбора типа ячейки в excel
    #34334111
glazz_gms
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
glazz_gms
Участник
да ошибка вышла. Извиняюсь.

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

Вот скрины:
...
Рейтинг: 0 / 0
15.02.2007, 16:57:38
| Ответить | Цитировать | Написать  
Пробле автоподбора типа ячейки в excel
    #34334243
glazz_gms
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
glazz_gms
Участник
и вот
...
Рейтинг: 0 / 0
15.02.2007, 16:57:55
| Ответить | Цитировать | Написать  
Пробле автоподбора типа ячейки в excel
    #34334246
glazz_gms
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
glazz_gms
Участник
прокоментируйте плиз! Первоначальный вопрос и скрины!
...
Рейтинг: 0 / 0
15.02.2007, 16:58:46
| Ответить | Цитировать | Написать  
Пробле автоподбора типа ячейки в excel
    #34334254
vbapro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vbapro
Участник
при помещении значения переменной типа 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, 17:00:28
| Ответить | Цитировать | Написать  
Пробле автоподбора типа ячейки в excel
    #34334700
glazz_gms
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
glazz_gms
Участник
Ув. vbapro

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

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

У меня даже функции (as Currency) возвращают данные с запятой.
...
Рейтинг: 0 / 0
15.02.2007, 18:45:24
| Ответить | Цитировать | Написать  
Пробле автоподбора типа ячейки в excel
    #34334774
vbapro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vbapro
Участник
glazz_gmsКстати тип переменной "Curency" имеет 4 знака после запятой (Например: Х,ХХХХ) с этим не поспоришь :)
glazz_gmsя опубликовал картинки в которых явно видно, что в переменная "n" имеет значение с запятой.Внутри программы, как видно в коде, числовые литералы пишутся с точкой в качестве десятичного разделителя. Запятая, а точнее разделитель Application.International(xlDecimalSeparator) появляется при конвертировании числовго значения в текст и не зависит от типа.
...
Рейтинг: 0 / 0
15.02.2007, 18:55:37
| Ответить | Цитировать | Написать  
Пробле автоподбора типа ячейки в excel
    #34334932
glazz_gms
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
glazz_gms
Участник
Дайте мне (плиз) практический совет. Как мне победить ",". У меня все функции которые возвращают ( as Currency) они возвращают значение с запятой. Как мне это быть.
...
Рейтинг: 0 / 0
15.02.2007, 20:04:32
| Ответить | Цитировать | Написать  
Пробле автоподбора типа ячейки в excel
    #34334976
vbapro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vbapro
Участник
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:26:27
| Ответить | Цитировать | Написать  
Пробле автоподбора типа ячейки в excel
    #34334986
glazz_gms
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
glazz_gms
Участник
Debug.Print Application.International(xlThousandsSeparator) у меня равно " " (пробел), что дальше?
...
Рейтинг: 0 / 0
15.02.2007, 20:33:29
| Ответить | Цитировать | Написать  
Пробле автоподбора типа ячейки в excel
    #34335019
vbapro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vbapro
Участник
Код: 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:02:01
| Ответить | Цитировать | Написать  
Пробле автоподбора типа ячейки в excel
    #34335028
glazz_gms
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
glazz_gms
Участник
Результат процедуры : HELP = "2,42р."
...
Рейтинг: 0 / 0
15.02.2007, 21:06:19
| Ответить | Цитировать | Написать  
Пробле автоподбора типа ячейки в excel
    #34335094
vbapro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vbapro
Участник
это не все, еще какой-то вопрос остался открытым?
...
Рейтинг: 0 / 0
15.02.2007, 22:07:01
| Ответить | Цитировать | Написать  
Пробле автоподбора типа ячейки в excel
    #34335478
vkodor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vkodor
Участник
Код: plaintext
1.
2.
3.
4.
Sub Help()
Dim n As Currency
    n =  2 . 416 
    Cells( 1 ,  1 ).Value2 = n
End Sub
...
Рейтинг: 0 / 0
16.02.2007, 09:20:14
| Ответить | Цитировать | Написать  
18 сообщений из 18, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Пробле автоподбора типа ячейки в excel
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=61&msg=34334986&tid=2183436]:
 0ms
get settings:
 10ms
get forum list:
 17ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 70ms
get topic data:
 12ms
get forum data:
 3ms
get page messages:
 54ms
get tp. blocked users:
 1ms
others: 234ms
total:  409ms
созд. / загр.: 409ms
x
x
Закрыть


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