国产一区国产精品,2019中文亚洲字幕,电影在线高清,欧美精品一区二区三区久久

計(jì)量論壇

標(biāo)題: 四舍六入函數(shù)模板 [打印本頁]

作者: sunrry 時(shí)間: 2021-7-28 09:11
標(biāo)題: 四舍六入函數(shù)模板
本人根據(jù)四舍六入奇進(jìn)偶不進(jìn)原則，利用vba做了個(gè)自定義的函數(shù)，希望對大家有用。
函數(shù)語音是 Round2(被修約數(shù)據(jù)，小數(shù)位數(shù)）
例如把3.45修約保留一位小數(shù)，就是 =round（3.45,1）
此表格嵌套了vba，所以只能在此表中進(jìn)行操作。

作者: sunrry 時(shí)間: 2021-7-28 09:16
此函數(shù)利用vba，極大精簡了使用函數(shù)的復(fù)雜計(jì)算步驟。同時(shí)有別于目前發(fā)表論文中的方法（本人已發(fā)），能有效去除excel中浮點(diǎn)誤差的影響。目前其他方法基本上都是根據(jù)小數(shù)點(diǎn)后七位數(shù)字大小判斷進(jìn)行去除浮點(diǎn)誤差，本方法通過強(qiáng)制轉(zhuǎn)換十進(jìn)制解決浮點(diǎn)誤差。

作者: alickglyn 時(shí)間: 2021-7-28 15:45
一行excel函數(shù)解決，=ROUND(A1,a)-(MOD(A1*10^(a+1),20)=5)*10^(-a)，A1是需要修約的數(shù)的單元格，a為修約位數(shù)。

作者: sunrry 時(shí)間: 2021-7-29 08:42

alickglyn 發(fā)表于 2021-7-28 15:45
一行excel函數(shù)解決，=ROUND(A1,a)-(MOD(A1*10^(a+1),20)=5)*10^(-a)，A1是需要修約的數(shù)的單元格，a為修約位 ...

第一，麻煩，每次都要替換，尤其是有時(shí)候公式嵌套公式，就更復(fù)雜了
第二，excel小數(shù)存在浮點(diǎn)誤差影響，這個(gè)公式有誤判。
第三，你這個(gè)負(fù)數(shù)修約結(jié)果是錯(cuò)的

作者: 唐家琨少 時(shí)間: 2021-7-29 09:15
謝謝樓主的分享，最近也在開始自學(xué)用宏，正好用你的來學(xué)習(xí)下。
vba版的確實(shí)好用，不過用宏的話，當(dāng)表格傳到別的電腦很有可能就會失效啊。有很多電腦的excel默認(rèn)禁用了宏。

作者: sunrry 時(shí)間: 2021-7-29 11:48

唐家琨少發(fā)表于 2021-7-29 09:15
謝謝樓主的分享，最近也在開始自學(xué)用宏，正好用你的來學(xué)習(xí)下。
vba版的確實(shí)好用，不過用宏的話，當(dāng)表格傳到 ...

取消禁止就可以用了。

作者: 烏拉辣拉 時(shí)間: 2021-7-29 13:41
學(xué)習(xí)一下，很有幫助

作者: sunrry 時(shí)間: 2021-7-30 12:32
大家有方便實(shí)用的工具也可以互相交流一下啊

作者: 連長 時(shí)間: 2021-7-30 15:05
修約間隔為10，你這函數(shù)就扒瞎了

作者: sunrry 時(shí)間: 2021-8-10 12:12

連長發(fā)表于 2021-7-30 15:05
修約間隔為10，你這函數(shù)就扒瞎了

修約間隔為5和10的可以再搞個(gè)函數(shù)，或者直接拿這個(gè)數(shù)除相應(yīng)的數(shù)以后修約再乘回來

作者: sunrry 時(shí)間: 2021-8-10 12:13
excel里面的修約函數(shù)也沒有2間隔、5間隔之類的

作者: 連長 時(shí)間: 2021-8-11 08:47
可以按照規(guī)則，結(jié)合excel的數(shù)據(jù)處理，自己寫個(gè)function，費(fèi)點(diǎn)勁，但不難。

作者: sunrry 時(shí)間: 2021-8-11 11:45
難者不會會者不難

作者: wangyiyong7703 時(shí)間: 2023-9-18 18:32
特殊情況適應(yīng)了么，3.001，8.9999。還是用了編程，要全部用內(nèi)建函數(shù)。編程可以把很多漏洞補(bǔ)上

作者: wangyiyong7703 時(shí)間: 2023-9-18 18:34

A2輸入待修約數(shù)值，B2輸入保留小數(shù)點(diǎn)位數(shù)，C2輸入公式。對9.9999多的情況不適用，還待改進(jìn)

IF(B2=0,IF(OR(AND(ISEVEN(INT(A2)),A2-INT(A2)=0.5),A2-INT(A2)<0.5),INT(A2),INT(A2)+1),IF(LEN(IF(OR(AND(ISEVEN(INT(A2*POWER(10,B2))),A2*POWER(10,B2)-INT(A2*POWER(10,B2))=0.5),A2*POWER(10,B2)-INT(A2*POWER(10,B2))<0.5),INT(A2*POWER(10,B2))/POWER(10,B2),(INT(A2*POWER(10,B2))+1)/POWER(10,B2)))=LEN(INT(A2)),IF(OR(AND(ISEVEN(INT(A2*POWER(10,B2))),A2*POWER(10,B2)-INT(A2*POWER(10,B2))=0.5),A2*POWER(10,B2)-INT(A2*POWER(10,B2))<0.5),INT(A2*POWER(10,B2))/POWER(10,B2),(INT(A2*POWER(10,B2))+1)/POWER(10,B2))&"."&REPT("0",B2),IF(LEN(INT(A2*POWER(10,B2)))+1>LEN((IF(OR(AND(ISEVEN(INT(A2*POWER(10,B2))),A2*POWER(10,B2)-INT(A2*POWER(10,B2))=0.5),A2*POWER(10,B2)-INT(A2*POWER(10,B2))<0.5),INT(A2*POWER(10,B2))/POWER(10,B2),(INT(A2*POWER(10,B2))+1)/POWER(10,B2)))),(IF(OR(AND(ISEVEN(INT(A2*POWER(10,B2))),A2*POWER(10,B2)-INT(A2*POWER(10,B2))=0.5),A2*POWER(10,B2)-INT(A2*POWER(10,B2))<0.5),INT(A2*POWER(10,B2))/POWER(10,B2),(INT(A2*POWER(10,B2))+1)/POWER(10,B2)))&REPT("0",LEN(INT(A2*POWER(10,B2)))-1-LEN((IF(OR(AND(ISEVEN(INT(A2*POWER(10,B2))),A2*POWER(10,B2)-INT(A2*POWER(10,B2))=0.5),A2*POWER(10,B2)-INT(A2*POWER(10,B2))<0.5),INT(A2*POWER(10,B2))/POWER(10,B2),(INT(A2*POWER(10,B2))+1)/POWER(10,B2))))),IF(OR(AND(ISEVEN(INT(A2*POWER(10,B2))),A2*POWER(10,B2)-INT(A2*POWER(10,B2))=0.5),A2*POWER(10,B2)-INT(A2*POWER(10,B2))<0.5),INT(A2*POWER(10,B2))/POWER(10,B2),(INT(A2*POWER(10,B2))+1)/POWER(10,B2)))))

作者: sunrry 時(shí)間: 2023-9-22 14:57

wangyiyong7703 發(fā)表于 2023-9-18 18:34
A2輸入待修約數(shù)值，B2輸入保留小數(shù)點(diǎn)位數(shù)，C2輸入公式。對9.9999多的情況不適用，還待改進(jìn)

IF(B2=0,IF(OR ...

你不覺得你的公式很麻煩么。。。。

作者: wangyiyong7703 時(shí)間: 2023-9-22 17:11

sunrry 發(fā)表于 2023-9-22 14:57
你不覺得你的公式很麻煩么。。。。

開始設(shè)計(jì)有點(diǎn)麻煩而已，你直接復(fù)制使用有什么麻煩的。如果你用宏去做才真的麻煩。這個(gè)公式避開了宏代碼，也相當(dāng)于宏代碼

作者: sunrry 時(shí)間: 2023-9-25 13:21

wangyiyong7703 發(fā)表于 2023-9-22 17:11
開始設(shè)計(jì)有點(diǎn)麻煩而已，你直接復(fù)制使用有什么麻煩的。如果你用宏去做才真的麻煩。這個(gè)公式避開了宏代碼， ...

對對對，你說的都對。

作者: wangyiyong7703 時(shí)間: 2023-10-2 13:05

IF(OR(AND(ISEVEN(MID(A2,FIND(".",A2)+B2,1)*1),MID(A2,FIND(".",A2)+B2+1,1)="5",IFERROR(RIGHT(A2,LEN(A2)-FIND(".",A2)-B2-1)*1,0)=0),MID(A2,FIND(".",A2)+B2+1,1)*1<5),LEFT(A2,FIND(".",A2,1)+B2),IF(IFERROR(FIND(".",LEFT(A2,FIND(".",A2,1)*1+B2)*1+IF(A2*1<0,-1,1)/POWER(10,B2),1),0)=0,LEFT(A2,FIND(".",A2,1)*1+B2)*1+IF(A2*1<0,-1,1)/POWER(10,B2)&"."&REPT("0",B2),LEFT(A2,FIND(".",A2,1)*1+B2)*1+IF(A2*1<0,-1,1)/POWER(10,B2)&REPT("0",B2-(LEN(LEFT(A2,FIND(".",A2,1)*1+B2)*1+IF(A2*1<0,-1,1)/POWER(10,B2))-IFERROR(FIND(".",LEFT(A2,FIND(".",A2,1)*1+B2)*1+IF(A2*1<0,-1,1)/POWER(10,B2),1),0)))))

作者: wangyiyong7703 時(shí)間: 2023-10-2 13:06

sunrry 發(fā)表于 2023-9-25 13:21
對對對，你說的都對。

新的算法做的，麻煩抽空指正一下。

作者: sunrry 時(shí)間: 2023-10-7 13:09

wangyiyong7703 發(fā)表于 2023-10-2 13:06
新的算法做的，麻煩抽空指正一下。

1、小數(shù)點(diǎn)有效位數(shù)為0直接報(bào)錯(cuò)
2、多次計(jì)算后的浮點(diǎn)小數(shù)無法避免，后面一堆錯(cuò)誤。（可以看圖，B2=A2+0.1,C2=B2+0.1,以此類推）
(, 下載次數(shù): 849)

作者: sunrry 時(shí)間: 2023-10-7 13:20
=IF(ABS(ABS(A2/1*10^B2-TRUNC(A2/1,B2)*10^B2)-0.5)<10^-7,CEILING(ABS(TRUNC(A2/1,B2)),2*10^-B2)*SIGN(A2/1)*1,ROUND(A2/1,B2)*1)

作者: wangyiyong7703 時(shí)間: 2023-10-7 15:05

sunrry 發(fā)表于 2023-10-7 13:09
1、小數(shù)點(diǎn)有效位數(shù)為0直接報(bào)錯(cuò)
2、多次計(jì)算后的浮點(diǎn)小數(shù)無法避免，后面一堆錯(cuò)誤。（可以看圖，B2=A2+0.1, ...

謝謝，，，，，，

作者: wangyiyong7703 時(shí)間: 2023-10-7 15:17
本帖最后由 wangyiyong7703 于 2023-10-7 15:29 編輯

sunrry 發(fā)表于 2023-10-7 13:20
=IF(ABS(ABS(A2/1*10^B2-TRUNC(A2/1,B2)*10^B2)-0.5)

我設(shè)計(jì)的是保留多少位小數(shù)的，1位以上，不含０位的。０位及以上可以再設(shè)計(jì)。主要是出現(xiàn)整數(shù)后的加零補(bǔ)位。你說的浮點(diǎn)問題具體指出來，我的是沒有的

作者: wangyiyong7703 時(shí)間: 2023-10-7 18:07

sunrry 發(fā)表于 2023-10-7 13:09
1、小數(shù)點(diǎn)有效位數(shù)為0直接報(bào)錯(cuò)
2、多次計(jì)算后的浮點(diǎn)小數(shù)無法避免，后面一堆錯(cuò)誤。（可以看圖，B2=A2+0.1, ...

我看了一下，不是我要解決浮點(diǎn)問題，是你的輸入本來就有問題，6.94999999999999，不是顯示的6.95

作者: wangyiyong7703 時(shí)間: 2023-10-7 18:08

wangyiyong7703 發(fā)表于 2023-10-7 15:05
謝謝，，，，，，

幫我分析一下，16-18有出現(xiàn)問題了

作者: wangyiyong7703 時(shí)間: 2023-10-7 18:12

sunrry 發(fā)表于 2021-7-29 11:48
取消禁止就可以用了。

正因?yàn)楹甏a容易被殺毒軟件干掉，才一直追求避開宏代碼。如果用自定義函數(shù)和格式設(shè)置就方便多了。跟尺規(guī)作圖類似，故意增加難度。

作者: 路云 時(shí)間: 2023-11-15 00:17

sunrry 發(fā)表于 2023-9-22 14:57
你不覺得你的公式很麻煩么。。。。

您說得沒錯(cuò)。那不是數(shù)值修約，而是文本處理。可以參閱我與他的討論：保留位數(shù)EXCEL實(shí)現(xiàn)

作者: sunrry 時(shí)間: 2023-11-23 13:44

路云發(fā)表于 2023-11-15 00:17
您說得沒錯(cuò)。那不是數(shù)值修約，而是文本處理。可以參閱我與他的討論：保留位數(shù)EXCEL實(shí)現(xiàn) ...

而且他只考慮輸入一個(gè)小數(shù)的情況，如果是運(yùn)算的結(jié)果，他無法避免浮點(diǎn)數(shù)字的影響。

作者: luocx 時(shí)間: 2023-11-23 17:03
謝謝樓主的分享，最近也在開始自學(xué)用宏，正好用你的來學(xué)習(xí)下。

作者: songliangyu 時(shí)間: 2023-11-26 11:00
感謝樓主分享

作者: Mia 時(shí)間: 2023-12-3 20:23
感謝樓主分享

作者: yuanxu2021 時(shí)間: 2024-11-30 14:53
感謝樓主分享。

歡迎光臨計(jì)量論壇 (http://www.bkd208.com/)

国产一区国产精品,2019中文亚洲字幕,电影在线高清,欧美精品一区二区三区久久