利用VBA簡化錄井資料處理過程的兩個(gè)實(shí)例

馮蓓華　鞏文林

摘 要：當(dāng)前在錄井資料處理過程中，使用最多的軟件仍然是微軟Office組件中的Excel、Word和Access，其中經(jīng)常要進(jìn)行的大量機(jī)械和重復(fù)性的信息、數(shù)據(jù)處理工作，為了提高工作效率，我們可以利用Office自帶的Visual Basic for Application（簡稱VBA）來實(shí)現(xiàn)操作自動(dòng)化，為錄井技術(shù)人員節(jié)約時(shí)間和精力，為更出色的完成地質(zhì)錄井工作提供保障。

關(guān)鍵詞：VBA 微軟Office 資料處理 操作自動(dòng)化

中圖分類號：P631.84 文獻(xiàn)標(biāo)識碼：A 文章編號：1674-098X（2014）01（c）-0241-04

Visual Basic for Application（簡稱VBA）是內(nèi)置于Office系列產(chǎn)品中的一套開發(fā)平臺，與Office產(chǎn)品高度集成。VBA是非常流行的應(yīng)用程序開發(fā)語言Visual Basic（VB）的子集，具有VB語言的大多數(shù)特征和易用性，可以利用簡單的語法和規(guī)則，通過簡易快速的編程手法來實(shí)現(xiàn)軟件的高級功能，將一些重復(fù)的輸入和操作過程進(jìn)行簡化，以提高工作效率。而且VBA可以直接應(yīng)用Office 套裝軟件的各項(xiàng)功能，如Excel具有打印、文件處理和文本編輯功能；具有大量可供選擇的內(nèi)置函數(shù)；且可連接到多種格式的數(shù)據(jù)庫，等等。

1 巖屑描述代碼轉(zhuǎn)換

如圖所示，在目前新生代軟件錄入的資料數(shù)據(jù)庫中，巖屑描述記錄中巖性和顏色是用代碼來表示的，對不熟悉代碼的人來說不易利用（如圖1）。把這樣的內(nèi)容轉(zhuǎn)換成漢字表述是經(jīng)常要進(jìn)行的操作。因此，利用宏對平時(shí)經(jīng)常要進(jìn)行的操作進(jìn)行合理的錄制，并與代碼的含義結(jié)合，編制了一個(gè)包含可以對顏色、巖性、含油級別欄從代碼到漢字的轉(zhuǎn)換的宏。在打開包含這個(gè)宏的一個(gè)空工作表后，選中巖屑描述記錄要轉(zhuǎn)換的列，運(yùn)行宏（圖2），即可自動(dòng)轉(zhuǎn)換為（圖3）所示的漢字表示。

代碼的轉(zhuǎn)換按照新生代軟件代碼表的定義進(jìn)行，不會(huì)產(chǎn)生轉(zhuǎn)換錯(cuò)誤。需要說明的是，這個(gè)宏的編寫也不是很勞累的一行接著一行寫下來的，而是利用EXCEL表格的公式產(chǎn)生后粘貼過來的。

2 合并多張工作表

綜合錄井班報(bào)表一般都是用EXCEL編寫的，有的分隊(duì)采用一個(gè)班一張工作表，這樣一個(gè)班報(bào)表文件如果是一個(gè)月就有60張左右的工作表。在上交過程中，有時(shí)又要求所有的內(nèi)容都在一張工作表上。對于內(nèi)容少的班報(bào)表來說，這個(gè)操作不算太費(fèi)事，一張一張復(fù)制粘貼過來即可；但是如果是建井周期比較長的井呢？因此，編者采用VBA語言，針對錄井班報(bào)表的特點(diǎn)，編制了一個(gè)宏，利用它可以快速對一個(gè)EXCEL文件中多張工作表的內(nèi)容復(fù)制到一張工作表上，并調(diào)整好格式。3 結(jié)語

這兩個(gè)實(shí)例就是使用宏記錄器記錄的用戶的各種操作代碼以及VBA自帶的編程語言，使日常工作轉(zhuǎn)換為VBA 程序代碼，實(shí)現(xiàn)工作自動(dòng)化。

我把這兩個(gè)程序也推薦給其他作業(yè)隊(duì)和地質(zhì)評價(jià)中心使用，反映良好，大大的節(jié)約了時(shí)間。

以后的工作設(shè)想是爭取利用VBA實(shí)現(xiàn)資料數(shù)據(jù)在多種軟件之間的快速遷移。避免在A7系統(tǒng)、勘探生產(chǎn)信息系統(tǒng)和新生代軟件中重復(fù)多次地進(jìn)行資料錄入。

事實(shí)上，VBA比較容易于學(xué)習(xí)掌握，利用好它，可以充分提高我們的工作效率，如果普遍使用，一定會(huì)使我們的工作有一個(gè)嶄新的面貌。

參考文獻(xiàn)

[1] 李兆群.錄井技術(shù)現(xiàn)狀及發(fā)展趨勢[J].石油科技論壇，2010（6）.

[2] 黃晨翔.油田錄井技術(shù)應(yīng)用現(xiàn)狀與發(fā)展對策分析[J].現(xiàn)代商貿(mào)工業(yè)，2011（11）.

[3] 竇景山.如何利用VBA對word操作自動(dòng)評分[J].科技致富向?qū)В?013（17）.

[4] 王志華，蒲前梅，張玉波，等.利用VBA實(shí)現(xiàn)Excel電子表格（工資報(bào)表）自動(dòng)分頁統(tǒng)計(jì)[J].青海石油，2008（4）.endprint

摘 要：當(dāng)前在錄井資料處理過程中，使用最多的軟件仍然是微軟Office組件中的Excel、Word和Access，其中經(jīng)常要進(jìn)行的大量機(jī)械和重復(fù)性的信息、數(shù)據(jù)處理工作，為了提高工作效率，我們可以利用Office自帶的Visual Basic for Application（簡稱VBA）來實(shí)現(xiàn)操作自動(dòng)化，為錄井技術(shù)人員節(jié)約時(shí)間和精力，為更出色的完成地質(zhì)錄井工作提供保障。

關(guān)鍵詞：VBA 微軟Office 資料處理 操作自動(dòng)化

中圖分類號：P631.84 文獻(xiàn)標(biāo)識碼：A 文章編號：1674-098X（2014）01（c）-0241-04

Visual Basic for Application（簡稱VBA）是內(nèi)置于Office系列產(chǎn)品中的一套開發(fā)平臺，與Office產(chǎn)品高度集成。VBA是非常流行的應(yīng)用程序開發(fā)語言Visual Basic（VB）的子集，具有VB語言的大多數(shù)特征和易用性，可以利用簡單的語法和規(guī)則，通過簡易快速的編程手法來實(shí)現(xiàn)軟件的高級功能，將一些重復(fù)的輸入和操作過程進(jìn)行簡化，以提高工作效率。而且VBA可以直接應(yīng)用Office 套裝軟件的各項(xiàng)功能，如Excel具有打印、文件處理和文本編輯功能；具有大量可供選擇的內(nèi)置函數(shù)；且可連接到多種格式的數(shù)據(jù)庫，等等。

1 巖屑描述代碼轉(zhuǎn)換

如圖所示，在目前新生代軟件錄入的資料數(shù)據(jù)庫中，巖屑描述記錄中巖性和顏色是用代碼來表示的，對不熟悉代碼的人來說不易利用（如圖1）。把這樣的內(nèi)容轉(zhuǎn)換成漢字表述是經(jīng)常要進(jìn)行的操作。因此，利用宏對平時(shí)經(jīng)常要進(jìn)行的操作進(jìn)行合理的錄制，并與代碼的含義結(jié)合，編制了一個(gè)包含可以對顏色、巖性、含油級別欄從代碼到漢字的轉(zhuǎn)換的宏。在打開包含這個(gè)宏的一個(gè)空工作表后，選中巖屑描述記錄要轉(zhuǎn)換的列，運(yùn)行宏（圖2），即可自動(dòng)轉(zhuǎn)換為（圖3）所示的漢字表示。

代碼的轉(zhuǎn)換按照新生代軟件代碼表的定義進(jìn)行，不會(huì)產(chǎn)生轉(zhuǎn)換錯(cuò)誤。需要說明的是，這個(gè)宏的編寫也不是很勞累的一行接著一行寫下來的，而是利用EXCEL表格的公式產(chǎn)生后粘貼過來的。

2 合并多張工作表

綜合錄井班報(bào)表一般都是用EXCEL編寫的，有的分隊(duì)采用一個(gè)班一張工作表，這樣一個(gè)班報(bào)表文件如果是一個(gè)月就有60張左右的工作表。在上交過程中，有時(shí)又要求所有的內(nèi)容都在一張工作表上。對于內(nèi)容少的班報(bào)表來說，這個(gè)操作不算太費(fèi)事，一張一張復(fù)制粘貼過來即可；但是如果是建井周期比較長的井呢？因此，編者采用VBA語言，針對錄井班報(bào)表的特點(diǎn)，編制了一個(gè)宏，利用它可以快速對一個(gè)EXCEL文件中多張工作表的內(nèi)容復(fù)制到一張工作表上，并調(diào)整好格式。3 結(jié)語

這兩個(gè)實(shí)例就是使用宏記錄器記錄的用戶的各種操作代碼以及VBA自帶的編程語言，使日常工作轉(zhuǎn)換為VBA 程序代碼，實(shí)現(xiàn)工作自動(dòng)化。

我把這兩個(gè)程序也推薦給其他作業(yè)隊(duì)和地質(zhì)評價(jià)中心使用，反映良好，大大的節(jié)約了時(shí)間。

以后的工作設(shè)想是爭取利用VBA實(shí)現(xiàn)資料數(shù)據(jù)在多種軟件之間的快速遷移。避免在A7系統(tǒng)、勘探生產(chǎn)信息系統(tǒng)和新生代軟件中重復(fù)多次地進(jìn)行資料錄入。

事實(shí)上，VBA比較容易于學(xué)習(xí)掌握，利用好它，可以充分提高我們的工作效率，如果普遍使用，一定會(huì)使我們的工作有一個(gè)嶄新的面貌。

參考文獻(xiàn)

[1] 李兆群.錄井技術(shù)現(xiàn)狀及發(fā)展趨勢[J].石油科技論壇，2010（6）.

[2] 黃晨翔.油田錄井技術(shù)應(yīng)用現(xiàn)狀與發(fā)展對策分析[J].現(xiàn)代商貿(mào)工業(yè)，2011（11）.

[3] 竇景山.如何利用VBA對word操作自動(dòng)評分[J].科技致富向?qū)В?013（17）.

[4] 王志華，蒲前梅，張玉波，等.利用VBA實(shí)現(xiàn)Excel電子表格（工資報(bào)表）自動(dòng)分頁統(tǒng)計(jì)[J].青海石油，2008（4）.endprint

摘 要：當(dāng)前在錄井資料處理過程中，使用最多的軟件仍然是微軟Office組件中的Excel、Word和Access，其中經(jīng)常要進(jìn)行的大量機(jī)械和重復(fù)性的信息、數(shù)據(jù)處理工作，為了提高工作效率，我們可以利用Office自帶的Visual Basic for Application（簡稱VBA）來實(shí)現(xiàn)操作自動(dòng)化，為錄井技術(shù)人員節(jié)約時(shí)間和精力，為更出色的完成地質(zhì)錄井工作提供保障。

關(guān)鍵詞：VBA 微軟Office 資料處理 操作自動(dòng)化

中圖分類號：P631.84 文獻(xiàn)標(biāo)識碼：A 文章編號：1674-098X（2014）01（c）-0241-04

Visual Basic for Application（簡稱VBA）是內(nèi)置于Office系列產(chǎn)品中的一套開發(fā)平臺，與Office產(chǎn)品高度集成。VBA是非常流行的應(yīng)用程序開發(fā)語言Visual Basic（VB）的子集，具有VB語言的大多數(shù)特征和易用性，可以利用簡單的語法和規(guī)則，通過簡易快速的編程手法來實(shí)現(xiàn)軟件的高級功能，將一些重復(fù)的輸入和操作過程進(jìn)行簡化，以提高工作效率。而且VBA可以直接應(yīng)用Office 套裝軟件的各項(xiàng)功能，如Excel具有打印、文件處理和文本編輯功能；具有大量可供選擇的內(nèi)置函數(shù)；且可連接到多種格式的數(shù)據(jù)庫，等等。

1 巖屑描述代碼轉(zhuǎn)換

如圖所示，在目前新生代軟件錄入的資料數(shù)據(jù)庫中，巖屑描述記錄中巖性和顏色是用代碼來表示的，對不熟悉代碼的人來說不易利用（如圖1）。把這樣的內(nèi)容轉(zhuǎn)換成漢字表述是經(jīng)常要進(jìn)行的操作。因此，利用宏對平時(shí)經(jīng)常要進(jìn)行的操作進(jìn)行合理的錄制，并與代碼的含義結(jié)合，編制了一個(gè)包含可以對顏色、巖性、含油級別欄從代碼到漢字的轉(zhuǎn)換的宏。在打開包含這個(gè)宏的一個(gè)空工作表后，選中巖屑描述記錄要轉(zhuǎn)換的列，運(yùn)行宏（圖2），即可自動(dòng)轉(zhuǎn)換為（圖3）所示的漢字表示。

代碼的轉(zhuǎn)換按照新生代軟件代碼表的定義進(jìn)行，不會(huì)產(chǎn)生轉(zhuǎn)換錯(cuò)誤。需要說明的是，這個(gè)宏的編寫也不是很勞累的一行接著一行寫下來的，而是利用EXCEL表格的公式產(chǎn)生后粘貼過來的。

2 合并多張工作表

綜合錄井班報(bào)表一般都是用EXCEL編寫的，有的分隊(duì)采用一個(gè)班一張工作表，這樣一個(gè)班報(bào)表文件如果是一個(gè)月就有60張左右的工作表。在上交過程中，有時(shí)又要求所有的內(nèi)容都在一張工作表上。對于內(nèi)容少的班報(bào)表來說，這個(gè)操作不算太費(fèi)事，一張一張復(fù)制粘貼過來即可；但是如果是建井周期比較長的井呢？因此，編者采用VBA語言，針對錄井班報(bào)表的特點(diǎn)，編制了一個(gè)宏，利用它可以快速對一個(gè)EXCEL文件中多張工作表的內(nèi)容復(fù)制到一張工作表上，并調(diào)整好格式。3 結(jié)語

這兩個(gè)實(shí)例就是使用宏記錄器記錄的用戶的各種操作代碼以及VBA自帶的編程語言，使日常工作轉(zhuǎn)換為VBA 程序代碼，實(shí)現(xiàn)工作自動(dòng)化。

我把這兩個(gè)程序也推薦給其他作業(yè)隊(duì)和地質(zhì)評價(jià)中心使用，反映良好，大大的節(jié)約了時(shí)間。

以后的工作設(shè)想是爭取利用VBA實(shí)現(xiàn)資料數(shù)據(jù)在多種軟件之間的快速遷移。避免在A7系統(tǒng)、勘探生產(chǎn)信息系統(tǒng)和新生代軟件中重復(fù)多次地進(jìn)行資料錄入。

事實(shí)上，VBA比較容易于學(xué)習(xí)掌握，利用好它，可以充分提高我們的工作效率，如果普遍使用，一定會(huì)使我們的工作有一個(gè)嶄新的面貌。

參考文獻(xiàn)

[1] 李兆群.錄井技術(shù)現(xiàn)狀及發(fā)展趨勢[J].石油科技論壇，2010（6）.

[2] 黃晨翔.油田錄井技術(shù)應(yīng)用現(xiàn)狀與發(fā)展對策分析[J].現(xiàn)代商貿(mào)工業(yè)，2011（11）.

[3] 竇景山.如何利用VBA對word操作自動(dòng)評分[J].科技致富向?qū)В?013（17）.

[4] 王志華，蒲前梅，張玉波，等.利用VBA實(shí)現(xiàn)Excel電子表格（工資報(bào)表）自動(dòng)分頁統(tǒng)計(jì)[J].青海石油，2008（4）.endprint