胡振國(guó)

【摘 要】 VSP測(cè)井中，使用多級(jí)檢波器時(shí)，電纜提升點(diǎn)與觀測(cè)點(diǎn)深度并不是一一對(duì)應(yīng)，檢波器級(jí)數(shù)的不同、使用的級(jí)間纜長(zhǎng)度不同、觀測(cè)點(diǎn)距的不同，則電纜的提升點(diǎn)會(huì)對(duì)應(yīng)的產(chǎn)生變化，特別是在施工過程中，如果其中某一級(jí)檢波器出現(xiàn)故障需要屏蔽時(shí)，電纜提升點(diǎn)就需要重新計(jì)算，不僅容易出錯(cuò)而且影響施工效率。通過采用Excel編程，實(shí)現(xiàn)觀測(cè)點(diǎn)深度與電纜提升點(diǎn)的自動(dòng)生成，極大的提高了施工效率，保證了電纜深度與采集資料的準(zhǔn)確性。

【關(guān)鍵詞】 VSP測(cè)井 ?觀測(cè)點(diǎn) ?電纜提升點(diǎn) ?Excel編程

1 前言

在VSP測(cè)井中，沿井筒垂直布設(shè)的觀測(cè)點(diǎn)數(shù)量通常達(dá)到數(shù)百個(gè)，但由于井下檢波器級(jí)數(shù)的限制，每次激發(fā)只能觀測(cè)其中某些點(diǎn)（一個(gè)或多個(gè)），因此在施工中，通常采取的方式是，檢波器由井底開始，按照一定間距逐次上提，每上提一次，進(jìn)行一次激發(fā)和觀測(cè)，重復(fù)此過程完成整個(gè)井段所有觀測(cè)點(diǎn)的數(shù)據(jù)采集。

當(dāng)檢波器級(jí)數(shù)為1級(jí)時(shí)，電纜提升點(diǎn)的位置與觀測(cè)點(diǎn)深度是一一對(duì)應(yīng)的關(guān)系，而當(dāng)采用多級(jí)檢波器時(shí)，電纜提升點(diǎn)的位置則會(huì)隨觀測(cè)點(diǎn)位置、檢波器級(jí)數(shù)、級(jí)間纜長(zhǎng)度、觀測(cè)點(diǎn)距的不同而變化，因此在每次施工前都要根據(jù)這些因素提前計(jì)算電纜提升點(diǎn)的位置，以指導(dǎo)電纜、儀器操作人員正確的進(jìn)行施工作業(yè)，同時(shí)在施工過程中因素發(fā)生變化時(shí)，也要及時(shí)的重新計(jì)算電纜提升點(diǎn)的位置，以確保觀測(cè)深度與采集資料的準(zhǔn)確性。

在以往的施工中，往往采用手工計(jì)算，或者使用Excel表格編輯、計(jì)算，雖然也能達(dá)到目的，但是工作量大，容易出錯(cuò)，特別是施工中因素發(fā)生變化時(shí)，重新計(jì)算比較影響施工效率。

因此，借助Excel程序中的VBA編程，實(shí)現(xiàn)觀測(cè)點(diǎn)深度與電纜提升點(diǎn)的自動(dòng)生成，能夠明顯提高施工效率，并且使質(zhì)量控制更為方便、規(guī)范。

2 位置關(guān)系的分析

電纜提升點(diǎn)的位置即為井下檢波器第一級(jí)的位置，當(dāng)檢波器級(jí)數(shù)為1級(jí)時(shí)，電纜提升點(diǎn)的位置與觀測(cè)點(diǎn)深度一一對(duì)應(yīng)，電纜提升點(diǎn)的間距滿足：

S=p

（S：電纜提升點(diǎn)的間距;P：觀測(cè)點(diǎn)距）

當(dāng)檢波器級(jí)數(shù)為多級(jí)時(shí)，在級(jí)間纜長(zhǎng)度與觀測(cè)點(diǎn)距相同的情況下，電纜提升點(diǎn)的間距滿足：

S=n×L

（n：級(jí)數(shù);L：級(jí)間纜長(zhǎng)度）。

當(dāng)檢波器級(jí)數(shù)為多級(jí)時(shí)，觀測(cè)點(diǎn)距小于級(jí)間纜長(zhǎng)度時(shí)，電纜提升點(diǎn)的間距滿足：

（n：級(jí)數(shù);L：級(jí)間纜長(zhǎng)度;P：觀測(cè)點(diǎn)距;i：提升次數(shù)，其值在[1，L/P]區(qū)間內(nèi)循環(huán)）

以上代表了施工中電纜提升點(diǎn)與觀測(cè)點(diǎn)位置的幾種關(guān)系，不論檢波器級(jí)數(shù)、級(jí)間纜長(zhǎng)度、觀測(cè)點(diǎn)距如何變化，電纜提升點(diǎn)的間距變化始終滿足以上函數(shù)關(guān)系。

3 VBA編程實(shí)現(xiàn)

在Excel程序中，可以使用VBA編程對(duì)表格中的各類數(shù)據(jù)進(jìn)行計(jì)算，并控制表格內(nèi)數(shù)據(jù)的顯示。因此，在分析清電纜提升點(diǎn)與觀測(cè)點(diǎn)位置的關(guān)系后，即可以用程序來自動(dòng)計(jì)算并顯示。

程序運(yùn)行設(shè)計(jì)主要包括：數(shù)據(jù)輸入（檢波器級(jí)數(shù)、級(jí)間纜長(zhǎng)度、觀測(cè)點(diǎn)距、最大觀測(cè)深度、最小觀測(cè)深度）;表格內(nèi)容初始化;計(jì)算所有觀測(cè)點(diǎn);賦值給對(duì)應(yīng)單元格;顯示觀測(cè)點(diǎn)深度表及相關(guān)統(tǒng)計(jì)數(shù)據(jù)。

深度點(diǎn)計(jì)算過程的VBA程序代碼：

Forc=1To m

Fori=cTo200Step m

dlcs=dlcs+1

Forn=jbqjs+4To5Step-1

If zdcs_1 < zxcs Then

Cells（i+2，n）.Font.ColorIndex=3

Cells（i+2，n）.Font.Strikethrough=True

ElseIf zdcs_1=zxcsOr zdcs_1=zdcs Then

Cells（i+2，n）.Font.ColorIndex=5

End If

Cells（i+2，n）.Value=zdcs_1

zdcs_1=zdcs_1-jjlcd

Next n

Cells（i+2，4）.Value=i

If zdcs_1

Exit For

End If

Next i

zdcs_1=zdcs_2

zdcs_2=zdcs_2-gcdj

Next c

4 應(yīng)用

4.1 現(xiàn)場(chǎng)快速進(jìn)行電纜提升點(diǎn)與觀測(cè)深度點(diǎn)計(jì)算

在施工中，遇到突發(fā)情況，如儀器不能下到預(yù)定觀測(cè)深度、多級(jí)儀器中有一級(jí)出現(xiàn)故障而減少級(jí)數(shù)施工、臨時(shí)進(jìn)行觀測(cè)點(diǎn)加密等等，施工前編制的深度表即需要進(jìn)行修改，以與實(shí)際情況相匹配，如采用人工計(jì)算，速度慢，出錯(cuò)率高，往往無法匹配高效生產(chǎn)的節(jié)奏。而利用此程序，只需輸入新的參數(shù)，即可瞬間重新計(jì)算電纜提升點(diǎn)與觀測(cè)深度點(diǎn)，極大的提高了施工效率。

4.2 指導(dǎo)電纜、儀器操作員正確作業(yè)，規(guī)范質(zhì)量管理

在施工中，按照行業(yè)規(guī)程要求，電纜與儀器操作員需要每炮互相核對(duì)電纜深度，打印好的深度表可以指導(dǎo)電纜、儀器操作員正確的進(jìn)行電纜提升、資料采集工作，在進(jìn)行深度核對(duì)時(shí)出錯(cuò)率低，確保電纜深度的準(zhǔn)確無誤。

在標(biāo)準(zhǔn)化作業(yè)要求下，每次施工都采用程序提供的打印格式與顯示標(biāo)準(zhǔn)，有利于質(zhì)量管理的規(guī)范性，同時(shí)方便后期的深度核查與工作量統(tǒng)計(jì)。

4.3 深度數(shù)據(jù)可直接導(dǎo)入電子班報(bào)

在以往的施工中，觀測(cè)點(diǎn)深度數(shù)據(jù)需要人工填寫或電腦輸入到班報(bào)中，效率低且出錯(cuò)率高，核查繁瑣。使用程序生成的深度數(shù)據(jù)在格式上與電子班報(bào)一致，可以直接導(dǎo)入電子班報(bào)內(nèi)使用，極大的方便了班報(bào)的填寫，也最大限度減少了人工輸入引起的錯(cuò)誤。特別是深度表重新修改后，能夠在現(xiàn)場(chǎng)快速的對(duì)班報(bào)資料進(jìn)行調(diào)整，縮短了工序時(shí)間。