運用EXCEL處理煤田地質勘探中的煤心樣品信息

仲 劼

新疆煤田地質局一五六煤田地質勘探隊，新疆烏魯木齊 830009

0 引言

在煤田地質報告編寫的過程當中，常有大量樣品進行統計分析。統計的基礎和標準是各個煤心樣品的煤層層位。根據樣品編號孔號深度信息，對照煤巖層對比圖件添加煤層號是重要工作步驟。面對少量的樣品，不復雜的煤層發育情況，一個人也可以很快完成。但是面對大量數據，比如說成百上千個樣品，我們只能逐個進行對照添加，費時費力，還容易出錯。下面我就這項工作如何運用Microsoft Excel 方便高效準確的完成，進行一些探討。

1 問題的提出

煤田地質勘探中，煤心煤樣化驗指標眾多，同一個樣品的化驗結果存在于多個化驗門類表格中。這就產生了兩個問題：1）為樣品添加采樣位置、所屬煤層編號等工程類信息；2）從多個表格中提取我們需要的數據信息，將樣品的信息分別添加到多個化驗表中。

2 實現方法

Excel 擁有強大的數據處理功能，在使用中也常會會使用一些信息對照，返回需要的內容。我們可以通過以下三種方法實現：

1）單一對應條件通過lookup 函數匹配。如：根據樣品編號返回樣品數據信息；

2）多對應條件通過高級篩選功能匹配。如：根據鉆孔、煤層號返回煤質信息；

3）復雜對應條件通過VBA 程序設計實現。如：根據樣品信息返回數據庫中煤層號。

下面我就這三種方法分別說明：

1）使用Excel 提供的vlookup 函數可以實現單一條件的匹配和返回所需信息，使用較方便。例如，我們在一個龐大的煤質表格中需要提取一定數目的煤質數據，我們可以根據樣品的唯一編號使用vlookup 函數，在表格或數值數組的首列查找指定的數值，并由此返回表格或數組當前行中指定列處的數值；

2）對于多條件的數據匹配我們可以使用excel 提供的高級篩選功能，實現多個條件的匹配。例如我們需要使用鉆孔號、煤層號來獲得這個特定鉆孔、特定煤層的煤質數據。這時我們有兩個條件需要滿足，分別是鉆孔號和煤層號。根據這兩個條件對子表和母表重新排序后，使用高級篩選功能可實現兩表的快速對接，提取所需信息；

3）依據鉆孔地質分層數據給煤層添加煤層號是復雜條件匹配，因為我們要同時滿足多個條件，而且條件不是完全對應關系，而是頂底板及煤層厚度比對的問題。這時我們就需要VBA 程序編輯來實現煤層樣品和鉆孔中的煤層配對。例如圖1中的數據，我們發現樣品的采集深度段距和鉆孔中的煤層頂底板段距是包含或者錯位對應關系，這就加大了匹配難度，而運用VBA 程序實現快速準確添加煤層號。就此法進行重點介紹：

圖1 添加煤層號宏數據表EXCEL 格式

表格數據共分為三類：1）樣品信息（左）：錄入的原始信息，為添加煤層號的對象；2）數據庫煤層特征點信息（右）：已錄好的GIS 軟件數據庫中數據，為比對計算的依據；3）樣品對應作息（中）：比對計算后返回的煤層數據，為計算結果。

運用循環算法，反復比對的算法，可以實現快速地添加煤層號：

點擊“比對計算”按鈕，代碼如下：

4 結論

以上方法在煤田地質勘探實際應用中可以提高效率和準確性。為樣品添加煤層號的宏采用了可以直觀看到比對結果的樣式，使用者比較易于接受。靈活運用Excel 軟件處理大量數據，尤其是VBA 程序的合理使用對繁雜重復的工作往往可達到事半功倍的效果。以上只是介紹了煤質數據處理時的幾種方法，由于沒有完善化、體系化，比較零散，僅供讀者參考。

[1](美)John Walkenbach，中文版Excel 2003寶典：電子工業出版社，2004，5.

[2]（美）沃肯巴赫 著，尚紅昕，劉玲，等譯；Excel應用技巧寶典，電子工業出版社，2006，1.

[3]王鴻儒.EXCEL VBA（2000-2003）程序設計[M].北京：中國鐵道出版社，2005.