先看看打印效果,高大上吧,若喜歡往下看……
把縣局下發的畢業生登記表.xlsx存到硬盤的某個文件中,例如我保存在初招文件夾中,在這個文件夾内再新建一個文件夾,重命名為“照片”。照片文件夾内放畢業生照片,照片以學生名字命名,例如:張三.jpg,必須是JPG格式。
打開畢業生登記表.xlsx,再建一個工作表,重命名為“畢業生信息”,如下圖:
這個工作表需要收集畢業生的各種信息,從A列到U列包括:編号、畢業學校、姓名、性别、出生年月、民族、住址、考點、考場、座号、學籍号、第一家庭成員姓名、與本人關系、工作單位、聯系電話、第二家庭成員姓名、與本人關系、工作單位、聯系電話、班主任簽名、校長簽名。此表設置好後,可以下發到各學校收集數據。
準備工作完畢,先學習一個用到的查找引用函數:VLOOKUP
VLOOKUP函數是excel中非常重要的查找引用函數之一,在平時的數據處理工作中可以說是沒它不可。掌握了它的使用方法可以減少很多工作量,大大的提高工作效率。下面就為大家介紹VLOOKUP函數單條件查找的基本使用方法。
1、vlookup函數語法解析
vlookup(lookup_value,table_array,col_index_num,[range_lookup])
lookup_value表示要查找的對象;
table_array表示查找的數據區域;
col_index_num表示要查找的數據在table_array區域中處于第幾列的列号;
range_lookup表示查找類型,其中1表示近似匹配,0表示精确匹配,一般我們都用精确匹配。
在I1單元格輸入”編号“,J1單元格輸入學生的編号,開始把“畢業生信息”導入到“畢業生登記表”中,這裡用到一個查找引用函數VLOOKUP,在“畢業生登記表“中的A2單元格内輸入=VLOOKUP(J1,畢業生信息!A:U,2),獲取“畢業生信息”工作表中的畢業學校信息。
其他“姓名、性别、出生年月、民族、住址、考點、考場、座号、學籍号、第一家庭成員姓名、與本人關系、工作單位、聯系電話、第二家庭成員姓名、與本人關系、工作單位、聯系電話、班主任簽名、校長簽名”對應填入相應函數即可。例如:在B3單元格輸入=VLOOKUP(J1,畢業生信息!A:U,3),獲取畢業生的姓名。在D3單元格輸入=VLOOKUP(J1,畢業生信息!A:U,4),獲取畢業生的性别。其他需要獲取的數據,請參照該數據在“畢業生信息”工作表中的列數,進行修改該函數獲取即可。
下面是把照片自動插入畢業生登記表中,打開開發工具,在畢業生登記表工作表中插入兩個表單按鈕控件,如圖:
一個用來讓照片自動插入登記表,一個用來打印登記表。
給"生成照片"按鈕控件指定宏,宏代碼如下:
Sub 生成照片()
Application.ScreenUpdating = False '防止屏幕抖動,屏幕刷新禁止
Dim fs1$
Dim d As Object
If [j1] > Sheets("畢業生信息").Cells(Rows.Count, 1).End(xlUp).Row Then
MsgBox "後面沒有了!": Exit Sub
End If
Set d = CreateObject("scripting.dictionary")
For Each a In Sheets("畢業生登記表").Pictures
a.Delete
Next
On Error Resume Next '忽略錯誤繼續執行VBA代碼,避免出現錯誤消息
fs1 = ThisWorkbook.Path & "\照片\" & CStr(Sheets("畢業生登記表").[b3]) & ".jpg"
If d.ExistsFile(fs1) = True Then
Range("G3:H6").Select
ActiveSheet.Pictures.Insert(fs1).Select
With Selection.ShapeRange
Selection.ShapeRange.LockAspectRatio = msoFalse
.Top = Range("G3:H6").Top 1
.Left = Range("G3:H6").Left 1
.Width = Range("G3:H6").Width
.Height = Range("G3:H6").Height
End With
End If
[j1].Select
Application.ScreenUpdating = True
End Sub
給“打印登記表”按鈕控件指定宏,宏代碼如下:
Sub 打印登記表()
Sheets("畢業生登記表").PrintOut From:=1, To:=1, Copies:=1
[j1] = [j1] 1
End Sub
最後,還要注意設置打印區域,并把文件另存為啟用宏的工作簿,就大功告成了!
最後的最後,使用過程一定要啟用EXCEL的宏功能,并且你隻需要第一步點生成照片,第二步點打印登記表。就可以打印出高大上的畢業生登記表了。
,更多精彩资讯请关注tft每日頭條,我们将持续为您更新最新资讯!