1
摘要:本文詳細(xì)介紹了采用Excel電子表格通過VBA語言結(jié)合Access數(shù)據(jù)庫及GB/T12706國家標(biāo)準(zhǔn)要求,方便快捷計算電纜假設(shè)結(jié)構(gòu)尺寸,從而確定電纜護(hù)層結(jié)構(gòu)尺寸。 關(guān)鍵詞:Excel VBA語言 A Lu ZhengRong (Far East Cable Co.,Ltd Abstract: The article details a method for rapidly calculating fictitious dimensions of cable construction and determine n of sheath dimensions through Excel format by combinating with Access database and GB/T12706 standard. Key words: Excel VBA language, Access database, GB/T12706, fictitious construction dimensions, sheath construction dimensions 1 電纜制造工藝設(shè)計和計算是一項很繁瑣的工作,特別是隨著社會現(xiàn)代化進(jìn)程加快,電纜的結(jié)構(gòu)品種也越來越多,競爭也越來越激勵,如何準(zhǔn)確、快速反應(yīng)是成功的主要因素。 電力電纜結(jié)構(gòu)尺寸計算過程中,護(hù)層尺寸的確定都是以GB/T12706 電纜結(jié)構(gòu)工藝及材料定額報表主要以Excel 本文通過GB/T12706 2 2.1 計算標(biāo)準(zhǔn) 電力電纜假設(shè)外徑以及護(hù)層尺寸計算已經(jīng)標(biāo)準(zhǔn)化( 2.2 計算結(jié)構(gòu)分析 按GB/T12706標(biāo)準(zhǔn)描述,電力電纜結(jié)構(gòu)從內(nèi)到外依次有導(dǎo)體、絕緣、成纜內(nèi)芯、內(nèi)襯層、填充、金屬屏蔽層、同心導(dǎo)體、鉛套、隔離套、鋼帶鎧裝、細(xì)鋼絲鎧裝、粗鋼絲鎧裝、外護(hù)套等13部分組成。根據(jù)電纜使用場合不同結(jié)構(gòu)也不同,但不外乎于這13個部分的若干部分組合而成。具體結(jié)構(gòu)組合如圖1。 圖1 電纜結(jié)構(gòu)計算框架 3 設(shè)計程序過程中,首先根據(jù)使用需要建立主程序框架結(jié)構(gòu);其次通過框架結(jié)構(gòu)建立電纜假設(shè)結(jié)構(gòu)計算模型,然后依據(jù)這模型編寫自定義函數(shù)代碼;再次將函數(shù)與Excel 3.1 軟件語言及軟件準(zhǔn)備 為了達(dá)到使用的方便性及簡潔性的效果,這里除了最常用的Office辦公軟件外不需要其它任何專業(yè)應(yīng)用軟件,代碼編寫語言同樣采用Office辦公軟件自帶的Visual Basic For Applications(簡稱VAB)語言編寫。 3.2 程序結(jié)構(gòu)框架 本程序為了達(dá)到操作簡易性和通用性,將Office 操作 調(diào)用 調(diào)用 計算對話框 Access 數(shù)據(jù)庫 VBA 代碼計算 調(diào)用 圖2. 3.3 程序代碼建立 3.3.1 VBA標(biāo)準(zhǔn)模塊邏輯模型設(shè)計 圖3 VBA 3.3.2 VBA標(biāo)準(zhǔn)模塊代碼設(shè)計 VBA標(biāo)準(zhǔn)模塊代碼的功能就是通過代碼根據(jù)3.3.1條款VBA標(biāo)準(zhǔn)模塊邏輯模型來完成計算的過程。本程序是建立在Excel系統(tǒng)背景上的,而為了提高計算操作的簡便性,將代碼編制成Excel系統(tǒng)可以使用的函數(shù)形式,在Excel中使用可以實現(xiàn)單元格的下拉復(fù)制粘貼功能,并且根據(jù)引用的單元格數(shù)據(jù)不同自動計算出不同結(jié)果。函數(shù)名稱為:假設(shè)外徑計算(規(guī)格, 電壓等級, 絕緣材料, 電纜結(jié)構(gòu))。 3.4 程序的視窗化 為了提高本程序操作的簡便性,讓操作視窗化,在Excel菜單欄中增加了工具條如圖4,另外,在Excel后臺設(shè)置對話框窗體,在計算過程中調(diào)用計算對話框窗體如圖5,在前臺按對話框的提示用鼠標(biāo)選擇對應(yīng)的單元格,從而記錄下需要計算的Excel單元格地址及數(shù)據(jù),將數(shù)據(jù)送到Excel后臺計算,并將計算結(jié)果輸出到指定單元格內(nèi),完成計算任務(wù)。由于本程序使用的是函數(shù)編程及單元格地址引用取數(shù),所以可是使用單元格的下拉復(fù)制粘貼功能進(jìn)行大量數(shù)據(jù)自動化處理,加快了操作計算速度。 圖 4 圖 5 4 根據(jù)GB/T12706 5 采用VBA語言進(jìn)行編程,可以解決繁雜的工藝設(shè)計和計算,結(jié)果準(zhǔn)確。另外該程序可以在Excel電子表格中運行。一方面操作簡單易學(xué),另一方面可以進(jìn)行大批量的數(shù)據(jù)處理,而且將來數(shù)據(jù)如需改動,一旦改動已知數(shù)據(jù),結(jié)果立即隨之而變。故通過VBA語言與Excel電子表格相結(jié)合,可以將電纜工藝設(shè)計和計算實現(xiàn)電算化、標(biāo)準(zhǔn)化。 參考文獻(xiàn): [1 ] GB/T12706 , 額定電壓1kV到35kV擠包絕緣電力電纜及附件標(biāo)準(zhǔn),2002 [2 ] 王春江 , 電線電纜手冊 第7篇電線電纜結(jié)構(gòu)計算,2002 [3 ] 劉子玉 , 電力電纜結(jié)構(gòu)設(shè)計原理,西安交大出版社,1995 [4 ] 韓中洗 , 電纜工藝原理,上海電纜研究所信息中心 [5 ] 劉春昉 , VB語言在電纜制造工藝中的應(yīng)用,《電線電纜》2002年第6期20頁
