基于Excel VBA開發(fā)的電纜號(hào)牌套管管理系統(tǒng)

潘有思　趙軍偉　鐘金金

摘 要：電纜敷設(shè)及接線一直是電廠電氣儀控安裝工作中最為繁瑣、工作量最大的一項(xiàng)工作，該文針對(duì)電纜接線以及電纜號(hào)牌套管制作中存在的問題，利用Excel VBA（Visual Basic Application）語(yǔ)言開發(fā)出了一套電纜套管及號(hào)牌管理系統(tǒng)，并利用VB（Visual Basic）語(yǔ)言將其封裝成可安裝于Excel插件欄的軟件，從而進(jìn)行電纜清冊(cè)、電纜接線圖、電纜號(hào)牌以及套管模板的制作，將重復(fù)繁瑣的工作交由程序完成，使技術(shù)準(zhǔn)備工作自動(dòng)化、模塊化的處理，提高了效率，保證了準(zhǔn)確性，達(dá)到節(jié)約成本的目的。

關(guān)鍵詞：電纜接線 號(hào)牌套管 軟件開發(fā) Excel VBA

中圖分類號(hào)：TM769 文獻(xiàn)標(biāo)識(shí)碼：A 文章編號(hào)：1674-098X（2016）01（c）-0008-02

目前國(guó)內(nèi)電力建設(shè)施工周期短，現(xiàn)場(chǎng)施工與設(shè)計(jì)院出圖往往是同步進(jìn)行，這就造成了施工技術(shù)人員前期的技術(shù)工作準(zhǔn)備時(shí)間非常有限。再加上進(jìn)度質(zhì)量上的要求，就需要技術(shù)人員在保證質(zhì)量的前提下快速地完成電纜清冊(cè)的整理、電纜接線圖的繪制、以及電纜號(hào)牌和套管的制作等工作。

目前，電纜清冊(cè)、電纜接線圖、電纜號(hào)牌以及電纜套管的制作都是停留在手動(dòng)階段，并且模板相對(duì)的不統(tǒng)一，每個(gè)工程在這些方面都要花費(fèi)大量的人力和物力進(jìn)行前期準(zhǔn)備工作，為了能夠更好地適應(yīng)電力建設(shè)施工的需要，對(duì)于電纜敷設(shè)及接線的前期技術(shù)準(zhǔn)備工作的自動(dòng)化、模塊化辦公就顯得尤為重要。因此，開發(fā)一款適用于此項(xiàng)技術(shù)工作的系統(tǒng)還是非常有必要的。筆者借助Office辦公軟件用VBA編程語(yǔ)言開發(fā)出統(tǒng)一的電纜號(hào)牌套管管理系統(tǒng)，進(jìn)行電纜清冊(cè)、電纜接線圖模板、電纜號(hào)牌模板以及套管模板的制作。將大量的技術(shù)準(zhǔn)備工作自動(dòng)化、模塊化的處理，提高效率，節(jié)約成本。

1 軟件關(guān)鍵技術(shù)及功能介紹

1.1 關(guān)鍵技術(shù)及創(chuàng)新點(diǎn)

基于Office后臺(tái)開發(fā)語(yǔ)言Excel VBA、Word VBA進(jìn)行開發(fā)，然后利用Visual Basic 6.0將軟件進(jìn)行加密封裝成可執(zhí)行文件，安裝后直接加載成至Excel插件欄；疏理電纜敷設(shè)和接線技術(shù)準(zhǔn)備工作的流程，將畫接線圖過程中的重復(fù)操作模塊化、自動(dòng)化完成，以及將電纜號(hào)牌和套管批量化生成，減少了工作中大量手動(dòng)的重復(fù)工作。

1.2 功能介紹

1.2.1 將整理的清冊(cè)自動(dòng)生成標(biāo)準(zhǔn)化接線圖模板

此模塊提供了電纜接線圖自動(dòng)生成的功能，將日常工作手動(dòng)逐行插入和填寫編號(hào)的工作進(jìn)行自動(dòng)化生成，避免了手動(dòng)操作過程中的人為失誤，并能夠?qū)⒋瞬糠止ぷ鳂?biāo)準(zhǔn)化處理。

1.2.2 將接線圖自動(dòng)生成電纜套管并按照電纜截面積分類

人工勾選電纜規(guī)格的方式來選擇需要打印的電纜套管費(fèi)事費(fèi)力且易出錯(cuò)，此模塊可以輕松按照電纜芯截面積篩選出需要打印的電纜套管，從而避免了漏選、錯(cuò)選等情況的發(fā)生。

1.2.3 將電纜清冊(cè)直接生成起點(diǎn)、終點(diǎn)電纜號(hào)牌

此兩個(gè)模塊可以一鍵完成需要打印的電纜起點(diǎn)或者終點(diǎn)號(hào)牌，避免了以前同時(shí)生成起點(diǎn)終點(diǎn)號(hào)牌的不必要浪費(fèi)。

1.2.4 將DCS測(cè)點(diǎn)清冊(cè)直接生成接線圖

此模塊實(shí)現(xiàn)了設(shè)計(jì)院DCS測(cè)點(diǎn)清冊(cè)到接線圖的完整轉(zhuǎn)化，完全不需要進(jìn)行人工的任何處理，保證了接線圖的準(zhǔn)確性和完整性。

1.3 封裝程序

Excel VBA實(shí)現(xiàn)了軟件要求的所有功能，但為了使用戶能夠同使用其他普通軟件一樣在WINDOWS的開始程序菜單中點(diǎn)擊執(zhí)行，就必須編寫一個(gè)能夠?qū)崿F(xiàn)自動(dòng)加載的程序來達(dá)到這一目的：將所有功能加載至Excel插件。筆者按照用戶一一對(duì)應(yīng)的方式，利用VB語(yǔ)言將程序封裝成可安裝至Excel菜單欄的可執(zhí)行文件，既安全可靠又方便操作。VB相關(guān)封裝程序如下。其中安裝后的操作界面如圖1所示。

Sub BD（）'綁定硬盤序列號(hào)封裝

Dim myhard As String

bl = True

If Len（Dir（“C：＼電纜號(hào)牌套管管理＼MIMI.dll”）） = 0 Then MsgBox “缺少文件C：＼電纜號(hào)牌套管管理＼MIMI.dll，當(dāng)前程序不能用?！?， vbOKOnly + vbInformation： bl = False： Exit Sub

Dim iRetVal As Long

Dim sID As String， retHardwareID As String

retHardwareID = String（256， vbNullChar）

iRetVal = GetHardwareID_vba（True， False， False， False， “R5LR-S4TQ”， retHardwareID） ‘硬盤

myhard = Left（retHardwareID， InStr（1， retHardwareID， vbNullChar） - 1）

If myhard = “128E-98FF-C394-1415” Then Exit Sub ‘硬盤序列號(hào)

bl = False

End Sub

2 預(yù)計(jì)達(dá)到的技術(shù)經(jīng)濟(jì)指標(biāo)

疏理電纜敷設(shè)和接線技術(shù)準(zhǔn)備工作的流程，將電纜清冊(cè)、電纜接線圖、電纜號(hào)牌以及電纜套管的制作等繁雜的操作模塊化、自動(dòng)化完成，減少工作中幾乎所有的手工工作。軟件投入使用后至少節(jié)省60%的時(shí)間，且大大提高了準(zhǔn)確率。以一臺(tái)機(jī)組為例，至少節(jié)約120個(gè)工日的費(fèi)用，按照10個(gè)項(xiàng)目15臺(tái)機(jī)組同時(shí)施工來計(jì)算，就可以減少1 800個(gè)工日，按400元/工日來計(jì)的話，直接經(jīng)濟(jì)效益就是72萬(wàn)元。

3 軟件使用情況和存在問題

電纜號(hào)牌套管管理軟件自2012年6月開發(fā)完成調(diào)試運(yùn)行后一直使用至今，能夠準(zhǔn)確的、自動(dòng)的、批量的完成電纜敷設(shè)和電纜接線前的所有繁雜重復(fù)的工作，極大程度地提高了技術(shù)人員的工作效率。事實(shí)證明，該系統(tǒng)已經(jīng)實(shí)現(xiàn)了預(yù)期的所有功能；同時(shí)，經(jīng)過十多個(gè)項(xiàng)目的技術(shù)人員的運(yùn)行也充分證明了該系統(tǒng)具有很高的穩(wěn)定性和可靠性。但在運(yùn)行中，也存在一定的問題，由于號(hào)牌生成模塊需要調(diào)用Word文件，因此，當(dāng)數(shù)據(jù)量過大時(shí)，號(hào)牌生成速度會(huì)比較慢。這是以后需要加以改進(jìn)之處。

4 結(jié)語(yǔ)

傳統(tǒng)的方法是直接利用Excel手動(dòng)來實(shí)現(xiàn)這一系列工作，其工作量大而繁瑣，而且由于數(shù)據(jù)量大，也極易出錯(cuò)。該文中，該系統(tǒng)是集電纜清冊(cè)制作，電纜接線圖模板生成，電纜號(hào)牌以及電纜套管的制作為一體的電纜管理系統(tǒng)，將技術(shù)人員日常繁瑣復(fù)雜的技術(shù)準(zhǔn)備工作標(biāo)準(zhǔn)化、統(tǒng)一化、自動(dòng)化的實(shí)現(xiàn)，最終達(dá)到提高生產(chǎn)效率，降低工作成本的目的，具有很高的實(shí)用價(jià)值。

參考文獻(xiàn)

[1] 羅剛君.Excel VBA程序開發(fā)自學(xué)寶典[M].北京：電子工業(yè)出版社，2011：664-684.

[2] 朱培育，朱佳苗，趙俊香，等.Excel VBA數(shù)據(jù)處理軟件開發(fā)[J].地震地磁觀測(cè)與研究，2006（27）：108-115.

[3] 陸正榮.用VBA對(duì)Excel中電纜工藝結(jié)構(gòu)計(jì)算的擴(kuò)展[J].光纖與電纜及其應(yīng)用技術(shù)，2006（5）：18-20.