水利工程論文-excel自定義函數在水質工作中的應用摘要：Excel是大家非常熟悉的應用軟件，其使用非常方便。尤其是其強大的函數功能，為我們帶來了極大方便，但有時我們為實現一項規定的功能，可能用到幾個函數或者采用嵌套函數，這樣應用起來，也不太方便；或者使用自定義公式進行計算，就沒有現成的公式可用?？上驳氖?，我們可以創建自定義函數UDF(Userdefinedfunction)，它的運行與Excel中自帶的函數完全相同。建立自定義函數有以下幾個優點：建立自己特殊的功能和名稱的函數；能將復雜的、嵌套的、多個原有的函數組合在一起，發揮更大的威力，使用、維護更加方便。關鍵詞：函數水質應用Excel是大家非常熟悉的應用軟件，其使用非常方便。尤其是其強大的函數功能，為我們帶來了極大方便，但有時我們為實現一項規定的功能，可能用到幾個函數或者采用嵌套函數，這樣應用起來，也不太方便；或者使用自定義公式進行計算，就沒有現成的公式可用?？上驳氖?，我們可以創建自定義函數UDF(Userdefinedfunction)，它的運行與Excel中自帶的函數完全相同。建立自定義函數有以下幾個優點：建立自己特殊的功能和名稱的函數；能將復雜的、嵌套的、多個原有的函數組合在一起，發揮更大的威力，使用、維護更加方便。比如在水質計算中，高錳酸鹽指數的計算公式非常繁瑣，而且含必須將結果修約至0.1，還得考慮逢5奇進偶舍的問題。利用計算器逐步計算很是麻煩；在EXCEL中利用單元格引用計算稍有不注意，可能造成計算上差錯，而且每次都得建立，很不方便?，F在我們利用EXCEL自帶的VBA編輯器建立自己的函數來解決這個問題。首先進入Excel，在工具宏VisulBasic編輯器(也可按組合鍵Alt+F11)，在“VisulBasic編輯器”中選擇插入添加模塊，將模塊名稱改為“高錳酸鹽指數濃度計算公式”，在代碼窗口輸入下列函數：PublicFunctionCImn(CAsSingle,V0AsSingle,V1AsSingle,V2AsSingle,VAsInteger)高錳酸鹽指數計算公式DimDotLocationAsInteger定義小數點位置變量*CImn=(10+V1)*10/V2-10)-(10+V0)*10/V2-10)*(100-V)/100)*C*8000/V*保留一位小數當CIMN值小于1時，自動補上個位0IfCImn1ThenCImn=0&CImnEndIf確定小數點的位置DotLocation=InStr(CImn,.)判斷小數點后第二位是否為5IfMid(CImn,DotLocation+2,1)=5ThenIfLen(CImn)=DotLocation+2AndMid(CImn,DotLocation+1,1)Mod2=0ThenCImn=Left(CImn,DotLocation+1)為5且5后沒有數和5前一位為偶數，直接用round()函數修約ElseCImn=Round(CImn,1)EndIfElseCImn=Round(CImn,1)不為5，直接用round()函數修約EndIfCImn=Format(Round(CImn,1),#0.0)EndFunction我們知道，Excel中函數都有一個說明用以幫助使用，我們也要給這個函數添加一個說明。在工具欄中選擇“對象瀏覽器”(如圖1)，選擇我們所做“高錳酸鹽指數濃度計算公式”模塊，在其右鍵屬性中添加關于對這個函數的描述，這個描述將出現在Excel中關于函數的說明中，如果你要對軟件保密的話，在“模塊”上按右鍵，VBAproject屬性保護中設置密碼，別人就看不到你的源程序了。圖1描述函數這時，退出，回到Excel界面，將這個文件另存為：類型為“MicrosoftExcel加載宏”，在Excel2003中，它會自動更改保存位置為“C:DocumentsandSettingswzwemc（電腦用戶名）ApplicationDataMicrosoftAddIns”(系統裝在c:windows)，當然，你也可以把這個文件“高錳酸鹽指數濃度計算公式.xla”，直接復制到officelibrary(office的安裝路徑下)，而在Excel97中只能放在后一個位置。使用函數很簡單，點擊工具加載宏，在你創建的“高錳酸鹽指數濃度計算