Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Видит в десятичном числе с точкой - текстовый формат - Мир MS Excel

Регистрация · Логин: · Пароль: · · Забыли пароль?
Страница 1 из 11
Модератор форума: _Boroda_, Pelena, Manyasha, SLAVICK 
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Видит в десятичном числе с точкой - текстовый формат (Макросы/Sub)
Видит в десятичном числе с точкой - текстовый формат
lopuxi Дата: Воскресенье, 18.09.2016, 19:36 | Сообщение № 1
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 108
Репутация: 0 ±
Замечаний: 20% ±

Excel 2007, 2013
Ошибка возникает после того, как код заполнил ListBox числами c десятичными значениями.
После я хочу занести выделенный элемент из ListBox в TextBox умноженное на кол-во. И здесь выясняется что взятое значение из ListBox - не является числом, в том случаи если оно, разделено "." - 999.22
В этом случаи возникает ошибка и любые мои попытки использовать преобразование в числовой формат - провалены.

Вопрос почему так?

Прикрепляю пример
К сообщению приложен файл: _2.xlsm(86Kb)


О_о ...и так можно было?
 
Ответить
СообщениеОшибка возникает после того, как код заполнил ListBox числами c десятичными значениями.
После я хочу занести выделенный элемент из ListBox в TextBox умноженное на кол-во. И здесь выясняется что взятое значение из ListBox - не является числом, в том случаи если оно, разделено "." - 999.22
В этом случаи возникает ошибка и любые мои попытки использовать преобразование в числовой формат - провалены.

Вопрос почему так?

Прикрепляю пример

Автор - lopuxi
Дата добавления - 18.09.2016 в 19:36
Pelena Дата: Воскресенье, 18.09.2016, 20:21 | Сообщение № 2
Группа: Модераторы
Ранг: Экселист
Сообщений: 9851
Репутация: 2254 ±
Замечаний: 0% ±

Excel 2010 & Mac Excel 2011
И Вам здравствуйте.
Попробуйте заменить точку на запятую
[vba]
Код
Purchase = CSng(Replace(ListTovari.Column(2), ".", ","))
[/vba]


"Черт возьми, Холмс! Но как??!!"
ЯД 41001765434816
 
Ответить
СообщениеИ Вам здравствуйте.
Попробуйте заменить точку на запятую
[vba]
Код
Purchase = CSng(Replace(ListTovari.Column(2), ".", ","))
[/vba]

Автор - Pelena
Дата добавления - 18.09.2016 в 20:21
lopuxi Дата: Воскресенье, 18.09.2016, 21:50 | Сообщение № 3
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 108
Репутация: 0 ±
Замечаний: 20% ±

Excel 2007, 2013
Спасибо огромное))
Все работает!


О_о ...и так можно было?
 
Ответить
СообщениеСпасибо огромное))
Все работает!

Автор - lopuxi
Дата добавления - 18.09.2016 в 21:50
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Видит в десятичном числе с точкой - текстовый формат (Макросы/Sub)
Страница 1 из 11
Поиск:

Яндекс цитирования
© 2010-2016 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!