Código de barras (QRcode, DataMatrix, code 128, EAN, code 2 de 5, code 39) VBA puro

Estou compartilhando um arquivo do access que gera código de barras (QRcode, DataMatrix, code 128, EAN, code 2 de 5, code 39) com VBA puro, nativo, sem o uso de terceiros (OCX, dll).

Ainda está limitado a apresentar as imagens dos códigos apenas nos relatórios "na visualização de impressão" mas já é alguma coisa para quem não quer ficar preso à dll de terceiros.


Copiar e colar link diretamente no browser: dl.dropboxusercontent.com/u/771097/QRCode.zip

Olá Marcus Porfirio, Bem-Vindo ao fórum.
Obrigado pela partilha, excelente contribuição.
Abraço

Muito bom mesmo!!

Muito obrigado pela constribuíção.

Pena que o QRcode só de numeros, não dê para ler.

Muito bom

Muitooooo Bom! Parabéns.

Muito bom
Obrigado pelo compartilhamento. Já uso o Code39 há bastante tempo, mas agora precisava do QR Code e foi ótimo a publicação do Marcus.

Pena que o QRcode só de numeros, não dê para ler. escreveu:

Na verdade até dá para colocar números, tens é que colocar um espaço antes do numero, o que bem sei não é o ideal.

Pode ser que surja solução.

Manipulado dá concerteza, mas isso não é funcional.

Um espaço ou uma aspa simples no inicio funciona, só que dessa forma não é numero inteiro.

Sim JPaulo é verdade, neste caso foi a maneira que descobri para puder usar o QR Code.

Alguem teria ainda esse link funcionando?

Obrigado

Boa noite,

Segue link com o exemplo partilhado pelo amigo Marcus Porfirio:

Link: Código de barras (QRcode, DataMatrix, code 128, EAN, code 2 de 5, code 39) VBA

Sucesso

alguém sabe como fazer para aparecer os números do EAN-13? gera as barras mas normalmente precisa do número junto para digitação quando as barras estiver ilegíveis

Eloir, favor abrir um tópico nas salas de dúvidas e relacionar o exemplo em questão.

Nas salas de repositórios é proibido tirar dúvidas. Precisamos organizar a casa e manter estas salas apenas pra exemplos.

Veja as regras do fórum

REGRAS DO FÓRUM

1. Tenha paciência com quem coloca aqui as suas duvidas.
2. Clareza nos títulos dos tópicos e duvidas, evite a linguagem MSN.
3. Não colocar diversas vezes a mesma dúvida.
4. Explicar detalhadamente o problema e informar a versão do seu Office + Sistema Operativo.
5. Retorne sempre se deu certo, esse retorno é muito importante.
6. Respeite toda a equipe Staff e demais membros deste fórum.
7. Use sempre o botão Busca, sempre que tiver uma dúvida e antes de abrir tópicos.
8. Não usar palavras como "Urgente". O fórum é livre e ninguém é obrigado a responder com urgência.
9. A publicidade é proibida e só pode ser feita pelo Administrador ou depois de aprovada pelo Administrador.
10. Se o seu tópico não for respondido, tem o direito de fazer um Up ao final de 24horas!
11. A colocação de Códigos ou Exemplos, devem constar sempre os créditos de quem o elaborou.
12. Fale, não GRITE! Só letras Maiúsculas, na Internet é o mesmo que gritar!
13. É proibido tirar duvidas nas Salas de Repositório, devem abrir um novo tópico nas salas de duvidas, relacionando o Exemplo em causa.
14. É proibido adicionar links externos nos tópicos, que redirecionem para outros sites ("backlinks"), excepto DropBox ou do próprio fórum.
15. É permitido adicionar links externos, nos códigos VBA dentro das Base de Dados.

Olá Damasceno,

Blz, mas na verdade não é uma dúvida sim o exemplo postado que está faltando uma parte, pois todo o código de barras EAN apresenta a numeração e nunca só as barras!

Tentei ser polido possível para não ser entendido como crítica ao autor do post, mas tranquilo!

Muito bom mesmo o estudo, mas quando imprimi, o leitor não fez a leitura dos códigos de barras, tem que fazer mais alguma coisa para ler?

Proibido tirar dúvidas aqui. Veja a mensagem 14.

O link está quebrado. Poderia atualizar novamente o link?