2013-10-29 44 views
1

我認爲一個簡單的數學問題,我正在尋找一種算法四捨五入到最接近的甚至整個號碼,以便四捨五入到最接近的偶數

4.4 = 6 
5.1 = 6 
2.1 = 4 
1.9 = 2 etc.... 

如果你能給我一個VBA語法那將是真棒。 我知道excel爲=even(..)函數,但我無法使它在VBA中工作。

謝謝

+0

不應4.4是5? –

+1

下一個* even * number –

+0

Hi Le_Morri,no。我正在尋找最近的_even_號碼 – Seb

回答

4

你可以簡單的使用使用Excel函數:

Application.WorksheetFunction.Even(YourNumber) 
+0

+ 1你擊敗了我。 –

+0

太棒了!謝謝 – Seb