Страницы: 1
RSS
Воспринимать значение TextBox в числовом формате
 
Помогите пожалуйста сделать TextBox2-8 в числовом формате, чтобы EXCEL воспринимал числовой формат с разделителем.
Сразу прошу прощения за мой не профессионализм. Вы мне всегда помогаете поэтому и обращаюсь. Я вставил коды для своей цели а вот числовой формат изменить не могу. уже разные коды перепробовал. возможно что-то лишнее где-то вверху. Помогите пожалуйста!
 
В TextBox всегда текст. Преобразуйте его уже при выгрузке.
 
Помогите пожалуста сделать ето в Примере! Плииииииииз.
 
Попробуйте так:
Код
        .Cells(iLastRow, 4) = CDbl(Me.TextBox2)
        Cells(iLastRow, 4).NumberFormat = "#,##0"
 
см.вложение
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
 
У меня не получилось((
 
а у меня?
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
 
Ошибку выдает
 
А у меня получилось.
 
Ігор Гончаренко Ваш пример почету-то у меня выдает ошибку
 
livens, Вы не можете скопировать две строчки в свой код?
 
извините, а так?
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
 
Вот Ваш файл.
 
Спасибо огромное. Оба примера работают! Простите пожалуйста что не смог сразу верно вставить код. Я просто не владею программированием. Благодарю Вас за помощь! Большое спасибо!
 
У меня строчка Cells(iLastRow, 4).NumberFormat = "#,##0" 'Добавлено получилась дважды - уберите дубликат )
Не мешает, но лишняя.
 
я текст процедуры  Private Sub CommandButton1_Click()  чуть поравил, от исходных 60 строк, осталось 32. без потери функциональности.
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
 
Да, видел. Большое спасибо. значительно проще и лучше стало
Страницы: 1
Наверх