軌道交通制造業勞動定額技術標準制定程序化方法

于春洋

摘要：按照勞動定額行業標準編制勞動定額技術標準，是軌道交通制造業常用的技術手段。但是，隨著軌道交通車輛產品型號增加，加之行業標準中技術參數繁多、計算公式復雜，勞動定額技術標準的制定工作變得繁重。運用EXCEL中VBA技術實現勞動定額技術標準制定程序化，可大幅縮減技術標準制定時間，從而提高工作效率。

關鍵詞：勞動定額技術標準;程序化;VBA技術

中圖分類號：F24文獻標識碼：Adoi：10.19311/j.cnki.1672-3198.2019.16.026

目前，軌道交通制造業勞動定額技術標準的制定方法一般包括經驗估工法、類推比較法、技術測定法等。隨著軌道交通制造業的發展，軌道交通車輛產品型號日漸增加，使用經驗估工法等傳統方法很難在產品投產前科學合理的制定出新產品勞動定額技術標準，使用勞動定額行業標準制定勞動定額技術標準時，需投入大量時間查閱行業標準確定各類技術參數，存在耗時長、計算精度低等缺點。本文以軌道交通制造業鉚工勞動定額制定行業標準為例，介紹通過EXCEL VBA技術使勞動定額技術標準制定的程序化方法，減少技術標準制定時間，從而提高工作效率。

1VBA技術簡介

VBA（簡稱“Visual Basic for Applications”） 是Visual Basic的一種宏語言，是微軟開發出來在其應用程序中執行通用的自動化（OLE）任務的編程語言。VBA的主要功能是用來擴展Windows的應用程序功能，尤其是Microsoft Office軟件。通過VBA技術，用戶可以創建自定義的功能，從而實現用戶所的個性化需求。

2軌道交通制造業勞動定額技術標準制定流程

以鐵路工業鉚工勞動定額制定標準（LD/T71.8-2000）為例，首先介紹勞動定額技術標準制定流程。

（1）確定各工序適用標準。新產品的技術文件確定后，勞動定額技術標準編制人員首先對各個工藝流程進行詳細分解，確定各個工序所適用的行業標準，軌道交通制造業勞動定額標準包括鐵路工業鉚工勞動定額制定標準（LD/T71.8-2000）、軌道交通裝備制造業鉆床加工勞動定額（LD/T 71.5-2009）等行業標準，本文以鉚工工序為例，即適用標準為前者。

（2）確定技術參數。適用標準確定后，根據標準中所適用的數學模型確定技術參數。技術參數包括兩部分：第一部分技術參數來自工序所加工部件的自身屬性，如板材厚度、公差、重量等技術參數，這部分技術參數需通過查閱相關工序的技術圖紙以及工藝流程來確定。第二部分技術參數為標準中數學模型的系數，如公差系數、批量系數等技術參數。通常第二部分技術參數的選取取決于第一部分技術參數。

（3）勞動定額技術標準計算。技術參數確定完畢后，需將所有數據帶入對應標準的對應數學模型中，從而確定本工序的勞動定額技術標準。

3勞動定額技術標準制定程序化方法

勞動定額技術標準制定程序化的方法是利用EXCEL中VBA代碼將勞動定額技術標準制定的流程進行程序化處理，從而使工作變得高效精準。

現對鉚工勞動定額技術標準進行程序化處理。鉚工勞動定額技術標準的數學模型如下所示，第一個公式適用于組裝部件總質量小于36千克的情況;第二個公式適用于組裝部件總質量介于36-400千克的情況;第三個公式適用于組裝部件總質量大于400千克的情況。

Tdn=（1.6955N0.7685+0.3286G+1.71）K1K2K3K4

Tdn=（4.9955N0.6162+0.0671G+3.65）K1K2K3K4

Tdn=（5.5683N0.7685+0.0128G+11.9）K1K2K3K4

通過分析，不同質量區間的組裝部件對應不同的數學模型。利用InputBox函數彈出輸入對話框，用戶輸入組裝部件的配件數量N及總質量G，然后通過If函數自行選擇數學模型。

InputBox函數語法結構：

InputBox[$]（提示[，標題][，默認值][，x坐標，y坐標]）

If函數語法結構：

If條件表達式then

語句塊1

Else

語句塊2

End If

系數K1、K2、K3、K4分別為批量系數、厚度系數、胎模工裝系數、公差系數。這四個系數具有同一個特點，即在有限的選擇情況下，不同的輸入數據對應不同的系數，如表1批量系數所示。根據這樣的系數選擇特點，可通過InputBox函數實現，在InputBox的提示信息欄注明系數選擇的原則，便于用戶閱讀即可。

最終的計算結果通過消息對話框Msgbox輸出，將計算結果告知用戶。

Msgbox函數語法結構：

Msgbox（prompt[，buttons][，title][，helpfile，context]）

綜合分析后，鉚工勞動定額技術標準程序化處理的VBA代碼如下所示。由于文章篇幅有限，在編寫代碼時，四個系數中只考慮批量系數K1，其余三個代碼的加載方式完全類似。

Sub 鉚工勞動定額技術標準（）

Dim T， N， G， K1 As Single

N = InputBox（“請輸入配件數量”， “配件數量輸入框”）

G = InputBox（“請輸入組裝部件總質量”， “組裝部件總質量輸入框”）

K1 = InputBox（“批量小于等于10，系數為2” & Chr（10） & Chr（13） & “批量大于10小于50，系數為1.6” & Chr（10） & Chr（13） & “批量大于50小于等于100，系數為1.3” & Chr（10） & Chr（13） & “批量大于100，系數為1”）

If G <= 36 Then

T = （1.6955 * N ^ （0.7685） + 0.3286 * G + 1.71） * K1

Else

If G < 400 Then

T=（4.9555 * N ^ （0.6162） + 0.0671 * G + 3.65） * K1

Else

T = （5.5683 * N ^ （0.7685） + 0.0128 * G + 11.9） * K1

End If

End If

MsgBox （“計算結果為” & T）

End Sub

4結語

通過實例應用可以將計算勞動定額技術標準的傳統計算方法與程序化計算方法進行比較，各過程的實現方式對比如表2所示。通過對比分析，程序化方法主要在第二、三步節省了大量時間，在確定技術參數時，傳統計算方法需要花費大量時間查閱標準中的各類系數，而程序化方法將選擇的過程程序化。在計算數學模型時，傳統計算方法通過手工輸入計算公式求解，而程序化方法已經將數學模型程序化，無需反復輸入數學模型，從而節省大量時間。當進行批量計算勞動定額技術標準時，程序化方法的效率優勢將更加明顯。

通過鉚工勞動定額技術標準程序化計算方法，大幅減少計算時間，可以采用同樣的思想，將焊接、機加工等常用工序的標準進行程序化處理，以便在新產品投產前以較少的人工投入編織出科學合理的勞動定額技術標準。

參考文獻

[1]張巖艷，嚴晨.活用EXCEL VBA讓你的工作化繁為簡[M].北京：機械工業出版社，2016：17-20.

[2]LD/T 71.5-2009， 鐵路工業鉚工勞動定額制定標準[S].2009.

[3]明日科技.Visual Basic從入門到精通[M].北京：清華大學出版社，2016：258-259.