Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1 2 3 4 5 6 След.
RSS
Генерация QR кодов в эксель
 
#1
24.11.2015 15:09:19
Здравствуйте, коллеги!
Нашёл на просторах инета код генератора штрихкодов для VBA. Меня интересует в нём генерация QR кодов.
Всё работает, но проблема в том, что корректно генерятся только латинские буквы и цифры, а русские буквы кодируются в виде "Óñêü" и т.д.
Я так понимаю, что алгоритм основан на ASCII таблице. Может нужно просто в каком-то месте какой-нибудь параметр поменять?
Помогите разобраться, если не сложно. Может кому данная тема будет интересна?
Спасибо.
Изменено: Ezoptron - 24.11.2015 15:09:55
 
 
 
#2
24.11.2015 16:05:05
ТЫЦ
 
 
 
#3
24.11.2015 16:44:58
а не подскажите как им пользоваться?
 
 
 
#4
24.11.2015 18:46:07
да вроде так же, как и в том варианте, который Вы в первом посте темы приложили.
Изменено: Ivan.kh - 24.11.2015 18:46:58
 
 
 
#5
25.11.2015 08:27:53
Ivan.kh, в данном файле, я так понимаю, идёт отсылка на сайт гугла, что не совсем подходит, т.к. необходим оффлайн инструмент...
 
 
 
#6
25.11.2015 11:21:28
а всетаки, как сгенерирорвать баркод на лист эксель используя файл топикстартера?
 
 
 
#7
25.11.2015 13:54:21
Ezoptron, Вы все правильно поняли. Просто в теме не было указанно, что необходим оффлайн инструмент...
Вот я и предложил.
 
 
 
#8
25.11.2015 16:46:14
Если учесть, что там половина кода вообще не на VBA, а на StarBasic, вызывает сомнение его работоспособность в Excel.
 
 
 
#9
26.11.2015 00:01:39
Есть нормальный activex
тынц
возникнут вопросы с реализацией пишите
 
 
 
#10
26.11.2015 09:39:40
B.Key,а можете выложить пример кода  выводящей  QR-код в ячейку?
 
 
 
#11
26.11.2015 10:01:02
Цитата
jfd написал: выложить пример
А контрол установили, зарегистрировали?
 
 
 
#12
26.11.2015 10:01:59
B.Key,да. это сделал
 
 
 
#13
26.11.2015 10:05:47
в ячейку не совсем то и получается, у меня он на форме генерируется.
 
 
 
#14
26.11.2015 10:09:10
на форме
 
 
 
#15
26.11.2015 10:29:48
B.Key, кажется чтото пошло не так

Если проигнорировать это предупреждение и запустить то пишет Error 13 Type Mismath
 
 
 
#16
26.11.2015 10:37:28
у меня все корректно
----------
вообще там есть сырцы и можно наваять свой activex , так же там есть и api документация к Zint.
Все в ваших руках.
Изменено: B.Key - 26.11.2015 10:41:40
 
 
 
#17
26.11.2015 17:28:56
Огромное спасибо. Довно искал вариант реализации QR в Excel.
У меня файл из B.Key #14работает. Контрол OcvitaBarcode.ocx  установил в C:\WINDOWS\system32 и  зарегистрировал regsvr32 OcvitaBarcode.ocx
Помогите пожалуйста вывести изображение QR не на форму, а на лист "QR" .
Заранее огромное спасибо.
 
 
 
#18
26.11.2015 17:55:06
здесь два варианта, либо не модальная форма, либо ручками сделать свою dll
 
 
 
#19
26.11.2015 18:15:46
B.Key спасибо за отзыв. Тоесть
Цитата
либо не модальная форма
чтобы не было формы?
Можно только рисунок QR, который генерируется от значения в ячейке С6
 
 
 
#20
26.11.2015 23:46:50
Может кто поможет наоборот сделать так, чтоб значение ячейки С6 выставлялось в форму в TextBox1.
Наверное на #19 решения нет :(
Спасибо заранее.
 
 
 
#21
27.11.2015 10:56:34
добавьте в модуль нужного листа
Код
Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Target.Address = [c6].Address Then
With UserForm1
If .Visible Then
     .OcvitaBarcode1.barcode = Target.Value
 Else
     .Show 0
     .OcvitaBarcode1.barcode = Target.Value
End If
End With
End If
End Sub
 
 
 
#22
27.11.2015 13:25:35
B.Key Огромное Вам спасибо.
Насколько я понял, QR код формируется только при условии если в ячейке E7 значение. Eсли в E7 результат работы формул - код не формируется.
Это возможно как-то исправить, чтобы код сформировался сE7 при условии, что так результат работы формул.
Огромное спасибо за помощь.
 
 
 
#23
27.11.2015 15:30:14
так?
 
 
 
#24
27.11.2015 21:25:24
B.Key Огромное спасибо. Супер.
 
 
 
#25
03.12.2015 15:30:05
Спасибо. Хорошая штуковина.
Как-то же можно скопировать изображение кода с формы на лист?
 
 
 
#26
03.12.2015 17:06:08
Цитата
Ezoptron написал: можно скопировать изображение кода с формы на лист
уже писал об этом
 
 
 
#27
29.01.2018 16:41:05
как мне этим скриптом в EXCEL вставить формулу, чтобы она конвертила значение в QR код?
без всяких кнопок, просто тупо как формула.
Изменено: ivaniger - 29.01.2018 16:51:13
 
 
 
#28
29.01.2018 16:46:22
Цитата
B.Key написал: на форме
вот что появляется после запуска этого файла
Цитата
Could not load an object

Цитата
Ivan.kh написал: ТЫЦ
ссылка не работает.
 
 
 
#29
06.02.2018 17:30:13
Цитата
B.Key написал:
уже писал об этом
B.Key! Может быть уже пришло время поделиться разгадкой - как вытащить QR код с формы на лист средствами VBA?
Ну очень надо!
Ни где нет. Одни намеки. Некуда чайнику податься. На гуру одна надежда.
Изменено: bvb46 - 06.02.2018 17:31:43
 
 
 
#30
13.09.2018 17:27:46
Цитата
Ivan.kh написал: Копия 555555.xlsm  (24.06 КБ)
Вот с этим вариантом проблема. Ну то есть он работает, но если строка содержит символ "&", то QR код шифрует строку только до этого символа. Т.е. если строка будет "123&123", в QR уйдет только "123".  Обойти это у меня не получается. Есть у кого-нибудь какие-нибудь мысли по этому поводу?
 
 
 
Страницы: 1 2 3 4 5 6 След.
Наверх