什么是qr表？生成QR Code二維碼是通過調(diào)用第三方程序并結(jié)合Excel里面的VBA代碼實現(xiàn)的，如果第三方程序出錯就可能導(dǎo)致生成錯誤。為什么excel里面的二維碼發(fā)給別人顯示不了？看看這個二維碼是什

什么是qr表？

生成QR Code二維碼是通過調(diào)用第三方程序并結(jié)合Excel里面的VBA代碼實現(xiàn)的，如果第三方程序出錯就可能導(dǎo)致生成錯誤。

為什么excel里面的二維碼發(fā)給別人顯示不了？

看看這個二維碼是什么格式的??？

如果是圖片的話，截圖拷貝進表格或者插入對象也可以的正常是可以顯示的如果是特殊字符格式，看看excel是否支持啊不過直接使用excel vba也是可以生成二維碼的

excel表格找不到二維碼選項？

1. 先要下載一個控件qrmaker，下載的文件解壓后，將QRMaker文件夾里的所有文件復(fù)制到c:windowssystem32下。通過“開始→運行”，在運行窗口里輸入regsvr32 c:windowssystem32QRmaker.ocx注冊組件。

2. 打開Excel，因為之后要用到VBA，進入Excel選項，勾選“在功能區(qū)顯示開發(fā)工具”，切換到開發(fā)工具選項卡，單擊Visual Basic打開VBA編輯器，選擇“工具→引用→瀏覽”，找到c:windowssystem32QRMaker.ocx，關(guān)閉編輯器。

3. 回到Excel中，在空白處插入一個命令按鈕，右擊該按鈕選擇指定宏→錄制，宏命名為print2d，停止錄制宏。

4. 同時插入其他控件中的QRMaker Control，點“確定”后鼠標(biāo)會變成十字，在空白區(qū)域畫一個二維碼控件。

5. 再次打開VBA編輯器，在左邊找到模塊1，雙擊后清空右邊所有內(nèi)容，輸入以下代碼：

Sub print2d()

Dim QRString1 As String

#39定義變量

QRString1 Sheet1.Range(#34A1#34)

#39將A1單元格的值傳遞給QRString1

ArOn

#39啟用QRmaker的自動重畫屬性

QRString1

#39將QRString1的值傳遞給QRmaker1

End Sub

保存關(guān)閉VBA編輯器，回到Excel，單擊Print2D按鈕就可以將A1單元格的內(nèi)容生成二維碼。