/ 日照市計量測試所

0 引言

在計量部門，對計量器具檢定完畢，在后續(xù)數(shù)據(jù)處理過程中，對 “四舍五入”的問題要求嚴(yán)格。為盡量把測量誤差做到最小，往往要求遵循“四舍六入，逢五奇進(jìn)偶舍”原則，在手工計算的時候可以人工操作，做出取與舍的判斷。隨著計算機的不斷普及，很多計量部門都利用Excel電子表格軟件編制了相應(yīng)的計量公式計算軟件。Excel處理數(shù)據(jù)中只有“四舍五入”的函數(shù)（ROUND）命令，對數(shù)值進(jìn)行“四舍六入，逢五奇進(jìn)偶舍”時，大眾化的Excel卻沒有提供一個滿足此要求的現(xiàn)成函數(shù)，這在很大程度上限制了人們對Excel的運用。如何解決此類問題，成了很多部門的一個現(xiàn)實難題。

1 分析

為了徹底解決此問題，首先按進(jìn)位要求進(jìn)行分析。根據(jù)GB/T 8170-2008《數(shù)值修約規(guī)則與極限數(shù)值的表示和判定》的要求，數(shù)值的修約采用“四舍六入”法：“4舍6入5看齊，5后有數(shù)進(jìn)上去，尾數(shù)為零向左看，左數(shù)奇進(jìn)偶舍棄”（5后全為零奇進(jìn)偶不進(jìn)）。所謂“四舍六入”，即所要的最后一位數(shù)字后的那個數(shù)字如果是4就舍去，是6就進(jìn)位。所謂“逢五奇進(jìn)偶舍”，即最后一位數(shù)字后的那個數(shù)字，如果是5時就進(jìn)行繼續(xù)判斷，若5后面不是0，那就進(jìn)位；若是0則看前一位數(shù)字，若是奇數(shù)則進(jìn)位，否則舍去。經(jīng)過以上分析，可以總結(jié)為：能夠進(jìn)位的情況就是兩種，第一種是：到需要取舍位置的時候，先看后面的2位數(shù)字，如果大于51，則進(jìn)位。第二種是：需要取舍位置的最后一位是奇數(shù)并且后面的一位是數(shù)字5。經(jīng)過如此總結(jié)，可以得出：所有需要進(jìn)位的數(shù)字，只要在需要取舍位置的最后加上49就可以了，最后需要的有效位數(shù)為奇數(shù)時，在需要取舍位置的最后加上50也可以了。

2 編程

有了上述基礎(chǔ)就可以進(jìn)行編程了。把函數(shù)名稱定為：SWL (x, y)，x：需要奇進(jìn)偶舍的數(shù)，y：保留的有效位數(shù)。具體編寫如下：

有了如上程序，只要加入到Excel中就可以隨時運用了。

具體加入方法：

1）首先打開Excel，選擇菜單“工具→宏→Visual Basic編輯器”命令(或按下鍵盤Alt+F11組合鍵 )，打開 Visual Basic 窗口。

2）進(jìn)入Visual Basic窗口后，選擇菜單“插入→模塊”命令，于是得到“模塊1”，按命令格式輸入。在第一行輸入：Function SWL (x, y) As Double，然后輸入以上內(nèi)容，在最后一行輸入End Function即可。

3）函數(shù)自定義完成后，選擇菜單“文件→關(guān)閉并返回到Microsoft Excel”命令，返回到Excel工作表窗口。SWL（四舍六入）函數(shù)與Excel自帶的ROUND（四舍五入）函數(shù)使用方法完全一樣。當(dāng)結(jié)果數(shù)保留到小數(shù)位時，Y為大于0的任何整數(shù)；當(dāng)結(jié)果數(shù)保留到個位時，Y為0 ；當(dāng)結(jié)果數(shù)保留到十位、百位時，Y為-1、-2。

4）通常自定義的函數(shù)只能在當(dāng)前工作薄使用，如果該函數(shù)需要在其他工作薄中使用，則選擇菜單“文件→另存為”命令，打開“另存為”對話框，選擇保存類型為“Microsoft Excel加載宏”，然后輸入一個文件名，如“SWL”，單擊“保存”后文件就被保存為加載宏。然后選擇菜單“工具→加載宏”命令，打開“加載宏”對話框，勾選“可用加載宏”列表框中的“SWL”復(fù)選框即可，單擊“確定”按鈕后，就可以在本機上的所有工作薄中使用SWL這個自定義函數(shù)了。

5）如果想要在其他機器上使用該自定義函數(shù)，只要把上面的加載宏文件復(fù)制到其他計算機上加載宏的默認(rèn)保存位置即可。

3 結(jié)語

本函數(shù)可以在Excel表中隨意運用。經(jīng)過在計量加油機軟件計算中長時間應(yīng)用，證明其完全滿足要求，沒有差錯，數(shù)字位數(shù)多了也不會出現(xiàn)任何問題。

[1]劉仁釗.測量誤差與數(shù)據(jù)處理[M].武漢：武漢大學(xué)出版社，2013.

[2]全國統(tǒng)計方法應(yīng)用標(biāo)準(zhǔn)化技術(shù)委員會.GB/T 8170-2008[S].北京：中國標(biāo)準(zhǔn)出版社，2008.

[3]Excel Home.Excel數(shù)據(jù)處理與分析實戰(zhàn)技巧精粹[M].北京：人民郵電出版社，2008.