麻辣家族討論版版 » Excelㄧ般區 » Rounding 函數

返回列表下一主題上一主題發帖

Rounding 函數

中學生 Rank: 2

帖子: 207
主題: 61
精華: 0
積分: 270
點名: 0
作業系統: Vista
軟體版本: office2003
閱讀權限: 20
性別: 女
註冊時間: 2011-3-20
最後登錄: 2023-6-25

1^# 跳轉到 » 正序看帖

字體大小: tT

發表於 2013-11-1 22:55 | 只看該作者

Rounding 函數

有什麼 rounding 函數可以讓例如:

180.05
73.50
79.90
45.20

全部進位為 0.90

答案:
180.90
73.90
79.90
45.90

樓主熱帖

收藏

版主 Rank: 7 Rank: 7 Rank: 7

帖子: 2025
主題: 13
精華: 0
積分: 2053
點名: 0
作業系統: WIN7
軟體版本: Office2007
閱讀權限: 100
性別: 男
來自: 台北市
註冊時間: 2011-3-2
最後登錄: 2024-3-14

論壇榮譽勳章論壇贊助勳章熱烈參與勳章 2014馬年全勤獎章 2015羊年全勤獎章 2016猴年全勤獎章

14^#

發表於 2013-11-2 18:01 | 只看該作者

回復 13# Qin

明確來講就是 >=7.0， <8.0 都是 7.9
用 INT(數值)+0.9比較明確

不建議使用 ROUND函數

{...} 表示需要用 CTRL+SHIFT+ENTER 三鍵輸入公式

中學生 Rank: 2

帖子: 207
主題: 61
精華: 0
積分: 270
點名: 0
作業系統: Vista
軟體版本: office2003
閱讀權限: 20
性別: 女
註冊時間: 2011-3-20
最後登錄: 2023-6-25

13^#

發表於 2013-11-2 14:42 | 只看該作者

回復 Qin

樓主，>7.9
ML089 發表於 2013-11-2 14:38

7.90 沿用
8.00 就進位為 8.90

版主 Rank: 7 Rank: 7 Rank: 7

帖子: 2025
主題: 13
精華: 0
積分: 2053
點名: 0
作業系統: WIN7
軟體版本: Office2007
閱讀權限: 100
性別: 男
來自: 台北市
註冊時間: 2011-3-2
最後登錄: 2024-3-14

論壇榮譽勳章論壇贊助勳章熱烈參與勳章 2014馬年全勤獎章 2015羊年全勤獎章 2016猴年全勤獎章

12^#

發表於 2013-11-2 14:38 | 只看該作者

回復 1# Qin

樓主，>7.9 <8.0 這一段是要變成 7.9或8.9

{...} 表示需要用 CTRL+SHIFT+ENTER 三鍵輸入公式

博士班 Rank: 6 Rank: 6

帖子: 2035
主題: 24
精華: 0
積分: 2031
點名: 0
作業系統: Win7
軟體版本: Office2010
閱讀權限: 100
性別: 男
註冊時間: 2012-3-22
最後登錄: 2024-2-1

11^#

發表於 2013-11-2 07:49 | 只看該作者

有什麼 rounding 函數可以讓例如:

180.05
73.50
79.90
45.20

全部進位為 0.90

答案:
180.90
...
Qin 發表於 2013-11-1 22:55

提供你兩種模式處理方式：
1. 使用公式：

=INT(A1)+0.9

複製代碼

. . . . .

=INT(A4)+0.9

複製代碼

2. 使用 VBA 處理：

Sub Ex()
Dim rng As Range
For Each rng In Range("A1", Range("A" & Rows.Count).End(xlUp))
rng.Offset(, 1) = Int(rng) & ".9"
Next
End Sub

複製代碼

如果使用 Round 方式： (譬如： A3 = 79.9； E3 = ？)

=ROUND(A3,0)+0.9

複製代碼

或者是

Sub Ex()
Dim rng As Range
For Each rng In Range("A1", Range("A" & Rows.Count).End(xlUp))
rng.Offset(, 1) = Int(rng) & ".9"
rng.Offset(, 4) = Round(rng, 0) & ".9"
Next
End Sub

複製代碼

E3 的結果等於 80.9。
所以使用 INT() 會去掉 number 的小數部份而傳回剩下的整數 (79.9)。
如考慮有負值時，則建議使用 Fix() 函數。

高中生 Rank: 3 Rank: 3

帖子: 605
主題: 92
精華: 0
積分: 648
點名: 0
作業系統: windows
軟體版本: 7
閱讀權限: 50
性別: 男
來自: macau
註冊時間: 2013-4-5
最後登錄: 2019-2-10

熱烈參與勳章好學求知勳章

10^#

發表於 2013-11-2 00:37 | 只看該作者

=CEILING(A1+1E-13,1)-0.1

ss

高中生 Rank: 3 Rank: 3

帖子: 605
主題: 92
精華: 0
積分: 648
點名: 0
作業系統: windows
軟體版本: 7
閱讀權限: 50
性別: 男
來自: macau
註冊時間: 2013-4-5
最後登錄: 2019-2-10

熱烈參與勳章好學求知勳章

9^#

發表於 2013-11-2 00:36 | 只看該作者

=ROUNDUP(A1+1E-13,0)-0.1

ss

高中生 Rank: 3 Rank: 3

帖子: 605
主題: 92
精華: 0
積分: 648
點名: 0
作業系統: windows
軟體版本: 7
閱讀權限: 50
性別: 男
來自: macau
註冊時間: 2013-4-5
最後登錄: 2019-2-10

熱烈參與勳章好學求知勳章

8^#

發表於 2013-11-2 00:19 | 只看該作者

=IF(ISERR(FIND(".",A1)), A1 &".9",LEFT(A1,FIND(".",A1))&"9")

ss

高中生 Rank: 3 Rank: 3

帖子: 605
主題: 92
精華: 0
積分: 648
點名: 0
作業系統: windows
軟體版本: 7
閱讀權限: 50
性別: 男
來自: macau
註冊時間: 2013-4-5
最後登錄: 2019-2-10

熱烈參與勳章好學求知勳章

7^#

發表於 2013-11-2 00:16 | 只看該作者

來個複雜的
=IFERROR(LEFT(A1,FIND(".",A1))&"9", A1&".9")

ss

高中生 Rank: 3 Rank: 3

帖子: 605
主題: 92
精華: 0
積分: 648
點名: 0
作業系統: windows
軟體版本: 7
閱讀權限: 50
性別: 男
來自: macau
註冊時間: 2013-4-5
最後登錄: 2019-2-10

熱烈參與勳章好學求知勳章

6^#

發表於 2013-11-2 00:10 | 只看該作者

=rounddown(a1,0)+0.9

ss

靜思自在 : 【停滯不前，終無所得】人都迷於尋找奇蹟，因而停滯不前；縱使時間再多、路再長，也了無用處，終無所得。

返回列表下一主題上一主題