Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / блокировать сообщение / 15 сообщений из 15, страница 1 из 1
29.08.2010, 20:25
    #36817908
segail
segail
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
блокировать сообщение
Здравствуйте.
При выполнении кода кнопками выходит сообщение объектов TextBox3 или TextBox4.
Как игнорировать или блокировать данное сообщение?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.08.2010, 21:05
    #36817934
R Dmitry
R Dmitry
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
блокировать сообщение
просто закоментируйте строку поставьте '
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.08.2010, 21:14
    #36817942
segail
segail
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
блокировать сообщение
R Dmitryпросто закоментируйте строку поставьте '
При вводе данных вручную данное условие необходимо, а вот при вводе кнопкой данное условие не нужно.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.08.2010, 21:32
    #36817957
R Dmitry
R Dmitry
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
блокировать сообщение
10 минут подождете
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.08.2010, 21:33
    #36817959
segail
segail
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
блокировать сообщение
R Dmitry,
лады
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.08.2010, 21:38
    #36817964
R Dmitry
R Dmitry
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
блокировать сообщение
можно и так
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.08.2010, 21:42
    #36817969
R Dmitry
R Dmitry
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
блокировать сообщение
у вас там еще одна проблема если в текстбокс вводится текст будет ошибка
да и не бегайте по форумам
по excel лучший форум
http://www.planetaexcel.ru
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.08.2010, 21:48
    #36817972
R Dmitry
R Dmitry
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
блокировать сообщение
и не забывайте отписываться помогло не помогло, у Вас это займет1 минуту , а людям что Вам помогают - приятно!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.08.2010, 21:49
    #36817974
segail
segail
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
блокировать сообщение
R Dmitryу вас там еще одна проблема если в текстбокс вводится текст будет ошибка
да и не бегайте по форумам
по excel лучший форум
http://www.planetaexcel.ru
Да ошибка, на вашем примере...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.08.2010, 21:58
    #36817977
R Dmitry
R Dmitry
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
блокировать сообщение
числа вводиться целые будут или с запятой?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.08.2010, 22:08
    #36817991
segail
segail
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
блокировать сообщение
R Dmitry,
Ладно, оставлю как есть. Так как в примере я использую несколько пар значений, то и происходит сбой, а в проекте будет вводиться одна пара значений, вторую ввести нельзя будет, можно будет только удалить первую пару, и только после этого ввести вторую. При таком варианте сбоя нет.
Так что спасибо и благодарю за участие в двух форумах.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.08.2010, 22:08
    #36817992
R Dmitry
R Dmitry
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
блокировать сообщение
на всякий случай с запятой
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.08.2010, 22:15
    #36817998
segail
segail
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
блокировать сообщение
R Dmitryна всякий случай с запятой
Нет значения целые
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
Private Sub TextBox3_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
    If KeyAscii <  46  Or KeyAscii >  57  Then
       KeyAscii =  0 
    End If
End Sub
Private Sub TextBox4_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
    If KeyAscii <  46  Or KeyAscii >  57  Then
       KeyAscii =  0 
    End If
End Sub
А может приметь ваш код на всякий случай? Как Вы думаете?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.08.2010, 22:18
    #36817999
R Dmitry
R Dmitry
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
блокировать сообщение
лучше применить
Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If KeyAscii < 48 Or KeyAscii > 57 Then
KeyAscii = 0
End If
End Sub
тогда точка тоже не будет вводиться т.е. вместо 46 поставьте 48
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.08.2010, 22:20
    #36818000
segail
segail
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
блокировать сообщение
R Dmitry,
Извиняюсь для целого
KeyAscii < 48
Поспешил
Спасибо еще раз.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / блокировать сообщение / 15 сообщений из 15, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 461ms
Закрыть
start [/forum/topic.php?fid=61&tablet=1&tid=2177741]:
 0ms
get settings:
 7ms
get forum list:
 15ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 167ms
get topic data:
 9ms
get forum data:
 3ms
get page messages:
 48ms
get tp. blocked users:
 1ms
others: 207ms
total:  461ms
x
x
Закрыть


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