如何才能生成二維碼呢？

先將材料中QRmake.exe拷貝至D盤根目錄下，打開(kāi)execl軟件，進(jìn)入宏錄制

接著我們?cè)O(shè)置快捷鍵及說(shuō)明，點(diǎn)擊確定

然后我們需要退出宏錄制

這時(shí)我們按alt+F8 進(jìn)入執(zhí)行對(duì)話框，選中剛才錄制的宏，單擊編輯(圖4)進(jìn)入VBE編輯器

會(huì)發(fā)現(xiàn)進(jìn)去是一段空代碼，將代碼內(nèi)容全部選中，刪除

然后我們將工具中VBA文本文檔的代碼復(fù)制，粘貼到當(dāng)前窗口

圖中第一處標(biāo)記：i = MK_QR(ActiveCell.Value,"10", "4")，

括號(hào)內(nèi)有三個(gè)參數(shù)：ActiveCell.Value即是要轉(zhuǎn)換成二維碼的內(nèi)容，本例時(shí)當(dāng)前選中單元格內(nèi)容

"10"，二維碼的顯示精度，顯示精度越高辨識(shí)度越高，但讀取時(shí)間較長(zhǎng)

"4"，二維碼尺寸

圖中第二處標(biāo)記：ActiveCell.Offset(0, 1).Select，將生成的二維碼放置的位置，樣本代碼中

將二維碼圖片放置在當(dāng)前單元格向右一格的位置。Offset后的括號(hào)內(nèi)兩個(gè)數(shù)值表示坐標(biāo)

第一個(gè)數(shù)字表示行偏移，向下為正，向上為負(fù)

第二個(gè)數(shù)字表示列偏移，向右為正，向左為負(fù)

使用方法：選中要轉(zhuǎn)換二維碼的單元格，按alt+F8快捷鍵調(diào)出執(zhí)行窗口，選中MakeQRCode 執(zhí)行

我們也可用圖片來(lái)調(diào)用該宏，繪制或者插入任意圖片，右鍵點(diǎn)擊該圖片，選擇“指定宏”

接下來(lái)在彈出的對(duì)話框中選中之前定制的宏

最后一步適當(dāng)調(diào)整單元格的尺寸與二維碼圖片尺寸一致。