Ugrás a tartalomra

QR-kód generálása Excelben (egyszerű útmutató a teljes módszerekkel)

Szerző: Siluvia Utolsó módosítás: 2024-05-14

A mai digitális korban a QR-kódok a gyors és hatékony információmegosztás elengedhetetlen eszközeivé váltak. Ez az útmutató a QR-kódok közvetlenül az Excelben történő létrehozásának különböző technikáit vizsgálja, függetlenül attól, hogy a legújabb Excel 365 vagy korábbi verziókat használja. A cikk végére jól felkészült lesz arra, hogy zökkenőmentesen integrálja a QR-kódokat Excel-projektjeibe.


QR-kódok generálása Excel 365-ben

Az Excel 365 olyan funkciókkal bővíti képességeit, mint IMAGE és a LAMBDA, amely lehetővé teszi a felhasználók számára, hogy dinamikusan generáljanak QR-kódokat. Ez a rész bemutatja, hogyan hozhat létre QR-kódokat az Excel 365 IMAGE vagy LAMBDA funkcióival.


Az IMAGE funkció használata

Ebben a példában az IMAGE funkciót fogjuk használni a következő webhelyekre mutató hivatkozásokat tartalmazó QR-kódok generálására.

  1. Jelöljön ki egy cellát, ahol meg szeretné jeleníteni a QR-kódot. Itt választok D3 a hivatkozást tartalmazó QR-kód megjelenítéséhez Extendoffice weboldal.
  2. Írja be a következő képletet, és nyomja meg a gombot belép hogy megkapja a QR-kódot.
    =IMAGE("https://quickchart.io/qr?text=" & ENCODEURL(C3))
  3. Jelölje ki ezt a képletcellát, majd kattintson duplán a cella jobb alsó sarkára (a zöld négyzetre) a többi QR-kód megjelenítéséhez.
Megjegyzések:
  • Kérjük, cserélje ki a képletben C3 a QR-kódba kódolni kívánt szöveget tartalmazó cella hivatkozással.
  • A QR-kód automatikusan frissül, ha a hivatkozott cella tartalma megváltozik.
  • Ez a képlet QR-kódok generálására is használható a Google Táblázatokban.
  • QuickChart.io egy egyszerű API-t biztosít QR-kódok generálásához. A QR-kódok generálásának alap URL-je a https://quickchart.io/qr?text=.

A LAMBDA funkció használata

Sok Excel-felhasználó számára kihívást jelenthet az összetett képletek emlékezése. Ebben a részben bemutatom, hogyan kell használni a LAMBDA funkció egyedi és újrafelhasználható funkció létrehozására a korábban említettek alapján IMAGE képlet. Ez lehetővé teszi, hogy a jövőben egy egyszerűbb, felhasználó által definiált funkcióval tudjon QR-kódokat generálni Excelben.

1. lépés: határozzon meg egy nevet a LAMBDA függvény segítségével
  1. Menj a képletek lapot és kattintson Definiálja a nevet a Meghatározott nevek csoport.
  2. A felbukkanóban Név szerkesztése párbeszédpanelen az alábbiak szerint kell konfigurálnia.
    1. A Név mezőben adjon nevet a LAMBDA képletnek. Itt nevezem el így fnGetQRCode.
    2. A Utal rá mezőbe írja be a következő képletet.
      =LAMBDA(text, IMAGE("https://quickchart.io/qr?text=" & ENCODEURL(text) & "&size=150"))
    3. Kattints OK a megadott név mentéséhez. Lásd a képernyőképet:
      Megjegyzések:
      • A képletben, 150 a QR-kód kép alapértelmezett pixelmérete. Ezt az értéket szükség szerint módosíthatja, de ne feledje, hogy az Excelben generált QR-kód tényleges megjelenítési méretét a cella mérete határozza meg.
      • Ha többet szeretne megtudni a LAMBDA funkcióról, látogasson el erre az oldalra: Excel LAMBDA függvény (365).
2. lépés: Alkalmazza a felhasználó által definiált funkciót a QR-kódok generálásához
  1. Jelöljön ki egy cellát, ahol meg szeretné jeleníteni a QR-kódot. Itt választok D3 a hivatkozást tartalmazó QR-kód megjelenítéséhez Extendoffice weboldal.
  2. Írja be a következő képletet, és nyomja meg a gombot belép hogy megkapja a QR-kódot.
    =fnGetQRCode(C3)
  3. Jelölje ki ezt a képletcellát, majd kattintson duplán a cella jobb alsó sarkára (a zöld négyzetre) a többi QR-kód megjelenítéséhez.
    Megjegyzések:
    • A képletben:
      • fnGetQRCode az 1. lépésben megadott név.
      • Kérjük, cserélje ki C3 a QR-kódba kódolni kívánt szöveget tartalmazó cella hivatkozással.
    • A QR-kód automatikusan frissül, ha a hivatkozott cella tartalma megváltozik.

QR-kódok generálása az Excel összes verziójában

Az Excel 365-höz nem férő felhasználók továbbra is megbízható lehetőségeket kínálnak QR-kódok generálására bővítményeken és külső eszközökön keresztül, így ez a funkció az Excel összes verziójában elérhető.


Az Excel beépített bővítményeinek használata QR-kódok egyenkénti generálásához

Excel bővítmények, mint pl QR4Office robusztus alternatívát kínál, amely az Excel több verziójával is kompatibilis. Ez a módszer lehetővé teszi a QR-kódok részletes testreszabását, és ideális azoknak a felhasználóknak, akiknek szórványosan kell kódokat generálniuk a dokumentumaikban.

1. lépés: Telepítse a QR4Office bővítményt
  1. Ugrás betétlap > Bővítmények beszerzése.
    Megjegyzések: Ha nem látja a Bővítmények beszerzése alatti parancsot betétlap fülön a szalagon, akkor manuálisan kell hozzáadnia. Az alábbiakban bemutatjuk a parancs hozzáadásának lépéseit a Gyorselérési eszköztár:
    1. Kattintson az A Gyorselérés eszköztár testreszabása legördülő menü nyíl és válassza a lehetőséget További parancsok a menüből.
    2. A Word beállításai ablak:
      1. választ A szalagon nem található parancsok tól Válassza ki a parancsot legördülő listából.
      2. Keresse meg és válassza ki Bővítmények beszerzése a bal oldali parancslistában.
      3. Kattintson az hozzáad gomb (a Bővítmények beszerzése parancs a jobb oldali ablaktáblába kerül).
      4. Kattints OK a változtatások mentéséhez. Lásd a képernyőképet:
    3. A Bővítmények beszerzése parancs most hozzáadásra került a Gyorselérési eszköztár. Kattintson rá a megnyitásához Office-bővítmények tárolni.
  2. A Office-bővítmények bolt:
    1. Típus "QR4Office" a keresőmezőben, és nyomja meg a gombot belép.
    2. Miután a QR4Office bővítmény jelenik meg, kattintson a hozzáad gombot a telepítéshez.
  3. A következő prompt mezőben kattintson a gombra folytatódik.
2. lépés: Használja a QR4Office bővítményt a QR-kód létrehozásához

A telepítés után a QR4Office ablaktábla automatikusan megnyílik a munkafüzet jobb oldalán, lehetővé téve a QR-kód létrehozását az alábbiak szerint.

  1. Válassza ki a QR-kódba kódolni kívánt szöveget vagy hivatkozást tartalmazó cellát.
    Ebben az esetben csatoljon egy hivatkozást a Extendoffice weboldalt, kiválasztom a cellát C3 tartalmazza az URL-t.
  2. Kattintson az Az aktuális dokumentum kijelölés másolása gombot a cellatartalom átviteléhez a QR4Office mezőkbe.
    típus: Alternatív megoldásként kiválaszthatja az URL vagy a szöveg típusát a legördülő listából, és manuálisan beírhatja a szükséges információkat a szövegmezőbe.
  3. A Opciók részben testreszabhatja a QR-kód megjelenését a szín, a háttér és a méret kiválasztásával, vagy megtarthatja az alapértelmezett beállításokat.
  4. Válassza ki a QR-kód célcelláját. Itt választok D3.
  5. Kattints betétlap hogy a QR-kódot a kiválasztott cellába helyezze. Lásd a képernyőképet:
  6. Ismételje meg a fenti 5 lépést további QR-kódok generálásához.

A Kutools for Excel használata QR-kódok tömeges generálására

Szintén egy kiegészítő, Kutools az Excel számára határozott előnyt kínál a QR4Office-hoz képest, mivel képes a QR-kódok kötegelt generálására egy kiválasztott tartományban. A Helyezze be a QR-kódot jellemzője Kutools az Excel számára különösen értékes azoknak a felhasználóknak, akiknek több QR-kódot kell hatékonyan létrehozniuk. Automatizálja a folyamatot több cellában, időt takarít meg és minimalizálja a kézi beviteli hibákat.

Után a Kutools for Excel telepítése, lépjen a kiválasztáshoz Kutools > betétlap > Helyezze be a QR-kódot megnyitni Helyezze be a QR-kódot ablaktáblát, akkor tömegesen generálhat QR-kódokat az alábbiak szerint:

  1. A Adattartomány mezőben válassza ki a QR-kódba kódolni kívánt szöveget vagy hivatkozást tartalmazó cellák tartományát.
  2. A Tartomány beillesztése mezőben válasszon ki egy cellatartományt a megfelelő QR-kódok elhelyezéséhez.
  3. A Opciók részben testreszabhatja a QR-kód megjelenését a méret, a vonalszín stb. megadásával, vagy megtarthatja az alapértelmezett beállításokat.
  4. Kattintson az Generálása gombot, hogy egyidejűleg generáljon QR-kódot az összes kiválasztott cellához.
Megjegyzések: A funkció használata előtt győződjön meg arról, hogy a Kutools for Excel telepítve van. Tölts le most egy 30 napos ingyenes próbaverziót a Kutools for Excel teljes funkciójával!

A QR-kódok Excelben történő előállítása egyszerű, akár az Excel 365 fejlett képességeit használja, akár az összes verzióhoz elérhető bővítményeket használja. Az ebben az útmutatóban ismertetett lépések követésével hatékonyan integrálhatja a QR-kódokat Excel-lapjaiba, javítva az adatok interaktivitását és hozzáférhetőségét. Fedezze fel ezeket a módszereket, hogy megtalálja az Ön igényeinek leginkább megfelelőt, és új és innovatív módon egyszerűsítse munkafolyamatait. Azok számára, akik szeretnének mélyebbre ásni az Excel képességeit, weboldalunk rengeteg oktatóanyagot kínál. Itt találhat további Excel tippeket és trükköket.

A legjobb irodai hatékonyságnövelő eszközök

🤖 Kutools AI Aide: Forradalmasítsa az adatelemzést a következők alapján: Intelligens végrehajtás   |  Kód létrehozása  |  Hozzon létre egyéni képleteket  |  Adatok elemzése és diagramok létrehozása  |  A Kutools funkciók meghívása...
Népszerű szolgáltatások: Ismétlődések keresése, kiemelése vagy azonosítása   |  Üres sorok törlése   |  Oszlopok vagy cellák kombinálása adatvesztés nélkül   |   Kerek Formula nélkül ...
Szuper keresés: Több kritérium VLookup    Többértékű VLookup  |   VLookup több munkalapon   |   Fuzzy Lookup ....
Speciális legördülő lista: Gyors legördülő lista létrehozása   |  Függő legördülő lista   |  Többszörösen válassza ki a legördülő listát ....
Oszlopkezelő: Adjon meg egy adott számú oszlopot  |  Oszlopok mozgatása  |  Kapcsolja be a Rejtett oszlopok láthatósági állapotát  |  Tartományok és oszlopok összehasonlítása ...
Kiemelt funkciók: Rács fókusz   |  Design nézet   |   Nagy Formula bár    Munkafüzet és lapkezelő   |  Erőforrás-könyvtár (Auto szöveg)   |  Dátumválasztó   |  Kombinálja a munkalapokat   |  Cellák titkosítása/dekódolása    E-mailek küldése listánként   |  Szuper szűrő   |   Speciális szűrő (félkövér/dőlt/áthúzott szűrés...) ...
A 15 legjobb eszközkészlet12 szöveg Eszközök (Szöveg hozzáadása, Karakterek eltávolítása,...)   |   50 + Táblázatos Típusai (Gantt-diagram,...)   |   40+ Praktikus képletek (Számolja ki az életkort a születésnap alapján,...)   |   19 beszúrás Eszközök (Helyezze be a QR-kódot, Kép beszúrása az útvonalból,...)   |   12 Átalakítás Eszközök (Számok szavakig, Valuta átváltás,...)   |   7 Egyesítés és felosztás Eszközök (Haladó kombinált sorok, Hasított sejtek,...)   |   ... és több

Töltsd fel Excel-készségeidet a Kutools for Excel segítségével, és tapasztald meg a még soha nem látott hatékonyságot. A Kutools for Excel több mint 300 speciális funkciót kínál a termelékenység fokozásához és az időmegtakarításhoz.  Kattintson ide, hogy megszerezze a leginkább szükséges funkciót...

Leírás


Az Office lap füles felületet hoz az Office-ba, és sokkal könnyebbé teszi a munkáját

  • Füles szerkesztés és olvasás engedélyezése Wordben, Excelben és PowerPointban, Publisher, Access, Visio és Project.
  • Több dokumentum megnyitása és létrehozása ugyanazon ablak új lapjain, mint új ablakokban.
  • 50% -kal növeli a termelékenységet, és naponta több száz kattintással csökkenti az egér kattintását!
Comments (38)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Is it possible to make a payment qr code in excel?
f.e. In cell A1 I've an amout of 10 euro, and in cell B2 I want to have an qr code so anyone can pay me with the qr code?

Thanks.
This comment was minimized by the moderator on the site
Hi Ruben,

Thank you for reaching out with your question. While Kutools for Excel does feature QR code generation, creating a payment QR code directly in Excel for transactional purposes is beyond the scope of this feature. Payment QR codes usually require integration with financial services or payment platforms to ensure secure transactions. I recommend exploring services specifically designed for creating payment QR codes, such as those offered by banks or digital payment systems. These platforms can generate a QR code linked to your payment details securely. Once you have the payment QR code, you could then include it in your Excel document as an image.
This comment was minimized by the moderator on the site
Hello

The download link provided in step 4 appears to be only Microsoft Barcode Control 14.0. Can anyone suggest a correct link for 16.0 please?

Thank you.
This comment was minimized by the moderator on the site
1 Sheets waar in de cellen van de rij random QR codes binnen komen. Waarvan elke QR code automatisch de juiste Sheets openend?
Of de BVA commando codes van de Button om de koppeling maken naar een andere sheets.
Dan ben erg dankbaar voor.
(dit is voor vrijwilligerswerk)

Groetjes,
H. van Schaijk
This comment was minimized by the moderator on the site
Hi H. van Schaijk,
I can't fix this problem. Sorry about that.
This comment was minimized by the moderator on the site
Hi folks,
Below code works fine with me, which is linked to cell range & generates the QR at each row cell 5000 nos, however I would like to stop the QR object generation if the reference cell value is zero / otherway round should generate the QR at adjucent cell if the value at reference cell is more than zero or <>""

Please seek experts assistance!!

thank you in advance

Sub Gen_StockOut_QR()
MsgBox ("Will Generate QR Code for Stock_Out Items at In@Out Sheet")
Sheets("In@Out_Data").Select
ActiveSheet.Unprotect Password:=" "
'Column range set at QR_Code
Range("QR_Code").Select

For Each cell In Selection
'cell.Offset(0, 23).Select ' 1 indicates the position of excel column A1 from the formula/webaddress/site/characters to be used to generate QR code
cell.Offset(0, 0).Select

' My case QRCode is at column 24 hence 24 as column from A1, QR Size 100*100
FilePath = "http://chart.googleapis.com/chart?chs=100x100&&cht=qr&chl=" & WorksheetFunction.EncodeURL(cell.Value) ' here is the cell value

With ActiveSheet.Pictures.Insert(FilePath)
'.ShapeRange.ScaleWidth 0.95, msoFalse, msoScaleFromTopLeft
'.ShapeRange.ScaleHeight 0.95, msoFalse, msoScaleFromTopLeft

End With
Next cell
End Sub
This comment was minimized by the moderator on the site
Interesting article - thank you.  How do I remove the custom control from the list please?
This comment was minimized by the moderator on the site
Hi,Do you mean to remove the Form Control inserted in the VBA code method? If so, you just need to right click it (when there is a context menu listed, click anywhere outside it to hide the context menu), and then press Delete to remove it.
This comment was minimized by the moderator on the site
Olá! Para mim, nenhum dos comentários ou esse post funcionou corretamente, mas utilizando o Visual Basic com o código que deixarei abaixo funcionou, pois criou uma função para mim. E para usar a função é só abrir a planilha e digitar: "=QrCode("célula desejada")"




Function QrCode(codetext As String)
Dim URL As String, MyCell As Range
'Para gerar o código, precisa a máquina ter acesso a internet
Set MyCell = Application.Caller
URL = "https://chart.googleapis.com/chart?chs=150x150&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
This comment was minimized by the moderator on the site
Wie lösche ich die QR Code Grafik wieder ? wenn ich mit den Skript Wie erstelle ich einen QR-Code basierend auf dem Zellenwert in Excel? einen QR Code erzeugt habe ?
This comment was minimized by the moderator on the site
Hi All,

I modified the VBA code for creation a multi QR codes from selection in excel column

Follow until step 10 then add this code

Sub setQR()

Dim xSRg As Range
Dim xRRg As Range
Dim xObjOLE As OLEObject
On Error Resume Next
Dim srcSelection As Range
Dim srcCell As String
For Each srcSelection In Application.Selection
Dim qrCelltoupdate As String
Dim qrTxt As String
qrCelltoupdate = srcSelection.Offset(0, 1).Address
qrTxt = srcSelection.Text
Worksheets("Sheet1").Range(qrCelltoupdate).Select
Application.ScreenUpdating = False
Set xObjOLE = ActiveSheet.OLEObjects.Add("BARCODE.BarCodeCtrl.1")
xObjOLE.Object.Style = 11
xObjOLE.Object.Value = qrTxt
ActiveSheet.Shapes.Item(xObjOLE.Name).Copy
ActiveSheet.Paste
xObjOLE.Delete
Next srcSelection
'Create Qr code from selection multi cells
End Sub


In step 12
Assign Macro
Chose: Sheet1.setQR

QR codes will be populated in next column

Hope that helps for you all
This comment was minimized by the moderator on the site
Hi ChavdarHarchev.
First of all thank You very much for Your nice work.

Is it possible for You to show how the VBA code looks like when it is finished?
Best regards
Pierre Galuszka.
This comment was minimized by the moderator on the site
Hi All,
I modified the VBA code for creation a multi QR codes from selection in excel column
Follow until step 10 then add this code
Sub setQR()

Dim xSRg As Range
Dim xRRg As Range
Dim xObjOLE As OLEObject
On Error Resume Next
Dim srcSelection As Range
Dim srcCell As String
For Each srcSelection In Application.Selection
Dim qrCelltoupdate As String
Dim qrTxt As String
qrCelltoupdate = srcSelection.Offset(0, 1).Address
qrTxt = srcSelection.Text
Worksheets("Sheet1").Range(qrCelltoupdate).Select
Application.ScreenUpdating = False
Set xObjOLE = ActiveSheet.OLEObjects.Add("BARCODE.BarCodeCtrl.1")
xObjOLE.Object.Style = 11
xObjOLE.Object.Value = qrTxt
ActiveSheet.Shapes.Item(xObjOLE.Name).Copy
ActiveSheet.Paste
xObjOLE.Delete
Next srcSelection
'Create Qr code from selection multi cells
End Sub


In step 12 Assign Macro Chose: Sheet1.setQR
QR codes will be populated in next column
Hope that helps for you all
This comment was minimized by the moderator on the site
I didn't have "Microsoft Barcode Control 16.0" so I down loaded per instruction. And open Excel with Admin mode. Then try to "Register Custom" . But I opened Barcode control folder and select MSBCODE964,OCX. Then there is error message came out. It said "The selected file does not contain self-registrating ActiveX control". What it means? What is the problem. And how can I install that?
This comment was minimized by the moderator on the site
1)Click File > Options.

2)Click Trust Center > Trust Center Settings > ActiveX Settings.

Click the options below, and then click OK.
* Enable all controls without restrictions and without prompting (not recommended)
3)Click Ok
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations