Rumah> Topik> excel> teks badan

Bagaimana untuk menjana kod QR dalam Excel

DDD
Lepaskan: 2023-08-18 11:38:23
asal
14760 orang telah melayarinya

Cara menjana kod QR dalam Excel: 1. Gunakan makro VBA untuk menjana kod QR, buka editor VBA, klik menu "Sisipkan", pilih "Modul", masukkan kod VBA dalam modul baharu, klik Jalankan, dan laksanakan Makro VBA, hanya pilih julat sel untuk menjana kod QR 2. Pemalam pihak ketiga menjana kod QR, klik menu "Fail", pilih "Pilihan", dalam kotak dialog, pilih "Tambah-; ins" untuk membuka tambahan COM Dalam kotak dialog, pilih fail pemalam kod QR untuk dipasang, pasang pemalam, pilih sel untuk menjana kod QR dan jana kod QR.

Bagaimana untuk menjana kod QR dalam Excel

Excel ialah perisian hamparan berkuasa yang bukan sahaja boleh melakukan analisis dan pengiraan data, tetapi juga membuat carta dan visualisasi data. Walaupun Excel sendiri tidak menyokong penjanaan kod QR secara langsung, kami boleh menggunakan beberapa pemalam atau makro untuk mencapai fungsi menjana kod QR dalam Excel.

Di bawah ini saya akan memperkenalkan dua kaedah yang biasa digunakan untuk menjana kod QR.

Kaedah 1: Gunakan makro VBA untuk menjana kod QR

Langkah 1: Buka Excel dan tekan kombinasi kekunci "Alt + F11" untuk membuka editor VBA.

Langkah 2: Dalam editor VBA, klik menu "Sisipkan" dan pilih "Modul".

Langkah 3: Dalam modul yang baru dibuat, masukkan kod VBA berikut:

Sub GenerateQRCode() Dim qrCode As Object Dim rangeToEncode As Range Dim cell As Range ' 设置二维码生成器对象 Set qrCode = CreateObject("WScript.Shell") ' 获取要生成二维码的单元格范围 Set rangeToEncode = Application.InputBox("请选择要生成二维码的单元格范围:", Type:=8) ' 循环生成二维码 For Each cell In rangeToEncode ' 调用二维码生成器生成二维码图片 qrCode.Run "cmd /c qrencode -o " & cell.Address & ".png " & cell.Value ' 将生成的二维码图片插入到单元格中 cell.Select ActiveSheet.Pictures.Insert(cell.Address & ".png").Select Selection.ShapeRange.LockAspectRatio = msoFalse Selection.ShapeRange.Height = cell.RowHeight Selection.ShapeRange.Width = cell.Width Selection.ShapeRange.Top = cell.Top Selection.ShapeRange.Left = cell.Left Selection.ShapeRange.Placement = xlMoveAndSize ' 删除生成的二维码图片 Kill cell.Address & ".png" Next cell ' 清理对象 Set qrCode = Nothing End Sub
Salin selepas log masuk

Langkah 4: Tekan kekunci "F5" atau klik butang Jalankan untuk melaksanakan makro VBA. Kotak dialog akan muncul, sila pilih julat sel untuk menjana kod QR.

Langkah 5: Selepas menunggu tempoh masa, Excel akan menjana kod QR yang sepadan dalam sel yang dipilih.

Kaedah 2: Gunakan pemalam pihak ketiga untuk menjana kod QR

Langkah 1: Buka Excel, klik menu "Fail" dan pilih "Pilihan".

Langkah 2: Dalam kotak dialog Excel Options, pilih "Add-in".

Langkah 3: Klik butang "Pergi" untuk membuka kotak dialog tambahan COM.

Langkah 4: Klik butang "Semak imbas" dan pilih fail pemalam kod QR untuk dipasang.

Langkah 5: Klik butang "OK" untuk memasang pemalam.

Langkah 6: Dalam Excel, pilih sel tempat anda ingin menjana kod QR.

Langkah 7: Klik menu "Plug-in", pilih pemalam kod QR dan jana kod QR.

Ringkasan:

Melalui dua kaedah di atas, kita boleh menjana kod QR dalam Excel. Kaedah menggunakan makro VBA memerlukan pengetahuan pengaturcaraan tertentu, tetapi gaya dan kedudukan kod QR yang dihasilkan boleh disesuaikan. Kaedah menggunakan pemalam pihak ketiga adalah lebih mudah, tetapi mungkin dihadkan oleh fungsi dan tetapan pemalam. Pilih kaedah yang sesuai untuk menjana kod QR berdasarkan keperluan peribadi dan keadaan sebenar.

Atas ialah kandungan terperinci Bagaimana untuk menjana kod QR dalam Excel. Untuk maklumat lanjut, sila ikut artikel berkaitan lain di laman web China PHP!

Label berkaitan:
sumber:php.cn
Kenyataan Laman Web ini
Kandungan artikel ini disumbangkan secara sukarela oleh netizen, dan hak cipta adalah milik pengarang asal. Laman web ini tidak memikul tanggungjawab undang-undang yang sepadan. Jika anda menemui sebarang kandungan yang disyaki plagiarisme atau pelanggaran, sila hubungi admin@php.cn
Artikel terbaru oleh pengarang
Muat turun terkini
Lagi>
kesan web
Kod sumber laman web
Bahan laman web
Templat hujung hadapan
Tentang kita Penafian Sitemap
Laman web PHP Cina:Latihan PHP dalam talian kebajikan awam,Bantu pelajar PHP berkembang dengan cepat!