Excel如何批量打印收據(jù)?
導(dǎo)入學(xué)生的成績(jī)單,命名為“成績(jī)表”,在成績(jī)表中輸入各科成績(jī),任課教師和總分、排名等。再建立一張?jiān)u語(yǔ)表,命名為“評(píng)語(yǔ)”,在里面有教師對(duì)各位學(xué)生的評(píng)語(yǔ)。在建一張表命名為“通知書(shū)”,在里面設(shè)計(jì)好通知書(shū)內(nèi)容。
在“通知書(shū)”工作表中新建一個(gè)表格輸入“序號(hào)”,如圖所示,同時(shí)選擇C6單元格輸入=OFFSET(成績(jī)表!$A$3,通知書(shū)!$M$1*1-1,0)"",這樣可以在C3輸入姓名。
選擇C6單元格,輸入函數(shù)=VLOOKUP($C$2,成績(jī)表!$A$3:$I$16,2,0),在C6中出現(xiàn)學(xué)生的數(shù)學(xué)成績(jī),同樣在:
D6單元格,輸入函數(shù)=VLOOKUP($C$2,成績(jī)表!$A$3:$I$16,3,0)
E6單元格,輸入函數(shù)=VLOOKUP($C$2,成績(jī)表!$A$3:$I$16,4,0)
F6單元格,輸入函數(shù)=VLOOKUP($C$2,成績(jī)表!$A$3:$I$16,5,0)
G6單元格,輸入函數(shù)=VLOOKUP($C$2,成績(jī)表!$A$3:$I$16,6,0)
H6單元格,輸入函數(shù)=VLOOKUP($C$2,成績(jī)表!$A$3:$I$16,7,0)
I6單元格,輸入函數(shù)=VLOOKUP($C$2,成績(jī)表!$A$3:$I$16,8,0)
J6單元格,輸入函數(shù)=VLOOKUP($C$2,成績(jī)表!$A$3:$I$16,9,0)
現(xiàn)在成績(jī)就全部輸入了。
選擇C7單元格,輸入函數(shù)=VLOOKUP($B$7,成績(jī)表!$A$3:$I$20,2,0)在C6中出現(xiàn)學(xué)生的數(shù)學(xué)成績(jī),同樣在:
D7單元格,輸入函數(shù)=VLOOKUP($B$7,成績(jī)表!$A$3:$I$20,3,0)
E7單元格,輸入函數(shù)=VLOOKUP($B$7,成績(jī)表!$A$3:$I$20,4,0)
F7單元格,輸入函數(shù)=VLOOKUP($B$7,成績(jī)表!$A$3:$I$20,5,0)
G7單元格,輸入函數(shù)=VLOOKUP($B$7,成績(jī)表!$A$3:$I$20,6,0)
H7單元格,輸入函數(shù)=VLOOKUP($B$7,成績(jī)表!$A$3:$I$20,7,0)
I7單元格,輸入函數(shù)=VLOOKUP($B$7,成績(jī)表!$A$3:$I$20,8,0)
J7單元格,輸入函數(shù)=VLOOKUP($B$7,成績(jī)表!$A$3:$I$20,9,0)
現(xiàn)在任課教師就全部輸入了。
現(xiàn)在我們來(lái)輸入評(píng)語(yǔ),在B9單元格中輸入=VLOOKUP($C$2,' 評(píng)語(yǔ)'!$A$2:$B$15,2,0),單擊回車(chē),就看到教師評(píng)語(yǔ)了。
現(xiàn)在我們來(lái)實(shí)現(xiàn)批量打印,在L5中輸入“開(kāi)始序號(hào)”,在L6中輸入“結(jié)束序號(hào) ” ,在M5中輸入1,在M6中輸入14,單擊“開(kāi)發(fā)工具”——插入——命令按鈕,在M1中劃出按鈕。
右鍵按鈕,選擇查看代碼,在代碼編輯框中輸入:
Private Sub 打印通知書(shū)_Click()
For i = Range("M5") To Range("M6")
Range("m1") = i
ActiveSheet.PrintOut
Next
End Sub
關(guān)閉代碼窗口,點(diǎn)擊“設(shè)計(jì)模式”,退出編輯狀態(tài),現(xiàn)在,單擊command按鈕就可以批量打印了。