如何在Excel中基於單元格值創建二維碼?
您知道如何根據Excel中的特定單元格值創建QR碼嗎? 本文將向您詳細介紹實現該方法的方法。
使用條形碼控制和VBA代碼基於單元格值創建QR碼
使用驚人的工具根據單元格值輕鬆批量創建多個二維碼
使用條形碼控制和VBA代碼基於單元格值創建QR碼
條形碼控件可以幫助您基於Excel中的單元格值快速創建QR碼。 請執行以下操作。
1.打開工作表,其中包含您要創建QR Code的單元格值。
2。 點擊 開發人員 > 插入 > 更多控制。 看截圖:
3。 在裡面 更多控件 窗口,檢查 Microsoft條碼控制16.0 or Microsoft條碼控制15.0.
4.如果在“更多控件”窗口中找不到條形碼控件,或者條形碼控件不是16.0或15.0,則需要通過單擊以下鏈接下載條形碼控件文件: 下載條碼控制。 如果“更多控件”窗口中有“條形碼控件16.0”或“ 15.0”,請跳到下面 步驟10.
下載文件後,將其解壓縮,然後使用在Excel中下載的條形碼控件更新條形碼控件,如下所示。
5.關閉所有Excel工作簿,轉到 開始 部分,找到 Excel 應用並右鍵單擊它,然後選擇 以管理員身份運行 從上下文菜單中。 看截圖:
6.在開幕 用戶帳戶控制 對話框中,單擊 是 按鈕。
7.然後創建一個新的工作簿。 請點擊 開發人員 > 插入 > 更多控制。 看截圖:
8。 在裡面 更多控件 窗口中,單擊 註冊自定義 按鈕,找到並選擇下載的QR碼OCX文件之一,然後單擊 已提交 按鈕。 看截圖:
9。 點擊 OK 按鈕,當它返回 更多控件 窗口以完成條形碼控制的更新。 然後重新打開工作簿,其中包含您要創建QR Code的單元格值。
10。 右鍵單擊工作表標籤,然後單擊 查看代碼 從上下文菜單中打開 Microsoft Visual Basic for Applications 窗口。 然後將下面的VAB代碼複製並粘貼到“代碼”窗口中。 最後按 其他 + Q 退出鍵 Microsoft Visual Basic for Applications 窗口。
VBA代碼:在Excel中創建QR代碼
Sub setQR()
'Updated by Extendoffice 2018/8/22
Dim xSRg As Range
Dim xRRg As Range
Dim xObjOLE As OLEObject
On Error Resume Next
Set xSRg = Application.InputBox("Please select the cell you will create QR code based on", "Kutools for Excel", , , , , , 8)
If xSRg Is Nothing Then Exit Sub
Set xRRg = Application.InputBox("Select a cell to place the QR code", "Kutools for Excel", , , , , , 8)
If xRRg Is Nothing Then Exit Sub
Application.ScreenUpdating = False
Set xObjOLE = ActiveSheet.OLEObjects.Add("BARCODE.BarCodeCtrl.1")
xObjOLE.Object.Style = 11
xObjOLE.Object.Value = xSRg.Text
ActiveSheet.Shapes.Item(xObjOLE.Name).Copy
ActiveSheet.Paste xRRg
xObjOLE.Delete
Application.ScreenUpdating = True
End Sub
11。 點擊 開發人員 > 插入 > 按鈕(表單控件) 如下圖所示。
12.在當前工作表中繪製一個按鈕。 在彈出 分配宏 對話框中選擇 設置二維碼 在框中,然後單擊 OK 按鈕。
13。 關閉 設計模式 通過點擊 開發人員 > 設計模式.
14.單擊開始中的按鈕 Excel的Kutools 對話框中,選擇您要創建QR Code的單元格,然後單擊 OK.
15.在第二 Excel的Kutools 對話框中,選擇一個單元以放置QR碼。 看截圖:
然後,QR碼將立即插入指定的單元格中。 重複步驟14到15,以完成所有創建的QR碼。 看截圖:
使用驚人的工具根據單元格值輕鬆批量創建多個二維碼
老實說,上述方法並不容易處理,因為它有其自身的局限性。 這裡強烈推薦 插入二維碼 的特點 Excel的Kutools. 此功能可幫助您根據 Excel 中指定的單元格值,只需單擊幾下即可快速批量插入二維碼。 請按以下步驟完成。
申請前 Excel的Kutools請 首先下載並安裝.
1. 首先,準備好要基於的值來創建 QR 碼。
2。 點擊 庫工具 > 插入 > 插入二維碼.
提示: 如果您找不到此路徑的功能,請按 其他 + S 同時打開 搜索Kutools函數 框,手動輸入 QR Code 在搜索框中,然後您可以看到 插入二維碼 功能已列出,只需單擊即可激活該功能。 看截圖:
現在,插入 QR 代碼窗格顯示在工作簿的右側。
3。 在裡面 插入二維碼 窗格,您需要配置如下。
4.然後 Excel的Kutools 彈出對話框,單擊 確定。
5. 然後同時創建二維碼。 您需要手動關閉 插入二維碼 如果完成創建所有 QR 碼,則顯示窗格。
點擊即可 了解有關此功能的更多信息...
相關文章:
最佳辦公效率工具
Kutools for Excel 解決了你的大部分問題,並將你的生產力提高了 80%
- 重用: 快速插入 複雜的公式,圖表 以及您以前使用過的任何東西; 加密單元 帶密碼 創建郵件列表 並發送電子郵件...
- 超級公式欄 (輕鬆編輯多行文本和公式); 閱讀版式 (輕鬆讀取和編輯大量單元格); 粘貼到過濾範圍...
- 合併單元格/行/列 不會丟失數據; 拆分單元格內容; 合併重複的行/列...防止細胞重複; 比較範圍...
- 選擇重複或唯一 行; 選擇空白行 (所有單元格都是空的); 超級查找和模糊查找 在許多工作簿中; 隨機選擇...
- 確切的副本 多個單元格,無需更改公式參考; 自動創建參考 到多張紙; 插入項目符號,複選框等...
- 提取文字,添加文本,按位置刪除, 刪除空間; 創建和打印分頁小計; 在單元格內容和註釋之間轉換...
- 超級濾鏡 (將過濾方案保存並應用於其他工作表); 高級排序 按月/週/日,頻率及更多; 特殊過濾器 用粗體,斜體...
- 結合工作簿和工作表; 根據關鍵列合併表; 將數據分割成多個工作表; 批量轉換xls,xlsx和PDF...
- 超過 300 項強大的功能. 支持 Office / Excel 2007-2021 和 365。支持所有語言。 在您的企業或組織中輕鬆部署。 完整功能 30 天免費試用。 60 天退款保證。

Office選項卡為Office帶來了選項卡式界面,使您的工作更加輕鬆
- 在Word,Excel,PowerPoint中啟用選項卡式編輯和閱讀,發布者,Access,Visio和Project。
- 在同一窗口的新選項卡中而不是在新窗口中打開並創建多個文檔。
- 將您的工作效率提高 50%,每天為您減少數百次鼠標點擊!

























