Você sabia que é possível criar QR Code no Excel? Com a ajuda do famoso editor de planilhas você pode ter os seus próprios códigos QR em poucos cliques.
Neste conteúdo, a Max Planilhas vai explicar em dois métodos simples e objetivos, tudo o que você precisa fazer para criar um ou mais códigos QR Code.
Não acredita que isso seja possível? Não se engane, o Excel é incrível! Continue conosco e confira o passo a passo!
Como criar QR Code no Excel com suplemento
Para criar um QR Code no Excel, a primeira coisa a ser feita é instalar o suplemento QR4Office.
Siga o passo a passo abaixo e entenda todos os detalhes, desde a instalação do suplemento até a criação do código.
1.Instalando o Suplemento QR4Office
Clique em “Inserir” e logo na sequência em “Obter suplementos”
Logo na sequência, na loja de suplementos do Excel, localize e instale o QR4Office.
2.Insira a URL para criar o QR Code
Após a instalação do QR4Office, uma janela conforme a apresentada abaixo se abrirá. Informe o link do site para qual você deseja gerar o QR Code.
3.Gere o QR Code
Finalize, clicando em Insert para gerar o QR Code, conforme resultado da imagem abaixo:
Como criar QR Code no Excel com através do Visual Basic
Se preferir, você também pode criar um QR Code com a ajuda do Visual Basic. Veja no passo a passo abaixo, como funciona neste caso.
1.Ativando a aba desenvolvedor do Excel
Para ativar a área de desenvolvedor do Excel, clique em “Arquivo”, na parte superior do Excel, e logo depois em “Opções”.
Uma janela conforme a que está sendo apresentada na imagem abaixo, será aberta. Clique em “Personalizar Faixa de Opções” e marque a caixa “Desenvolvedor”.
Para confirmar, clique em “OK”
2.Abra o Visual Basic
Voltando para a página inicial do Excel, observe que agora temos a aba Desenvolvedor, clique nela, e logo em seguida em “Visual Basic”.
Se preferir, você também pode usar o atalho ALT + F11.
Uma nova tela se abrirá, clique em “Inserir Módulo”, conforme detalhado na imagem abaixo:
Agora, cole o seguinte código na tela que se abrirá:
Function QrCode(codetext As String)
Dim URL As String, MyCell As Range
Set MyCell = Application.Caller
URL = “https://chart.googleapis.com/chart?chs=150×150&cht=qr&chl=” & codetext
On Error Resume Next
ActiveSheet.Pictures(“QR_” & MyCell.Address(False, False)).Delete
On Error GoTo 0
ActiveSheet.Pictures.Insert(URL).Select
With Selection.ShapeRange(1)
.PictureFormat.CropLeft = 15
.PictureFormat.CropRight = 15
.PictureFormat.CropTop = 15
.PictureFormat.CropBottom = 15
.Name = “QR_” & MyCell.Address(False, False)
.Left = MyCell.Left + 2
.Top = MyCell.Top + 2
End With
QrCode = “”
End Function
3.Utilize a função QR Code
Após inserir o código de comando do passo anterior, feche o visual Basic e digite em qualquer célula do Excel, a função: “=QrCode”
Observe que agora temos uma nova função no Excel. Sendo assim, basta digitar uma URL para gerar o QR Code, conforme imagem abaixo:
Aponte seu celular para a imagem e faça o teste:
Incrível, não é mesmo? Você acaba de aprender a criar seu próprio QR Code com a ajuda do Excel!
Gostou dessa super dica? Se a sua resposta foi “Sim”, aproveite para fazer sua inscrição em nosso canal no YouTube, conferir as dicas que publicamos por lá e aprender ainda mais sobre o Excel.