Skip to main content

Create QR Codes in Excel With VBA



Need to automate the creation of QR Codes? Excel and VBA can help with that! Here's how to do it in less than 15 lines of code.

What we're looking to do is have a URL in a cell and then we're going to use a function that we create in VBA call Google APIs to create the code. Here's a video that explains the whole process of creating a user defined function in VBA that will create QR Codes:


Code to create QR Codes in Excel with VBA

Open up your Visual Basic editor and insert the following code and then save. To call the function, type =GETQRCODES(Cell Address) where Cell Address is the address of the cell which contains a URL that you want to send your user to.

Function GETQRCODES(QRCode As String)
    Dim URL As String
    URL = "https://chart.googleapis.com/chart?chs=100x100&&cht=qr&chl=" & QRCode
    ActiveSheet.Pictures.Insert(URL).Select
    With Selection.ShapeRange(1)
        .Name = "QR_CODE_" & QRCode
        .Left = Application.Caller.Left + 2
        .Top = Application.Caller.Top + 2
    End With
    GETQRCODES = ""
End Function

Explanation Of What The Code Does

Here's what the code above does:

First, it constructs the URL for the QR code generation service. Then, it inserts the QR code image into the active sheet.
It sets the name of the picture to "QR_CODE_" followed by the URL that the QR code sends the user to.
Then, it positions the QR code image 2 units to the right and down from the calling cell.
Finally, it returns an empty string because the function doesn't need to return anything else.

Hope you find this useful and do follow us for more useful automation tips and tricks.

Comments

Popular posts from this blog

How to View YouTube Shorts in the Regular YouTube Player

YouTube's "Shorts" is YouTube’s answer to TikTok and Instagram reels but let’s be honest, the YouTube Shorts player lacks some functionality, such as the ability to fast forward and go back in the video. However, you might be surprised to know that every video that loads in the "Shorts" player is actually a regular video, and by changing the URL slightly, you can load the same video in the regular player along with all the functionality of a traditional YouTube video. Changing the URL Changing the URL is the easiest way to switch the player from a technical standpoint. It’s so easy even your grandma can do it, as long as she knows how to type an address into the address bar of a browser.   Let’s use this super popular short video about AI taking over ping pong as an example. Look in the URL bar of a video playing in the "Shorts" player, where you should see the text Shorts/. Replace that text with watch?v= and load the new URL. So in this

How To Change Bluetooth Name On Android

This post will take you step-by-step through the process of changing the Bluetooth name of your devices on an Android phone. There are pictures as references in case you get lost along the way. Change Bluetooth Name On Android | Step-by-step 1. Unlock your Android phone and go to Settings Unlock your phone and click on the Settings Icon It goes without saying, but the first thing you need to do is unlock your phone. By default, the settings icon will be on your home page like in the picture above. If you don't have the settings icon, you can search for 'Settings' in the Android search bar. 2. In the Settings page, click on Bluetooth Click on the Bluetooth settings to open up the Bluetooth Settings menu Click on the Bluetooth settings which should be at the top of your Settings page. If it doesn't, scroll down till you find it or just search for it in the search bar at the top of the Settings page. 3. Click On Device Name To Change Your Phone's Bluetooth Name Click o

Microsoft Project Oxford: Machines That Recognize Human Emotion

One of the things that separate humans from machines is that we're able to recognize and distinguish between different emotions when we interact with others. With advances in Artificial Intelligence (AI), Machine Learning and computing power in general, apps and programs are being created that are able to recognize speech, identify faces and now even distinguish between different emotions!