Loncat ke daftar isi utama

Menghasilkan kode QR di Excel (panduan mudah dengan metode lengkap)

Penulis: Siluvia Terakhir Dimodifikasi: 2024-05-14

Di era digital saat ini, kode QR telah menjadi alat penting untuk berbagi informasi dengan cepat dan efisien. Panduan ini mengeksplorasi berbagai teknik untuk membuat kode QR langsung di dalam Excel, baik Anda menggunakan Excel 365 terbaru atau versi yang lebih lama. Di akhir artikel ini, Anda akan diperlengkapi dengan baik untuk mengintegrasikan kode QR ke dalam proyek Excel Anda dengan lancar.

Menghasilkan kode QR di Excel 365

Excel 365 meningkatkan kemampuannya dengan fungsi seperti IMAGE dan lAMBDA, memungkinkan pengguna membuat kode QR secara dinamis. Bagian ini akan memperlihatkan kepada Anda cara membuat kode QR menggunakan fungsi IMAGE atau LAMBDA di Excel 365.

Menggunakan fungsi GAMBAR

Dalam contoh ini, kita akan menggunakan fungsi IMAGE untuk menghasilkan kode QR yang berisi tautan ke situs web berikut.

  1. Pilih sel tempat Anda ingin kode QR muncul. Di sini saya pilih D3 untuk menampilkan kode QR yang berisi tautan ke Extendoffice website.
  2. Masukkan rumus berikut dan tekan Enter untuk mendapatkan kode QR. 
    =IMAGE("https://quickchart.io/qr?text=" & ENCODEURL(C3))
  3. Pilih sel rumus ini, klik dua kali sudut kanan bawah (kotak hijau) sel untuk mendapatkan kode QR lainnya.
Note:
  • Di rumusnya silahkan ganti C3 dengan referensi sel yang berisi teks yang ingin Anda kodekan dalam kode QR.
  • Kode QR akan diperbarui secara otomatis jika konten di sel yang direferensikan berubah.
  • Rumus ini juga dapat digunakan untuk menghasilkan kode QR di Google Sheets.
  • QuickChart.io menyediakan API sederhana untuk menghasilkan kode QR. URL dasar untuk menghasilkan kode QR adalah https://quickchart.io/qr?text=.

Menggunakan fungsi LAMBDA

Bagi banyak pengguna Excel, mengingat rumus yang rumit bisa menjadi tantangan. Di bagian ini, saya akan menunjukkan cara memanfaatkan Fungsi LAMBDA untuk membuat fungsi khusus dan dapat digunakan kembali berdasarkan yang disebutkan sebelumnya rumus GAMBAR. Ini akan memungkinkan Anda menggunakan fungsi yang lebih sederhana dan ditentukan pengguna untuk menghasilkan kode QR di Excel di masa mendatang.

Langkah 1: tentukan nama menggunakan fungsi LAMBDA
  1. Pergi ke Rumus tab dan klik Tentukan Nama dalam Nama yang Ditentukan kelompok.
  2. Dalam bermunculan Edit Nama kotak dialog, Anda perlu mengkonfigurasi sebagai berikut.
    1. Dalam majalah Nama kotak, beri nama pada rumus LAMBDA. Di sini saya menamakannya sebagai fnGetQRCode.
    2. Dalam majalah Mengacu pada kotak, masukkan rumus berikut. 
      =LAMBDA(text, IMAGE("https://quickchart.io/qr?text=" & ENCODEURL(text) & "&size=150"))
    3. Klik OK untuk menyimpan nama yang ditentukan. Lihat tangkapan layar:
      Catatan:
      • Dalam formula tersebut, 150 adalah ukuran piksel default untuk gambar kode QR. Anda dapat menyesuaikan nilai ini sesuai kebutuhan, namun ingat bahwa ukuran tampilan sebenarnya dari kode QR yang dihasilkan di Excel akan ditentukan oleh ukuran sel.
      • Untuk mengetahui lebih lanjut tentang fungsi LAMBDA, kunjungi halaman ini: Fungsi LAMBDA Excel (365).
Langkah 2: Terapkan fungsi yang ditentukan pengguna untuk menghasilkan kode QR
  1. Pilih sel tempat Anda ingin kode QR muncul. Di sini saya pilih D3 untuk menampilkan kode QR yang berisi tautan ke Extendoffice website.
  2. Masukkan rumus berikut dan tekan Enter untuk mendapatkan kode QR. 
    =fnGetQRCode(C3)
  3. Pilih sel rumus ini, klik dua kali sudut kanan bawah (kotak hijau) sel untuk mendapatkan kode QR lainnya.
    Catatan:
    • Dalam rumus:
      • fnGetQRCode adalah nama yang Anda tetapkan di langkah 1.
      • Silakan ganti C3 dengan referensi sel yang berisi teks yang ingin Anda kodekan dalam kode QR.
    • Kode QR akan diperbarui secara otomatis jika konten di sel yang direferensikan berubah.

Menghasilkan kode QR di semua versi Excel

Untuk pengguna tanpa akses ke Excel 365, masih ada opsi yang dapat diandalkan untuk menghasilkan kode QR melalui add-in dan alat eksternal, sehingga fungsi ini dapat diakses di semua versi Excel.

Menggunakan Add-in Bawaan Excel untuk menghasilkan kode QR satu per satu

Add-in Excel seperti Kantor QR4 memberikan alternatif tangguh yang kompatibel di beberapa versi Excel. Metode ini memungkinkan penyesuaian kode QR secara mendetail dan ideal bagi pengguna yang perlu membuat kode secara sporadis dalam dokumen mereka.

Langkah 1: Instal add-in QR4Office
  1. Pergi ke Menyisipkan > Dapatkan Add-in.
    Note: Jika Anda tidak melihat Dapatkan Add-in perintah di bawah Menyisipkan tab di pita, Anda perlu menambahkannya secara manual. Berikut adalah langkah-langkah untuk menambahkan perintah ini ke Quick Access Toolbar:
    1. klik Sesuaikan Bilah Alat Akses Cepat panah tarik-turun dan pilih Lebih Banyak Perintah dari menu.
    2. Dalam majalah Word Options window:
      1. Pilih Perintah Tidak di Pita dari Pilih perintah dari daftar drop-down
      2. Temukan dan pilih Dapatkan Add-in di daftar perintah kiri.
      3. klik Add tombol ( Dapatkan Add-in perintah akan ditambahkan ke panel kanan).
      4. Klik OK untuk menyimpan perubahan. Lihat tangkapan layar:
    3. Grafik Dapatkan Add-in perintah sekarang ditambahkan ke Quick Access Toolbar. Anda dapat mengkliknya untuk membuka Add-in Office menyimpan.
  2. Dalam majalah Add-in Office toko:
    1. Ketik "Kantor QR4" di kotak pencarian dan tekan Enter.
    2. Setelah Kantor QR4 add-in muncul, klik Add tombol untuk menginstalnya.
  3. Di kotak prompt berikut, klik Continue.
Langkah 2: Gunakan add-in QR4Office untuk menghasilkan kode QR

Setelah diinstal, Kantor QR4 Panel akan terbuka secara otomatis di sisi kanan buku kerja Anda, memungkinkan Anda menghasilkan kode QR sebagai berikut.

  1. Pilih sel yang berisi teks atau tautan yang ingin Anda kodekan dalam kode QR.
    Dalam hal ini, untuk menyertakan tautan ke Extendoffice situs web, saya pilih sel C3 berisi URL.
  2. klik Salin pilihan dokumen saat ini tombol untuk mentransfer konten sel ke bidang QR4Office.
    jenis: Alternatifnya, Anda dapat memilih URL atau Jenis teks dari daftar drop-down dan secara manual memasukkan informasi yang diperlukan ke dalam kotak teks.
  3. Dalam majalah Opsi bagian, Anda dapat menyesuaikan tampilan kode QR secara opsional dengan memilih warna, latar belakang, dan ukuran, atau mempertahankan pengaturan default.
  4. Pilih sel tujuan untuk kode QR. Di sini saya pilih D3.
  5. Klik Menyisipkan untuk menempatkan kode QR ke dalam sel yang dipilih. Lihat tangkapan layar:
  6. Ulangi 5 langkah di atas untuk menghasilkan kode QR lainnya.

Menggunakan Kutools for Excel untuk menghasilkan kode QR secara massal

Juga merupakan tambahan, Kutools untuk Excel menawarkan keunggulan berbeda dibandingkan QR4Office dengan kemampuannya menghasilkan kode QR secara batch di rentang yang dipilih. Itu Masukkan Kode QR fitur dari Kutools untuk Excel sangat berharga bagi pengguna yang perlu membuat beberapa kode QR secara efisien. Ini mengotomatiskan proses di beberapa sel, menghemat waktu dan meminimalkan kesalahan input manual.

Setelah menginstal Kutools untuk Excel, pergi untuk memilih Kutools > Menyisipkan > Masukkan Kode QR untuk membuka Masukkan Kode QR panel, lalu Anda dapat membuat kode QR secara massal sebagai berikut:

  1. Dalam majalah Rentang Data bidang, pilih rentang sel yang berisi teks atau tautan yang ingin Anda kodekan dalam kode QR.
  2. Dalam majalah Sisipkan Rentang bidang, pilih rentang sel untuk menempatkan kode QR yang sesuai.
  3. Dalam majalah Opsi di bagian ini, Anda dapat menyesuaikan tampilan kode QR dengan menentukan ukuran, warna garis, dll., atau mempertahankan pengaturan default.
  4. klik Menghasilkan tombol untuk menghasilkan kode QR untuk semua sel yang dipilih secara bersamaan.
Note: Sebelum menggunakan fitur ini, pastikan Kutools for Excel sudah diinstal. Unduh uji coba gratis 30 hari dengan fitur lengkap Kutools for Excel sekarang!

Membuat kode QR di Excel sangatlah mudah, baik Anda menggunakan kemampuan lanjutan Excel 365 atau mengandalkan add-in yang tersedia untuk semua versi. Dengan mengikuti langkah-langkah yang diuraikan dalam panduan ini, Anda dapat mengintegrasikan kode QR ke dalam lembar Excel Anda secara efisien, sehingga meningkatkan interaktivitas dan aksesibilitas data Anda. Jelajahi metode ini untuk menemukan metode yang paling sesuai dengan kebutuhan Anda dan sederhanakan alur kerja Anda dengan cara baru dan inovatif. Bagi mereka yang ingin mempelajari lebih dalam kemampuan Excel, situs web kami menawarkan banyak tutorial. Temukan tips dan trik Excel lainnya di sini.

Alat Produktivitas Kantor Terbaik

🤖 Kutools AI Ajudan: Merevolusi analisis data berdasarkan: Eksekusi Cerdas   |  Hasilkan Kode  |  Buat Rumus Khusus  |  Analisis Data dan Hasilkan Grafik  |  Aktifkan Fungsi Kutools...
Fitur Populer: Temukan, Sorot, atau Identifikasi Duplikat   |  Hapus Baris Kosong   |  Gabungkan Kolom atau Sel tanpa Kehilangan Data   |   Putaran tanpa Formula ...
Pencarian Super: VLookup Beberapa Kriteria  |   VLookup Nilai Berganda  |   VLookup di Beberapa Lembar   |   Pencarian Fuzzy ....
Daftar Drop-down Lanjutan: Buat Daftar Drop Down dengan Cepat   |  Daftar Drop Down yang Bergantung   |  Multi-pilih Drop Down List ....
Manajer Kolom: Tambahkan Jumlah Kolom Tertentu  |  Pindahkan Kolom  |  Alihkan Status Visibilitas Kolom Tersembunyi  |  Bandingkan Rentang & Kolom ...
Fitur Unggulan: Fokus Kisi   |  Tampilan Desain   |   Bar Formula Besar   |  Manajer Buku Kerja & Lembar   |  Perpustakaan Sumberdaya (Teks otomatis)   |  Pemetik tanggal   |  Gabungkan Lembar Kerja   |  Enkripsi/Dekripsi Sel   |  Kirim Email berdasarkan Daftar   |  Filter Super   |   Filter Khusus (filter tebal/miring/coret...) ...
15 Perangkat Teratas:  12 Teks Tools (Tambahkan Teks, Hapus Karakter, ...)   |   50 + Grafik jenis (Gantt Chart, ...)   |   40+ Praktis Rumus (Hitung usia berdasarkan ulang tahun, ...)   |   19 Insersi Tools (Masukkan Kode QR, Sisipkan Gambar dari Jalur, ...)   |   12 Konversi Tools (Angka ke Kata, Konversi Mata Uang, ...)   |   7 Gabungkan & Pisahkan Tools (Lanjutan Gabungkan Baris, Pisahkan Sel, ...)   |   ... dan banyak lagi

Tingkatkan Keterampilan Excel Anda dengan Kutools for Excel, dan Rasakan Efisiensi yang Belum Pernah Ada Sebelumnya. Kutools for Excel Menawarkan Lebih dari 300 Fitur Lanjutan untuk Meningkatkan Produktivitas dan Menghemat Waktu.  Klik Di Sini untuk Mendapatkan Fitur yang Paling Anda Butuhkan...

Deskripsi Produk

Tab Office Membawa antarmuka Tab ke Office, dan Membuat Pekerjaan Anda Jauh Lebih Mudah

  • Aktifkan pengeditan dan pembacaan tab di Word, Excel, PowerPoint, Publisher, Access, Visio, dan Project.
  • Buka dan buat banyak dokumen di tab baru di jendela yang sama, bukan di jendela baru.
  • Meningkatkan produktivitas Anda sebesar 50%, dan mengurangi ratusan klik mouse untuk Anda setiap hari!
Comments (38)
No ratings yet. Be the first to rate!
Ruben
Ruben
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.
Reply
0
0
crystal
crystal     Ruben
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.
Reply
Report
0
0
Siri
Siri
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.
Reply
0
0
H. van Schaijk
H. van Schaijk
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
Reply
0
0
crystal
crystal     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.
Reply
Report
0
0
Rajendra Narayan Panshikar
Rajendra Narayan Panshikar
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
Reply
0
0
mcscouse
mcscouse
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?
Reply
Report
0
0
crystal
crystal     mcscouse
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.
Reply
Report
0
0
Lucas Roberto
Lucas Roberto
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
Reply
0
0
Jörg
Jörg
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 ?
Reply
0
0
ChavdarHarchev
ChavdarHarchev
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
Reply
Report
0
0
Pierre Galuszka
Pierre Galuszka     ChavdarHarchev
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.
Reply
0
0
Chavdar
Chavdar
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
Reply
0
0
Mayank Kumar
Mayank Kumar
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?
Reply
0
0
ChavdarHarchev
ChavdarHarchev     Mayank Kumar
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
Reply
Report
0
0
There are no comments posted here yet
Load More
Please leave your comments in English
Guest
Posting as Guest
×
Rate this post:
Reset
0   Characters
Suggested Locations