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

Вход

Регистрация

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

 

= Мир MS Excel/Сложение значения и значения Textbox - Мир MS Excel

Регистрация · Логин: · Пароль: · · Забыли пароль?
  • Страница 1 из 1
  • 1
Модератор форума: _Boroda_, Pelena, Manyasha, SLAVICK  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Сложение значения и значения Textbox (Макросы/Sub)
Сложение значения и значения Textbox
Serg73 Дата: Понедельник, 09.04.2018, 09:40 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 6
Репутация: 0 ±
Замечаний: 20% ±

Excel 2013
Добрый день, подскажите как правильно прописать
Необходимо что бы число забитое с клавиатуры в textbox автоматически увеличивалось на десять и отображалось в этом же Textbox
К сообщению приложен файл: 3979980.xlsm(16.0 Kb)
 
Ответить
СообщениеДобрый день, подскажите как правильно прописать
Необходимо что бы число забитое с клавиатуры в textbox автоматически увеличивалось на десять и отображалось в этом же Textbox

Автор - Serg73
Дата добавления - 09.04.2018 в 09:40
RAN Дата: Понедельник, 09.04.2018, 12:54 | Сообщение № 2
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4730
Репутация: 950 ±
Замечаний: 0% ±

2010
так
[vba]
Код
Dim x#
Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
    x = x & Chr(KeyAscii)
    KeyAscii = 0
    TextBox1.Text = x + 10
End Sub
[/vba]


Быть или не быть, вот в чем загвоздка!

Сообщение отредактировал RAN - Понедельник, 09.04.2018, 13:58
 
Ответить
Сообщениетак
[vba]
Код
Dim x#
Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
    x = x & Chr(KeyAscii)
    KeyAscii = 0
    TextBox1.Text = x + 10
End Sub
[/vba]

Автор - RAN
Дата добавления - 09.04.2018 в 12:54
Serg73 Дата: Понедельник, 09.04.2018, 13:39 | Сообщение № 3
Группа: Пользователи
Ранг: Прохожий
Сообщений: 6
Репутация: 0 ±
Замечаний: 20% ±

Excel 2013
все прекрасно, прибавление десяток происходит, но прибавляет не 10, а почему то десятка складывается из введенного числа + 1,
т.е если ввести 5, то он выдает 65
 
Ответить
Сообщениевсе прекрасно, прибавление десяток происходит, но прибавляет не 10, а почему то десятка складывается из введенного числа + 1,
т.е если ввести 5, то он выдает 65

Автор - Serg73
Дата добавления - 09.04.2018 в 13:39
RAN Дата: Понедельник, 09.04.2018, 13:58 | Сообщение № 4
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4730
Репутация: 950 ±
Замечаний: 0% ±

2010
внес исправление


Быть или не быть, вот в чем загвоздка!
 
Ответить
Сообщениевнес исправление

Автор - RAN
Дата добавления - 09.04.2018 в 13:58
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Сложение значения и значения Textbox (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

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