Добрый день.
Имеется 2 рабочих места сос сканерами штрих кода. Один сканер записывает штрих коды в любой текстовый редактор и макрос запускается.
другой сканер работает иначе он ни как не пишет текст в редактор и поэтому не возможно определить событие что сканер сработал.
нашел готовый код, но он не подходит слишком много кнопок .
Как определить сработку сканера для запуска макроса.
Р.С. сканер перестроить ввод цыфр не удается хоть и с 1С сканер отлично работает.
Имеется 2 рабочих места сос сканерами штрих кода. Один сканер записывает штрих коды в любой текстовый редактор и макрос запускается.
другой сканер работает иначе он ни как не пишет текст в редактор и поэтому не возможно определить событие что сканер сработал.
нашел готовый код, но он не подходит слишком много кнопок .
Как определить сработку сканера для запуска макроса.
Р.С. сканер перестроить ввод цыфр не удается хоть и с 1С сканер отлично работает.
| Код |
|---|
Private Sub TextBox1_Change() If Not Len(TextBox1.Value) = 13 Then Label1.Caption = "Макрос НЕ сработает" Exit Sub End If Label1.Caption = "Макрос сработает" End Sub |
Изменено: - 12.10.2025 12:55:58
Не внимателен при вводе текста хорошо что есть F7
