Excel如何批量打印帶照片的準考證？

要打印已經(jīng)加入字段的帶照片的表格，用VPF報表功能就可以輕松實(shí)現，但是如果數據都是用Excel錄入的怎么辦呢?少量的可以用VFP，將工作表轉換成DBF格式，并將圖片復制成一個(gè)個(gè)單獨的圖片文件，但是要是量比較大這樣就太麻煩了怎么批量打印圖片。下面小編教大家一個(gè)辦法，下面用打印準考證為例：

圖1

　　1. 設計套打模板怎么批量打印圖片，建立數據關(guān)聯(lián)

　　圖2是空白準考證樣式，先用掃描儀將準考證掃描，并保持大小尺寸不變，然后將圖片保存為JPG格式怎么批量打印圖片。打開(kāi)Sheet2工作表，將剛才保存的圖片插入表中，并將圖片設定為非打印對象。執行“視圖→工具欄→繪圖”命令，在準考證需填充文本的部位插入矩形框。我們用VLOOKUP函數實(shí)現Sheet1工作表中數據與Sheet2表中準考證間的關(guān)聯(lián)(照片填充部分除外)。

　　首先將A21單元格作為查詢(xún)的關(guān)鍵數值，在A(yíng)20 —G20單元格中分別輸入[序號]、[姓名]、[級別]等字段怎么批量打印圖片。在B21單元格中輸入公式 “=IF(VLOOKUP(A21,Sheet1!A2:I1000,2)=0,"",VLOOKUP(A21,Sheet1!A2:I1000,2))”，在C21單元格中輸入公式 “=IF(VLOOKUP(A21,Sheet1!A2:I1000,6)=0,"",VLOOKUP(A21,Sheet1!A2:I1000,6))”，其他依此類(lèi)推。這樣就建立了準考證填充數據與Sheet1表間的關(guān)聯(lián)。

　　下一步就是要建立數據與準考證相應矩形框的關(guān)聯(lián)，以準考證中[姓名]字段為例，鼠標單擊該矩形框，在編輯欄右側輸入“=”符號，然后用鼠標點(diǎn)擊需要填入數據的B21單元格，這樣矩形框就和B21單元格中的數據建立了聯(lián)系怎么批量打印圖片。只要單元格數據變化，則矩形框數據也跟著(zhù)變化，其他依此類(lèi)推。這樣，只要在A(yíng)21單元格輸入序號值，那么Sheet1表中相應序號行的數據就會(huì )在準考證模板中自動(dòng)生成。上述工作完成后，按“Shift”鍵選中所有矩形框，設置矩形框格式，包括字體、大小、對齊、顏色和線(xiàn)條等，特別是選中無(wú)填充色和無(wú)線(xiàn)條色。

圖2

　　2. 定義名稱(chēng)怎么批量打印圖片，導入照片

　　通過(guò)VLOOKUP函數雖然建立了工作表1和準考證的聯(lián)系，但要在準考證中自動(dòng)生成照片則需要用到比較復雜的函數，采取定義名稱(chēng)的辦法 怎么批量打印圖片。具體步驟如下：

　　(1)定義名稱(chēng)：執行“插入→名稱(chēng)→定義”命令，打開(kāi)如圖3所示“定義名稱(chēng)”對話(huà)框，將名稱(chēng)定義為“A”，在“引用位置”文本框中輸入公式 “=OFFSET(Sheet1!$A$1,0,0,COUNTA(Sheet1!$A:$A),1)”，按下〔確定〕按鈕返回怎么批量打印圖片。該公式建立了查詢(xún)數據的動(dòng)態(tài)地址。接著(zhù)用同樣方法，再定義另一個(gè)名叫“X”的名稱(chēng)，里面包括公式 “X=INDIRECT(ADDRESS(MATCH(Sheet2!$A$21,A,0),9,1,,"Sheet1"))”，該公式表示當動(dòng)態(tài)地址欄為Sheet2表中A21單元格數值時(shí)，返回Sheet1表中第9列即照片所在列單元格內容。

圖3

　　(2)導入圖片：選取sheet2工作表，執行“視圖→工具欄→控件工具箱”命令，打開(kāi)“控制工具箱”窗口怎么批量打印圖片。點(diǎn)擊圖像框或文字框按鈕，在準考證需要填充照片的位置畫(huà)出相同大小的圖片框或文字框。選取文字框(圖像框)后，將編輯欄中“=EMBED("Forms.TextBox.1",""”改成 “=X”，如圖4，這樣只要A21單元格數值變化時(shí)，照片框中相應的照片就會(huì )發(fā)生變化。

圖4

　　3. 制作微調按鈕怎么批量打印圖片，編寫(xiě)宏代碼

　　為操作更加方便，可以制作微調按鈕調節序號值怎么批量打印圖片。執行“視圖→工具欄→窗體”，打開(kāi)窗體對話(huà)框，點(diǎn)擊微調項標志按鈕，建立微調按鈕，右擊按鈕，打開(kāi)“設置控件格式”對話(huà)框，并與B19單元格建立鏈接，按下〔確定〕按鈕。選中A21單元格，在編輯欄中輸入“= B19”，此時(shí)點(diǎn)擊微調按鈕，就可自動(dòng)調節B19和A21單元格序號值，對應的數據就會(huì )在模板中自動(dòng)生成，效果如圖5。接下來(lái)就是打印了。

圖5

　　執行“工具→宏→Visul Basic編輯器”命令怎么批量打印圖片，在Visul Basic編輯器中選擇“插入→添加模塊”，在代碼窗口輸入以下代碼：

　　Sub 打印()

　　ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True

　　Call dy

　　End Sub

　　Sub dy()

　　Dim a%, b$, c$, abc$

　　a = Sheets("Sheet2").Cells(19, 2).Value

　　b = Sheets("Sheet2").Cells(19, 4).Value

　　(說(shuō)明：a即B19單元格，是圖5中打印第×頁(yè)至第×頁(yè)中的起始頁(yè)，b即D19單元格，是終止頁(yè)怎么批量打印圖片。)

　　If a < b Then

　　a = a + 1

　　Sheets("Sheet2").Cells(19, 2).Value = a

　　Call 打印

　　End If

　　End Sub

　　Private Sub CommandButton1_Click()

　　Call 打印

　　End Sub

　　輸入完成后，保存關(guān)閉VBA編輯窗口返回工作表狀態(tài)怎么批量打印圖片。同制作微調按鈕一樣，制作一個(gè)〔打印〕按鈕，并指定剛才建立的“打印”宏。將A1:F13所在的單元格區域設定為打印區域，設定打印起止頁(yè)，按下〔打印〕按鈕即可打印了，也可點(diǎn)擊微調按鈕，查詢(xún)到相應的打印內容，然后打印當前頁(yè)。當然其中的圖片及按鈕不會(huì )打印出來(lái)。