基于Excel-VBA的精準(zhǔn)扶貧明白卡批量制作程序開發(fā)單正

何兆科 錢均貴 尹承勇 鄧維娟

摘? 要：精準(zhǔn)扶貧是我國全面建成小康社會、實(shí)現(xiàn)中華民族偉大“中國夢”的重要保障措施。為進(jìn)一步建立健全精準(zhǔn)識別、精準(zhǔn)幫扶機(jī)制，實(shí)現(xiàn)“全面小康不落一人”的總體目標(biāo)，瀾滄拉祜族自治縣采用精準(zhǔn)扶貧“明白卡”精準(zhǔn)管理建檔立卡貧困戶，實(shí)現(xiàn)貧困戶信息化管理，“明白卡”具體展示出貧困戶“兩不愁、三保障”基本情況和精準(zhǔn)幫扶情況。但“明白卡”的填寫內(nèi)容涉及廣泛，數(shù)據(jù)處理工作量大。運(yùn)用Excel-VBA實(shí)現(xiàn)數(shù)據(jù)的半自動化處理功能，可以極大地提高“明白卡”制作的工作效率和質(zhì)量。文章以東河鄉(xiāng)邦敢村2018年度精準(zhǔn)扶貧“明白卡”批量制作為實(shí)例，簡要論述運(yùn)用Excel-VBA開發(fā)設(shè)計(jì)“明白卡”制作程序的基本思路、技術(shù)要點(diǎn)和方法。

關(guān)鍵詞：精準(zhǔn)扶貧;Excel-VBA;明白卡

中圖分類號：TP391? ? ? ? ?文獻(xiàn)標(biāo)志碼：A? ? ? ? ?文章編號：2095-2945（2020）09-0041-02

Abstract： Accurate poverty alleviation is an important safeguard measure for our country to build a well-off society in an all-round way and to realize the great "Chinese Dream" of the Chinese nation. In order to further establish and improve the mechanism of accurate identification and precise assistance， and to achieve the overall goal of "being well-off in an all-round way"， Lancang Lahu Autonomous County adopts accurate poverty alleviation "clear card" to accurately manage and establish a card for poor households， so as to achieve information-based management of poor households， and the "clear card" concretely shows the basic situation of "two worries， three guarantees" and accurate assistance for poor households. However， the filling content of the "clear card" involves a wide range of contents， and the workload of data processing is heavy. Using Excel-VBA to realize the semi-automatic data processing function can greatly improve the work efficiency and quality of "clear card" production. Taking the batch production of accurate poverty alleviation "clear card" in Bangkang Village， Donghe Township in 2018 as an example， this paper briefly discusses the basic ideas， technical points and methods of using Excel-VBA to develop and design the production program of "clear card".

Keywords： accurate poverty alleviation; Excel-VBA; clear card

1 程序設(shè)計(jì)

1.1 程序設(shè)計(jì)思路

瀾滄縣精準(zhǔn)扶貧明白卡內(nèi)容涉及貧困戶基本情況、家庭成員信息、生產(chǎn)生活條件、家庭收支情況、各行業(yè)幫扶措施信息、后續(xù)鞏固提升計(jì)劃六個方面共計(jì)100余項(xiàng)，且各類數(shù)據(jù)分散管理導(dǎo)致明白卡的填寫過程繁瑣、工作量大、工作效率低。在脫貧攻堅(jiān)工作中，90%的數(shù)據(jù)均儲存于Excel表格，Excel-VBA窗體程序提供的數(shù)據(jù)交互性處理可在對大批量、多種數(shù)據(jù)復(fù)雜處理時事倍功半。程序設(shè)計(jì)分為兩部分，第一部分以提高工作效力、操作簡單為出發(fā)點(diǎn)，實(shí)現(xiàn)“一鍵操作”的自動化制作明白卡;第二部分為方便日常辦公使用，設(shè)計(jì)一些常用功能，該部分本文中不做詳細(xì)介紹。明白卡批量制作程序流程設(shè)計(jì)如圖1所示。

1.2 程序窗體設(shè)計(jì)

本程序設(shè)計(jì)使用Microsoft Office 2010辦公套裝軟件中的Excel二次開發(fā)編程語言VBA（Visual Basic Application）進(jìn)行程序設(shè)計(jì)，程序窗體設(shè)計(jì)步驟如下：（1）新建一個Microsoft Excel 工作表，并將文件另存為啟用宏的工作簿，文件名稱保存為“明白卡制作.xlsm”。（2）打開菜單欄“開發(fā)工具”下的“Visual Basic”編輯器，在工程“VBAProject（明白卡制作.xlsm）”上右鍵插入“用戶窗體”，并將窗體（UserForm1） 的顯示名稱（Captiong）改為“脫貧攻堅(jiān)”。（3）根據(jù)程序設(shè)計(jì)需求在窗體中添加“框架”、“標(biāo)簽”、“命令按鈕”等控件，并修改控件顯示名稱和填寫控件提示信息（ControlTipText）。（4）在“ThisWorkbook”的Open事件中寫入代碼“Userform1.show”來實(shí)現(xiàn)該文件打開時窗體程序自動彈出。程序界面設(shè)計(jì)如圖2所示。

1.3 模板制作

根據(jù)瀾滄縣扶貧辦提供的文件“明白卡.jpg”利用Excel表格制作相同內(nèi)容的工作表，工作表名稱改為“新明白卡”，模板文件紙張大小選擇“A3”紙張，頁邊距均設(shè)置為“0”，紙張方向?yàn)椤皺M向”，并設(shè)置打印區(qū)域，將頁面縮放調(diào)整打印在1頁紙上，工作簿名稱保存為“新版明白卡.xlsx”。

2 程序設(shè)計(jì)關(guān)鍵技術(shù)

2.1 信息匹配

信息匹配就是在將國辦系統(tǒng)導(dǎo)出的貧困戶信息表整理為標(biāo)準(zhǔn)格式的基礎(chǔ)上，利用各行業(yè)提供的扶貧數(shù)據(jù)和村級自行整理存檔的數(shù)據(jù)填寫到表格中各農(nóng)戶對應(yīng)的單元格內(nèi)，在Excel表中可以使用函數(shù)Vlookup（）根據(jù)農(nóng)戶身份證號碼或戶編號對相應(yīng)信息進(jìn)行查找匹配，但涉及項(xiàng)目繁多、重復(fù)操作工作量大，為提高工作效率，明白卡制作程序中設(shè)計(jì)“自動匹配”板塊和“半自動匹配”工具實(shí)現(xiàn)兩個工作表中的數(shù)據(jù)快速匹配，在實(shí)際操作過程中，用戶可以自由選擇數(shù)據(jù)匹配方式。

自動匹配：

自動匹配是根據(jù)指定的兩個工作表中行標(biāo)題和身份證號碼相同對數(shù)據(jù)進(jìn)行自動匹配，將貧困戶各項(xiàng)信息自動填寫到標(biāo)準(zhǔn)格式工作表中。標(biāo)準(zhǔn)格式工作表設(shè)計(jì)的填寫內(nèi)容項(xiàng)不僅滿足明白卡制作的數(shù)據(jù)要求，而且將貧困戶享受到各行業(yè)扶貧措施匯總，方便貧困戶信息管理、查詢和維護(hù)。為提供程序的運(yùn)行速度，高效完成數(shù)據(jù)匹配，程序中采用“字典法”完成數(shù)據(jù)字典匹配，建立字典發(fā)部分代碼如下：Set d = CreateObject（“scripting.dictionary”）

2.2 按戶生成pdf文件

利用程序?qū)?biāo)準(zhǔn)格式工作表中的數(shù)據(jù)內(nèi)容按戶填寫到明白卡模板中，并將每戶的明白卡保存為pdf格式，明白卡保存為pdf格式的目的在于發(fā)現(xiàn)數(shù)據(jù)錯誤時從源頭修改，也就是只在標(biāo)準(zhǔn)格式工作表中修改，修改后重新生成明白卡，這樣可以保證基礎(chǔ)數(shù)據(jù)準(zhǔn)確性。保存明白卡時在指定路徑下通過程序新建一個名稱為“明白卡&當(dāng)前日期”的文件夾，明白卡文件命名格式為“自然村_戶主姓名&戶主出生日期_家庭人口數(shù)_幫扶責(zé)任人.pdf”。程序保存文件為pdf格式部分代碼如下：Wb.Sheets（“新明白卡”）.ExportAsFixedFormat Type：=xlTypePDF， Filename：=Label4.Caption & 文件命名方式 & “.pdf”

3 程序運(yùn)行步驟

明白卡批量制作程序的運(yùn)行操作步驟共分為三步，第一步為數(shù)據(jù)規(guī)范，第二步為數(shù)據(jù)匹配，第三步為選擇保存路徑導(dǎo)出明白卡。

3.1 數(shù)據(jù)規(guī)范

數(shù)據(jù)規(guī)范即利用程序?qū)⑷珖鲐氶_發(fā)信息系統(tǒng)導(dǎo)出的貧困戶信息表內(nèi)制作明白卡所需數(shù)據(jù)進(jìn)行提取存入標(biāo)準(zhǔn)格式工作表。數(shù)據(jù)規(guī)范程序的運(yùn)行分為兩部分，第一部分是在打開的貧困戶信息工作簿內(nèi)新建一個標(biāo)準(zhǔn)格式工作表，將貧困戶信息表內(nèi)制作明白卡所需數(shù)據(jù)提取存入標(biāo)準(zhǔn)格式工作表，并完成家庭成員性別、年齡的計(jì)算填寫;第二部分是根據(jù)明白卡制作所需數(shù)據(jù)內(nèi)容制作完成標(biāo)準(zhǔn)格式工作表表頭設(shè)計(jì)及字體設(shè)置，并將貧困戶信息按自然村排序重新編號。

3.2 數(shù)據(jù)匹配

數(shù)據(jù)匹配即把明白卡填寫所需涉及到的教育扶貧、醫(yī)療扶貧、產(chǎn)業(yè)扶貧、就業(yè)扶貧、社會保障扶貧等各行業(yè)扶貧數(shù)據(jù)及行政村存檔的扶貧相關(guān)數(shù)統(tǒng)一收集整理，利用不同工作表中貧困戶的身份證號碼或戶編號相同，通過程序?qū)?shù)據(jù)匹配填寫到標(biāo)準(zhǔn)格式工作表之中，程序提供了自動匹配和半自動匹配數(shù)據(jù)的方式，兩種方式可以獨(dú)立使用也可以結(jié)合使用。數(shù)據(jù)匹配完成后需檢查標(biāo)準(zhǔn)格式工作表所設(shè)計(jì)項(xiàng)是否填寫完善，若填寫完善則可執(zhí)行第三步導(dǎo)出明白卡，若不完善則需檢查補(bǔ)充完善后再執(zhí)行導(dǎo)出。

3.3 明白卡導(dǎo)出

明白卡導(dǎo)出是將完善的標(biāo)準(zhǔn)格式工作表中每戶農(nóng)戶涉及到的100余項(xiàng)信息以戶為單位依次填寫到明白卡模板表格中，并將明白卡保存為pdf格式。

4 結(jié)束語

本文以精準(zhǔn)扶貧工作中明白卡制作的實(shí)例簡單介紹了利用Excel-VBA開發(fā)Excel表格數(shù)據(jù)處理及生成pdf格式明白卡實(shí)用程序的方法。明白卡批量制作程序操作簡單，易學(xué)易會，從根本上解決了明白卡制作過程繁瑣、工作量大、易出錯的問題，節(jié)省了大量的時間和人力資源，大幅度提升了精準(zhǔn)扶貧明白卡制作過程中表格數(shù)據(jù)處理的工作效率及質(zhì)量。

參考文獻(xiàn)：

[1]崔若偉.淺談“精準(zhǔn)扶貧”[J].現(xiàn)代交際，2016（23）：99.

[2]史玲燕，張學(xué)敏，閆博榮.扶貧思想的淵源與當(dāng)代意義[J].品牌研究，2018（7）：117.

[3]常廣炎，楊彬.基于ExcelVBA的數(shù)據(jù)處理軟件開發(fā)[J].電腦知識與技術(shù)，2014，10（22）：5209-5212.

[4]莊振春，王朝娜.基于VBA的數(shù)據(jù)報告自動生產(chǎn)系統(tǒng)[J].電子設(shè)計(jì)工程，2017，25（11）：58-64.