鄭磊，黃向勝，閆琢玉，劉沖，張東峰

(1.中海油能源發(fā)展股份有限公司工程技術(shù)湛江分公司，廣東 湛江 524057；2.廣東省海上高溫高壓油氣藏勘探開(kāi)發(fā)企業(yè)重點(diǎn)實(shí)驗(yàn)室，廣東 湛江 524057)

0 引言

如今是一個(gè)數(shù)據(jù)高速處理時(shí)代，如果能用程序自動(dòng)實(shí)現(xiàn)，不但能充分利用人力資源，大大提高工作效率，而且能降低分析數(shù)據(jù)過(guò)程中的出錯(cuò)率[2]。利用VBA架構(gòu)提高實(shí)驗(yàn)室的處理效率，降低運(yùn)營(yíng)成本，通過(guò)現(xiàn)代化科技手段，建立完善的自動(dòng)化處理系統(tǒng)[1]。通過(guò)VBA語(yǔ)言的機(jī)制，用戶(hù)可以任意自定義數(shù)據(jù)，自定義數(shù)據(jù)類(lèi)型豐富了VBA中原有的數(shù)據(jù)類(lèi)型，并拓展VBA數(shù)據(jù)類(lèi)型的應(yīng)用范圍[3]。VBA語(yǔ)言提供了豐富的數(shù)據(jù)類(lèi)型，每種數(shù)據(jù)類(lèi)型都是具有相同性質(zhì)的數(shù)據(jù)集合，每種數(shù)據(jù)類(lèi)型都針對(duì)不同的具體應(yīng)用[4]。巖礦數(shù)據(jù)高效處理系統(tǒng)就是基于VBA架構(gòu)進(jìn)行多層開(kāi)發(fā)而誕生的智能化辦公系統(tǒng)，針對(duì)巖礦鑒定過(guò)程中產(chǎn)生的基礎(chǔ)實(shí)驗(yàn)數(shù)據(jù)，進(jìn)行數(shù)據(jù)整合及應(yīng)用，極大的提高了數(shù)據(jù)處理效率，提升了實(shí)驗(yàn)數(shù)據(jù)的準(zhǔn)確性。

1 碎屑巖巖石薄片鑒定數(shù)據(jù)審核

該功能能夠批量將sheets(“砂巖數(shù)據(jù)”)一個(gè)樣品一行信息轉(zhuǎn)化為一個(gè)樣品一頁(yè)報(bào)告表格式，并同步對(duì)錄入的數(shù)據(jù)進(jìn)行審核，主要審核兩個(gè)方面，一是審核各項(xiàng)數(shù)據(jù)總和是否為100%，二是審核巖石定名是否準(zhǔn)確。在sheets(“砂巖數(shù)據(jù)”)錄入完整的原始數(shù)據(jù)后，點(diǎn)擊sheets(“功能”)頁(yè)面中的“砂巖數(shù)據(jù)審核”按鈕(如圖1所示)，即可運(yùn)行數(shù)據(jù)審核功能，功能運(yùn)行時(shí)會(huì)彈出運(yùn)行信息框，信息框中顯示運(yùn)行的步驟和完成率。碎屑巖數(shù)據(jù)審核運(yùn)行完畢后，會(huì)自動(dòng)跳轉(zhuǎn)到sheets (“砂巖報(bào)告審核”)頁(yè)面，數(shù)據(jù)轉(zhuǎn)化后將行數(shù)據(jù)轉(zhuǎn)為為報(bào)告數(shù)據(jù)，左邊為碎屑巖鑒定報(bào)告表，右邊為數(shù)據(jù)審核，右上為百分含量100%審核，如果含量不等于100%，則會(huì)紅色顯示；右下為最終的巖石定名審核，如果計(jì)算機(jī)IFS函數(shù)自動(dòng)判別的巖石定名和人工鑒定巖石定名不一致，則會(huì)在右下標(biāo)紅處理。如果所有信息都正確，則右邊的數(shù)據(jù)審核信息無(wú)特殊標(biāo)志，默認(rèn)黑色字體。

圖1 巖礦數(shù)據(jù)高效處理系統(tǒng)主界面

IFS函數(shù)相當(dāng)于VBA宏程序的IF判斷，采用函數(shù)的優(yōu)點(diǎn)在于程序運(yùn)行結(jié)束后函數(shù)的功能仍然有效。利用IFS函數(shù)提取巖石粒度和成分信息，進(jìn)行判別定名，然后利用CONCATENATE函數(shù)，組合成巖石綜合定名。IFS、CONCATENATE函數(shù)巖石綜合定名準(zhǔn)確率≥99.9%以上。

當(dāng)百分含量或巖石定名被標(biāo)紅時(shí)，檢測(cè)人員需要仔細(xì)辨識(shí)問(wèn)題所在，如果確實(shí)存在問(wèn)題，則需更改報(bào)告表中的數(shù)據(jù)，報(bào)告表中的數(shù)據(jù)更改后，右邊的數(shù)據(jù)審核的一系列數(shù)據(jù)也會(huì)實(shí)時(shí)進(jìn)行更改，方便用戶(hù)再檢查判斷。檢測(cè)人員對(duì)所有的樣品依次進(jìn)行檢查，直至確認(rèn)無(wú)誤。

2 碎屑巖巖石薄片鑒定報(bào)告審核后數(shù)據(jù)反轉(zhuǎn)化

通過(guò)以上步驟，確保了報(bào)告表中的巖石薄片鑒定數(shù)據(jù)準(zhǔn)確后，點(diǎn)擊“重新生成砂巖數(shù)據(jù)”按鈕，即可將審核后的sheets (“砂巖報(bào)告審核”)中的砂巖數(shù)據(jù)反轉(zhuǎn)到sheets(“砂巖數(shù)據(jù)”)中，以確保所原始的行數(shù)據(jù)和報(bào)告數(shù)據(jù)一致性，減少了重新輸入的易錯(cuò)率，保證了數(shù)據(jù)的準(zhǔn)確性。

3 碎屑巖巖石薄片鑒定報(bào)告生成

該功能能夠根據(jù)檢測(cè)報(bào)告和檢測(cè)原始記錄所需的格式及信息，提取sheets(“砂巖數(shù)據(jù)”)中的相應(yīng)數(shù)據(jù)，一鍵生成檢測(cè)報(bào)告和原始數(shù)據(jù)兩個(gè)文件。具體功能實(shí)現(xiàn)如下：

(1)在桌面新建文件夾。文件夾命名原則為：“井號(hào)”&“(通知單編號(hào))”&“巖石薄片鑒定”&“樣品數(shù)量”&“樣品類(lèi)型”&“樣”。

(2)在新建的文件夾下新建兩個(gè)2個(gè)xlsx格式的Excel文件，其中一個(gè)文件包含sheets(“砂巖報(bào)告表”)和sheets(“砂巖數(shù)據(jù)”)2個(gè)工作表，該 Excel文件命名原則為：“井號(hào)”&“(通知單編號(hào))”&“巖石薄片鑒定”&“樣品數(shù)量”&“樣品類(lèi)型”&“樣”。另一個(gè)文件包含sheets(“報(bào)告封面”)、sheets(“封面第二頁(yè)”)、sheets(“薄片報(bào)告扉頁(yè)”)、sheets(“原始記錄封面”)、sheets(“原始記錄表”)等5個(gè)工作表，該Excel文件命名原則為：“井號(hào)”&“(通知單編號(hào))”&“巖石薄片鑒定報(bào)告封面及原始記錄”。

以上功能通過(guò)點(diǎn)擊sheets(“功能”)頁(yè)面中的“砂巖報(bào)告導(dǎo)出”按鈕一鍵實(shí)現(xiàn)，軟件會(huì)提取檢測(cè)報(bào)告和檢測(cè)原始記錄相關(guān)數(shù)據(jù)，完善報(bào)告封面、原始記錄等文件信息，自動(dòng)新建文件夾和文件，設(shè)置打印區(qū)域、頁(yè)碼、頁(yè)邊距等信息。實(shí)驗(yàn)人員可以直接打開(kāi)Excel文件打印檢測(cè)報(bào)告。

4 碎屑巖巖石薄片鑒定數(shù)據(jù)A2數(shù)據(jù)庫(kù)、勘探成果庫(kù)轉(zhuǎn)化

該功能能夠針對(duì)A2數(shù)據(jù)庫(kù)和勘探成果庫(kù)所需的格式，提取sheets(“砂巖數(shù)據(jù)”)中的相應(yīng)數(shù)據(jù)，分別一鍵轉(zhuǎn)化生成兩個(gè)文件夾，不同的文件夾下生成所需的實(shí)驗(yàn)數(shù)據(jù)主表、子表信息。具體功能實(shí)現(xiàn)如下：

(1)在桌面檢查是否有文件夾名為 “井號(hào)”&“(通知單編號(hào))”&“巖石薄片鑒定”&“樣品數(shù)量”&“樣品類(lèi)型”&“樣”的文件夾，如果沒(méi)有則新建文件夾，一般情況下，該文件夾已經(jīng)在步驟3中新建完成。

(2)在文件夾下載分別新建兩個(gè)文件夾，文件夾名分別為“井號(hào)”&“井A2數(shù)據(jù)庫(kù)”、“井號(hào)”&“井勘探成果庫(kù)”。在各自的文件夾下分別創(chuàng)建成分子表、孔縫子表、主表等3個(gè)xlsx格式的Excel文件。

以上工功能通過(guò)點(diǎn)擊sheets(“功能”)頁(yè)面中的“砂巖A2數(shù)據(jù)庫(kù)導(dǎo)出”、“砂巖勘探成果庫(kù)導(dǎo)出”2個(gè)按鈕分別實(shí)現(xiàn)。

5 巖石薄片鑒定顯微圖片排版

該功能能夠?qū)r石薄片顯微照片在Excel中一鍵排版，具體功能實(shí)現(xiàn)如下：

(1)顯微拍照。對(duì)需要將薄片拍照并排版的樣品依次拍照，照片保存格式為“樣品深度”&“-”&“編號(hào)”。注意照片命名中樣品深度末尾不帶“0”，編號(hào)從1開(kāi)始，如2 865.10 m，則該深度的顯微照片依次命名為2865.1-1、2865.1-2….程序?qū)霑r(shí)會(huì)導(dǎo)入編號(hào)為1-6的樣品，編號(hào)＞6的樣品則不會(huì)導(dǎo)入。

(2)基本信息錄入。通過(guò)點(diǎn)擊sheets(“功能”)頁(yè)面中的“掃描電鏡、薄片圖像”按鈕，頁(yè)面跳轉(zhuǎn)至sheets(“掃描電鏡顯微照片排版”)(該工作表在不使用時(shí)一般是隱藏狀態(tài))，在sheets(“掃描電鏡顯微照片排版”)工作表的A-F列依次錄入需要導(dǎo)入的顯微照片對(duì)應(yīng)的相關(guān)信息，如果已經(jīng)有其他井的信息，可以通過(guò)該頁(yè)面中的“原數(shù)據(jù)清理”實(shí)現(xiàn)原數(shù)據(jù)一鍵清除功能。

(3)顯微圖像導(dǎo)入。點(diǎn)擊sheets(“掃描電鏡顯微照片排版”)頁(yè)面中的“薄片顯微圖版”，則會(huì)彈出文件夾對(duì)話框，在彈出的對(duì)話框中選擇需要導(dǎo)入的顯微圖片的文件夾，點(diǎn)擊“確認(rèn)”，則會(huì)彈出程序運(yùn)行進(jìn)度提示框，待程序運(yùn)行進(jìn)度提示框自動(dòng)關(guān)閉后，則顯微照片圖版已經(jīng)保存在顯微照片所在的文件夾中的文件名為“井號(hào)”&“(通知單編號(hào))”&“顯微特征及描述”的Excel文件中。

6 結(jié)語(yǔ)

為了滿足實(shí)驗(yàn)室的數(shù)據(jù)快速處理的需求，提高實(shí)驗(yàn)室的工作效率和客戶(hù)的滿意度，本文設(shè)計(jì)開(kāi)發(fā)了一個(gè)實(shí)驗(yàn)室數(shù)據(jù)處理系統(tǒng)，通過(guò)VBA架構(gòu)進(jìn)行多層次開(kāi)發(fā)使得實(shí)驗(yàn)室數(shù)據(jù)處理效率得到了提高。主要介紹了實(shí)驗(yàn)室數(shù)據(jù)處理系統(tǒng)的設(shè)計(jì)過(guò)程，運(yùn)用軟件工程原理，完成了系統(tǒng)背景研究、需求分析、技術(shù)分析、系統(tǒng)功能設(shè)計(jì)等工作，同時(shí)對(duì)系統(tǒng)各功能模塊進(jìn)行了測(cè)試，系統(tǒng)功能均能正常使用，系統(tǒng)界面友好、功能完善、操作簡(jiǎn)單、運(yùn)行穩(wěn)定，可以滿足實(shí)驗(yàn)室日益增加的數(shù)據(jù)處理需求實(shí)現(xiàn)了實(shí)驗(yàn)室數(shù)據(jù)的信息化管理。通過(guò)數(shù)據(jù)化的管理，提升實(shí)驗(yàn)室的數(shù)據(jù)處理能力，降低運(yùn)營(yíng)成本。