久久伊人一区二区_在线日韩av_欧美男男video_国产精品性做久久久久久

計量論壇

標題: 四舍六入五成雙EXCEL實現 [打印本頁]

作者: wangyiyong7703    時間: 2023-2-22 16:59
標題: 四舍六入五成雙EXCEL實現
=IF(MID(A2,FIND(".",A2,1)+B2+1,1)*1<5,LEFT(A2,B2+FIND(".",A2,1)),IF(AND(MID(A2,FIND(".",A2,1)+B2+1,1)*1=5,RIGHT(A2,LEN(A2)-FIND(".",A2,1)-B2)*1=5*POWER(10,LEN(A2)-FIND(".",A2,1)-B2-1),INT(MID(A2,FIND(".",A2,1)+B2,1)*1/2)=MID(A2,FIND(".",A2,1)+B2,1)*1/2),LEFT(A2,B2+FIND(".",A2,1)),LEFT(A2,B2+FIND(".",A2,1))*1+POWER(10,-B2)))

解析:
A2存有待修約值,
B2存有修約小數點保留位數N,
邏輯:如果小數點后第N+1位數字小于5 則結果為不進位;
         如果小數點后第N+1位數字等于5 且第N數數字為偶數則結果為不進位
         否則結果全部進位。


返回進位結果LEFT(A2,B2+FIND(".",A2,1))*1+POWER(10,-B2),
返回不進位結果LEFT(A2,B2+FIND(".",A2,1))
不進位條件:
     小數點N+1位數字MID(A2,FIND(".",A2,1)+B2+1,1)*1小于5;
     小數點N+1位數字MID(A2,FIND(".",A2,1)+B2+1,1)*1等于5,且后面全為0的
     條件RIGHT(A2,LEN(A2)-FIND(".",A2,1)-B2)*1=5*POWER(10,LEN(A2)-FIND(".",A2,1)-B2-1);         

進位條件:不進位便是進位。

附:
奇偶判定:INT(MID(A2,FIND(".",A2,1)+B2,1)*1/2)=MID(A2,FIND(".",A2,1)+B2,1)*1/2),成立為偶數
進位后:加數值POWER(10,-B2)
小數點從左到右所在位置:FIND(".",A2,1)

四舍六入五成雙在excel的實現.xlsx

9.43 KB, 下載次數: 93, 下載積分: 金幣 -1

C3是運算結果


作者: wangyiyong7703    時間: 2023-2-22 22:04
還有有效數字,里面公式太復雜了,就不作解析了。

四舍六入五成雙在excel的實現.xlsx

13.6 KB, 下載次數: 35, 下載積分: 金幣 -1


作者: frank001    時間: 2023-2-23 13:38
謝謝你的分享!
作者: wangyiyong7703    時間: 2023-2-23 15:16
frank001 發表于 2023-2-23 13:38
謝謝你的分享!

k7,原創作品,多多提意見,后期好改進
作者: NMR    時間: 2023-2-23 21:59

謝謝你的分享!
作者: 馮貴林    時間: 2023-2-24 08:23
怎么把它運用到自己的證書模板的數據處理過程中呢
作者: 錫林郭勒    時間: 2023-2-24 08:43
這可以解決好多問題,
作者: lreplay    時間: 2023-2-24 11:37
看不懂,但是大受震撼……
作者: frank001    時間: 2023-2-24 13:09
wangyiyong7703 發表于 2023-2-23 15:16
k7,原創作品,多多提意見,后期好改進

公式還有一個能改進的點,小數點后面最后一位為0時,小數位保留就會出現異常
作者: 五路車    時間: 2023-2-24 14:59
先進的科學技術,提高生產力水平,不錯
作者: stacay    時間: 2023-2-24 17:56
本帖最后由 stacay 于 2023-2-24 18:04 編輯

如果數據大于0.1可以用下面的公式。小于0.1就不大適用了。

假如原始數據在A1,則在B1或C1或D1其他列中輸入以下
=IF(TRUNC(MOD(ABS(A1*POWER(10,2)),2),2)=0.5,ROUNDDOWN(A1,2),ROUND(A1,2))

如果數據不在A1處,如在B1處,則需要把公式里的A1改成B1即可,照此類推
上面公式給出的是保留2位小數,如果保留3位,就把2改成3,保留0位則改成0,保留十位-1,百位-2,照此類推
=IF(TRUNC(MOD(ABS(A1*POWER(10,2)),2),2)=0.5,ROUNDDOWN(A1,2),ROUND(A1,2))

作者: wangyiyong7703    時間: 2023-2-24 21:10
frank001 發表于 2023-2-24 13:09
公式還有一個能改進的點,小數點后面最后一位為0時,小數位保留就會出現異常 ...

有改進版,這個只是初稿
作者: wangyiyong7703    時間: 2023-2-24 21:10
馮貴林 發表于 2023-2-24 08:23
怎么把它運用到自己的證書模板的數據處理過程中呢

好弄注意引用即可
作者: wangyiyong7703    時間: 2023-2-24 21:45
stacay 發表于 2023-2-24 17:56
如果數據大于0.1可以用下面的公式。小于0.1就不大適用了。

假如原始數據在A1,則在B1或C1或D1其他列中輸入 ...

連續0和連續9就失效,好多文獻的公司也是這樣的,連續9正在想辦法,連續0沒有問題


作者: wangyiyong7703    時間: 2023-2-25 15:13
漏洞補好,1以下不含1,=IF(IFERROR(FIND(REPT("9",B2),A2,1),1)=3,("1."&REPT("0",B2-1)),IF(IFERROR(FIND(REPT("9",B2),(LEFT(A2,FIND(".",A2,1))&RIGHT(A2,LEN(A2)-INT(ABS(LOG(A2)))-FIND(".",A2,1))),1),1)=3,IF((LEFT(A2,FIND(".",A2,1))&RIGHT(A2,LEN(A2)-INT(ABS(LOG(A2)))-FIND(".",A2,1)))*1<("0."&REPT("9",B2)&"5")*1,("0."&REPT("0",INT(ABS(LOG(A2))))&REPT("9",B2)),("0." & REPT("0",INT(ABS(LOG(A2)))-1)&"1"& REPT("0",B2-1))),IF(OR(LEFT(RIGHT(LEFT(A2,FIND(".",A2,1)) & RIGHT(A2,LEN(A2)-INT(ABS(LOG(A2)))-FIND(".",A2,1)),LEN(LEFT(A2,FIND(".",A2,1)) & RIGHT(A2,LEN(A2)-INT(ABS(LOG(A2)))-FIND(".",A2,1)))-B2-2),1)*1<5,AND(5&REPT("0",LEN(RIGHT(LEFT(A2,FIND(".",A2,1)) & RIGHT(A2,LEN(A2)-INT(ABS(LOG(A2)))-FIND(".",A2,1)),LEN(LEFT(A2,FIND(".",A2,1)) & RIGHT(A2,LEN(A2)-INT(ABS(LOG(A2)))-FIND(".",A2,1)))-B2-2))-1)=RIGHT(LEFT(A2,FIND(".",A2,1)) & RIGHT(A2,LEN(A2)-INT(ABS(LOG(A2)))-FIND(".",A2,1)),LEN(LEFT(A2,FIND(".",A2,1)) & RIGHT(A2,LEN(A2)-INT(ABS(LOG(A2)))-FIND(".",A2,1)))-B2-2),ISEVEN(RIGHT(LEFT(LEFT(A2,FIND(".",A2,1)) & RIGHT(A2,LEN(A2)-INT(ABS(LOG(A2)))-FIND(".",A2,1)),B2+2),1)*1))),ROUNDDOWN(LEFT(A2,FIND(".",A2,1)) & RIGHT(A2,LEN(A2)-INT(ABS(LOG(A2)))-FIND(".",A2,1)),B2),ROUNDUP(LEFT(A2,FIND(".",A2,1)) & RIGHT(A2,LEN(A2)-INT(ABS(LOG(A2)))-FIND(".",A2,1)),B2))/POWER(10,INT(ABS(LOG(A2)))) & REPT("0",B2+INT(ABS(LOG(A2)))-IF(ROUNDUP(LEFT(A2,FIND(".",A2,1)) & RIGHT(A2,LEN(A2)-INT(ABS(LOG(A2)))-FIND(".",A2,1)),B2)=1,1,INT(ABS(LOG(A2)))-2)-LEN(IF(OR(LEFT(RIGHT(LEFT(A2,FIND(".",A2,1)) & RIGHT(A2,LEN(A2)-INT(ABS(LOG(A2)))-FIND(".",A2,1)),LEN(LEFT(A2,FIND(".",A2,1)) & RIGHT(A2,LEN(A2)-INT(ABS(LOG(A2)))-FIND(".",A2,1)))-B2-2),1)*1<5,AND(5&REPT("0",LEN(RIGHT(LEFT(A2,FIND(".",A2,1)) & RIGHT(A2,LEN(A2)-INT(ABS(LOG(A2)))-FIND(".",A2,1)),LEN(LEFT(A2,FIND(".",A2,1)) & RIGHT(A2,LEN(A2)-INT(ABS(LOG(A2)))-FIND(".",A2,1)))-B2-2))-1)=RIGHT(LEFT(A2,FIND(".",A2,1)) & RIGHT(A2,LEN(A2)-INT(ABS(LOG(A2)))-FIND(".",A2,1)),LEN(LEFT(A2,FIND(".",A2,1)) & RIGHT(A2,LEN(A2)-INT(ABS(LOG(A2)))-FIND(".",A2,1)))-B2-2),ISEVEN(RIGHT(LEFT(LEFT(A2,FIND(".",A2,1)) & RIGHT(A2,LEN(A2)-INT(ABS(LOG(A2)))-FIND(".",A2,1)),B2+2),1)*1))),ROUNDDOWN(LEFT(A2,FIND(".",A2,1)) & RIGHT(A2,LEN(A2)-INT(ABS(LOG(A2)))-FIND(".",A2,1)),B2),ROUNDUP(LEFT(A2,FIND(".",A2,1)) & RIGHT(A2,LEN(A2)-INT(ABS(LOG(A2)))-FIND(".",A2,1)),B2))))))
作者: wangyiyong7703    時間: 2023-2-25 15:17
frank001 發表于 2023-2-24 13:09
公式還有一個能改進的點,小數點后面最后一位為0時,小數位保留就會出現異常 ...

請您親測一下,多提提意見,原創不易
作者: wangyiyong7703    時間: 2023-2-25 15:17
stacay 發表于 2023-2-24 17:56
如果數據大于0.1可以用下面的公式。小于0.1就不大適用了。

假如原始數據在A1,則在B1或C1或D1其他列中輸入 ...

請您親測一下,多提提意見,原創不易
作者: wangyiyong7703    時間: 2023-2-25 16:04
大于1的公式,目前10的N次方沒有弄,=IF(AND(IFERROR(FIND(REPT("9",C2),(A2/POWER(10,INT(LOG(A2))+1)),1),1)=3,(A2/POWER(10,INT(LOG(A2))+1))*1<("0."&REPT("9",C2)&"5")*1),("0."&REPT("9",C2)),IF(AND(IFERROR(FIND(REPT("9",C2),(A2/POWER(10,INT(LOG(A2))+1))*1,1),1)=3,OR((A2/POWER(10,INT(LOG(A2))+1))*1>("0."&REPT("9",C2)&"5")*1,(A2/POWER(10,INT(LOG(A2))+1))*1=("0."&REPT("9",C2)&"5")*1)),("1."&REPT("0",C2-1)),IF(IFERROR(FIND(REPT("9",C2),(LEFT((A2/POWER(10,INT(LOG(A2))+1)),FIND(".",(A2/POWER(10,INT(LOG(A2))+1)),1))&RIGHT((A2/POWER(10,INT(LOG(A2))+1)),LEN((A2/POWER(10,INT(LOG(A2))+1)))-INT(ABS(LOG((A2/POWER(10,INT(LOG(A2))+1)))))-FIND(".",(A2/POWER(10,INT(LOG(A2))+1)),1))),1),1)=3,IF((LEFT((A2/POWER(10,INT(LOG(A2))+1)),FIND(".",(A2/POWER(10,INT(LOG(A2))+1)),1))&RIGHT((A2/POWER(10,INT(LOG(A2))+1)),LEN((A2/POWER(10,INT(LOG(A2))+1)))-INT(ABS(LOG((A2/POWER(10,INT(LOG(A2))+1)))))-FIND(".",(A2/POWER(10,INT(LOG(A2))+1)),1)))*1<("0."&REPT("9",C2)&"5")*1,("0."&REPT("0",INT(ABS(LOG((A2/POWER(10,INT(LOG(A2))+1))))))&REPT("9",C2)),("0." & REPT("0",INT(ABS(LOG((A2/POWER(10,INT(LOG(A2))+1)))))-1)&"1"& REPT("0",C2-1))),IF(OR(LEFT(RIGHT(LEFT((A2/POWER(10,INT(LOG(A2))+1)),FIND(".",(A2/POWER(10,INT(LOG(A2))+1)),1)) & RIGHT((A2/POWER(10,INT(LOG(A2))+1)),LEN((A2/POWER(10,INT(LOG(A2))+1)))-INT(ABS(LOG((A2/POWER(10,INT(LOG(A2))+1)))))-FIND(".",(A2/POWER(10,INT(LOG(A2))+1)),1)),LEN(LEFT((A2/POWER(10,INT(LOG(A2))+1)),FIND(".",(A2/POWER(10,INT(LOG(A2))+1)),1)) & RIGHT((A2/POWER(10,INT(LOG(A2))+1)),LEN((A2/POWER(10,INT(LOG(A2))+1)))-INT(ABS(LOG((A2/POWER(10,INT(LOG(A2))+1)))))-FIND(".",(A2/POWER(10,INT(LOG(A2))+1)),1)))-C2-2),1)*1<5,AND(5&REPT("0",LEN(RIGHT(LEFT((A2/POWER(10,INT(LOG(A2))+1)),FIND(".",(A2/POWER(10,INT(LOG(A2))+1)),1)) & RIGHT((A2/POWER(10,INT(LOG(A2))+1)),LEN((A2/POWER(10,INT(LOG(A2))+1)))-INT(ABS(LOG((A2/POWER(10,INT(LOG(A2))+1)))))-FIND(".",(A2/POWER(10,INT(LOG(A2))+1)),1)),LEN(LEFT((A2/POWER(10,INT(LOG(A2))+1)),FIND(".",(A2/POWER(10,INT(LOG(A2))+1)),1)) & RIGHT((A2/POWER(10,INT(LOG(A2))+1)),LEN((A2/POWER(10,INT(LOG(A2))+1)))-INT(ABS(LOG((A2/POWER(10,INT(LOG(A2))+1)))))-FIND(".",(A2/POWER(10,INT(LOG(A2))+1)),1)))-C2-2))-1)=RIGHT(LEFT((A2/POWER(10,INT(LOG(A2))+1)),FIND(".",(A2/POWER(10,INT(LOG(A2))+1)),1)) & RIGHT((A2/POWER(10,INT(LOG(A2))+1)),LEN((A2/POWER(10,INT(LOG(A2))+1)))-INT(ABS(LOG((A2/POWER(10,INT(LOG(A2))+1)))))-FIND(".",(A2/POWER(10,INT(LOG(A2))+1)),1)),LEN(LEFT((A2/POWER(10,INT(LOG(A2))+1)),FIND(".",(A2/POWER(10,INT(LOG(A2))+1)),1)) & RIGHT((A2/POWER(10,INT(LOG(A2))+1)),LEN((A2/POWER(10,INT(LOG(A2))+1)))-INT(ABS(LOG((A2/POWER(10,INT(LOG(A2))+1)))))-FIND(".",(A2/POWER(10,INT(LOG(A2))+1)),1)))-C2-2),ISEVEN(RIGHT(LEFT(LEFT((A2/POWER(10,INT(LOG(A2))+1)),FIND(".",(A2/POWER(10,INT(LOG(A2))+1)),1)) & RIGHT((A2/POWER(10,INT(LOG(A2))+1)),LEN((A2/POWER(10,INT(LOG(A2))+1)))-INT(ABS(LOG((A2/POWER(10,INT(LOG(A2))+1)))))-FIND(".",(A2/POWER(10,INT(LOG(A2))+1)),1)),C2+2),1)*1))),ROUNDDOWN(LEFT((A2/POWER(10,INT(LOG(A2))+1)),FIND(".",(A2/POWER(10,INT(LOG(A2))+1)),1)) & RIGHT((A2/POWER(10,INT(LOG(A2))+1)),LEN((A2/POWER(10,INT(LOG(A2))+1)))-INT(ABS(LOG((A2/POWER(10,INT(LOG(A2))+1)))))-FIND(".",(A2/POWER(10,INT(LOG(A2))+1)),1)),C2),ROUNDUP(LEFT((A2/POWER(10,INT(LOG(A2))+1)),FIND(".",(A2/POWER(10,INT(LOG(A2))+1)),1)) & RIGHT((A2/POWER(10,INT(LOG(A2))+1)),LEN((A2/POWER(10,INT(LOG(A2))+1)))-INT(ABS(LOG((A2/POWER(10,INT(LOG(A2))+1)))))-FIND(".",(A2/POWER(10,INT(LOG(A2))+1)),1)),C2))/POWER(10,INT(ABS(LOG((A2/POWER(10,INT(LOG(A2))+1)))))) & REPT("0",C2+INT(ABS(LOG((A2/POWER(10,INT(LOG(A2))+1)))))-IF(ROUNDUP(LEFT((A2/POWER(10,INT(LOG(A2))+1)),FIND(".",(A2/POWER(10,INT(LOG(A2))+1)),1)) & RIGHT((A2/POWER(10,INT(LOG(A2))+1)),LEN((A2/POWER(10,INT(LOG(A2))+1)))-INT(ABS(LOG((A2/POWER(10,INT(LOG(A2))+1)))))-FIND(".",(A2/POWER(10,INT(LOG(A2))+1)),1)),C2)=1,1,INT(ABS(LOG((A2/POWER(10,INT(LOG(A2))+1)))))-2)-LEN(IF(OR(LEFT(RIGHT(LEFT((A2/POWER(10,INT(LOG(A2))+1)),FIND(".",(A2/POWER(10,INT(LOG(A2))+1)),1)) & RIGHT((A2/POWER(10,INT(LOG(A2))+1)),LEN((A2/POWER(10,INT(LOG(A2))+1)))-INT(ABS(LOG((A2/POWER(10,INT(LOG(A2))+1)))))-FIND(".",(A2/POWER(10,INT(LOG(A2))+1)),1)),LEN(LEFT((A2/POWER(10,INT(LOG(A2))+1)),FIND(".",(A2/POWER(10,INT(LOG(A2))+1)),1)) & RIGHT((A2/POWER(10,INT(LOG(A2))+1)),LEN((A2/POWER(10,INT(LOG(A2))+1)))-INT(ABS(LOG((A2/POWER(10,INT(LOG(A2))+1)))))-FIND(".",(A2/POWER(10,INT(LOG(A2))+1)),1)))-C2-2),1)*1<5,AND(5&REPT("0",LEN(RIGHT(LEFT((A2/POWER(10,INT(LOG(A2))+1)),FIND(".",(A2/POWER(10,INT(LOG(A2))+1)),1)) & RIGHT((A2/POWER(10,INT(LOG(A2))+1)),LEN((A2/POWER(10,INT(LOG(A2))+1)))-INT(ABS(LOG((A2/POWER(10,INT(LOG(A2))+1)))))-FIND(".",(A2/POWER(10,INT(LOG(A2))+1)),1)),LEN(LEFT((A2/POWER(10,INT(LOG(A2))+1)),FIND(".",(A2/POWER(10,INT(LOG(A2))+1)),1)) & RIGHT((A2/POWER(10,INT(LOG(A2))+1)),LEN((A2/POWER(10,INT(LOG(A2))+1)))-INT(ABS(LOG((A2/POWER(10,INT(LOG(A2))+1)))))-FIND(".",(A2/POWER(10,INT(LOG(A2))+1)),1)))-C2-2))-1)=RIGHT(LEFT((A2/POWER(10,INT(LOG(A2))+1)),FIND(".",(A2/POWER(10,INT(LOG(A2))+1)),1)) & RIGHT((A2/POWER(10,INT(LOG(A2))+1)),LEN((A2/POWER(10,INT(LOG(A2))+1)))-INT(ABS(LOG((A2/POWER(10,INT(LOG(A2))+1)))))-FIND(".",(A2/POWER(10,INT(LOG(A2))+1)),1)),LEN(LEFT((A2/POWER(10,INT(LOG(A2))+1)),FIND(".",(A2/POWER(10,INT(LOG(A2))+1)),1)) & RIGHT((A2/POWER(10,INT(LOG(A2))+1)),LEN((A2/POWER(10,INT(LOG(A2))+1)))-INT(ABS(LOG((A2/POWER(10,INT(LOG(A2))+1)))))-FIND(".",(A2/POWER(10,INT(LOG(A2))+1)),1)))-C2-2),ISEVEN(RIGHT(LEFT(LEFT((A2/POWER(10,INT(LOG(A2))+1)),FIND(".",(A2/POWER(10,INT(LOG(A2))+1)),1)) & RIGHT((A2/POWER(10,INT(LOG(A2))+1)),LEN((A2/POWER(10,INT(LOG(A2))+1)))-INT(ABS(LOG((A2/POWER(10,INT(LOG(A2))+1)))))-FIND(".",(A2/POWER(10,INT(LOG(A2))+1)),1)),C2+2),1)*1))),ROUNDDOWN(LEFT((A2/POWER(10,INT(LOG(A2))+1)),FIND(".",(A2/POWER(10,INT(LOG(A2))+1)),1)) & RIGHT((A2/POWER(10,INT(LOG(A2))+1)),LEN((A2/POWER(10,INT(LOG(A2))+1)))-INT(ABS(LOG((A2/POWER(10,INT(LOG(A2))+1)))))-FIND(".",(A2/POWER(10,INT(LOG(A2))+1)),1)),C2),ROUNDUP(LEFT((A2/POWER(10,INT(LOG(A2))+1)),FIND(".",(A2/POWER(10,INT(LOG(A2))+1)),1)) & RIGHT((A2/POWER(10,INT(LOG(A2))+1)),LEN((A2/POWER(10,INT(LOG(A2))+1)))-INT(ABS(LOG((A2/POWER(10,INT(LOG(A2))+1)))))-FIND(".",(A2/POWER(10,INT(LOG(A2))+1)),1)),C2)))))))*POWER(10,INT(LOG(A2))+1)
作者: myoliveryong    時間: 2023-2-25 20:04
wangyiyong7703 發表于 2023-2-25 16:04
大于1的公式,目前10的N次方沒有弄,=IF(AND(IFERROR(FIND(REPT("9",C2),(A2/POWER(10,INT(LOG(A2))+1)),1) ...

你為啥要來計量,不去IT?還是從IT過來的?
作者: Ming1212    時間: 2023-2-26 10:10
謝謝你的分享!
作者: wangyiyong7703    時間: 2023-2-26 12:47
有效數位,補全A2輸待修約值,B2輸入有效數位,C2輸入公式IF(IFERROR(FIND(".",A2,1),0)=0,"",RIGHT(A2,LEN(A2)-IFERROR(FIND(".",A2,1),0)));D2輸入公式:IF(INT(LOG(A2))<-1,(IF(TRUNC(A2)=0,"",TRUNC(A2))&C2)*1,IF(TRUNC(A2)=0,"",TRUNC(A2))&C2);結果顯示公式:IF(LEN((LEFT(D2,B2)+IF(OR(LEFT(RIGHT(D2,LEN(D2)-B2),1)*1<5,AND(ISEVEN(MID(D2,B2,1)),("5"&REPT("0",LEN(RIGHT(D2,LEN(D2)-B2))-1))-RIGHT(D2,LEN(D2)-B2)=0)),0,1)))=1,(LEFT(D2,B2)+IF(OR(LEFT(RIGHT(D2,LEN(D2)-B2),1)*1<5,AND(ISEVEN(MID(D2,B2,1)),("5"&REPT("0",LEN(RIGHT(D2,LEN(D2)-B2))-1))-RIGHT(D2,LEN(D2)-B2)=0)),0,1)),LEFT((LEFT(D2,B2)+IF(OR(LEFT(RIGHT(D2,LEN(D2)-B2),1)*1<5,AND(ISEVEN(MID(D2,B2,1)),("5"&REPT("0",LEN(RIGHT(D2,LEN(D2)-B2))-1))-RIGHT(D2,LEN(D2)-B2)=0)),0,1)),1)&"."&IF((LEN(LEFT(D2,B2))-LEN((LEFT(D2,B2)+IF(OR(LEFT(RIGHT(D2,LEN(D2)-B2),1)*1<5,AND(ISEVEN(MID(D2,B2,1)),("5"&REPT("0",LEN(RIGHT(D2,LEN(D2)-B2))-1))-RIGHT(D2,LEN(D2)-B2)=0)),0,1))))=0,RIGHT((LEFT(D2,B2)+IF(OR(LEFT(RIGHT(D2,LEN(D2)-B2),1)*1<5,AND(ISEVEN(MID(D2,B2,1)),("5"&REPT("0",LEN(RIGHT(D2,LEN(D2)-B2))-1))-RIGHT(D2,LEN(D2)-B2)=0)),0,1)),LEN((LEFT(D2,B2)+IF(OR(LEFT(RIGHT(D2,LEN(D2)-B2),1)*1<5,AND(ISEVEN(MID(D2,B2,1)),("5"&REPT("0",LEN(RIGHT(D2,LEN(D2)-B2))-1))-RIGHT(D2,LEN(D2)-B2)=0)),0,1)))-1),LEFT(RIGHT((LEFT(D2,B2)+IF(OR(LEFT(RIGHT(D2,LEN(D2)-B2),1)*1<5,AND(ISEVEN(MID(D2,B2,1)),("5"&REPT("0",LEN(RIGHT(D2,LEN(D2)-B2))-1))-RIGHT(D2,LEN(D2)-B2)=0)),0,1)),LEN((LEFT(D2,B2)+IF(OR(LEFT(RIGHT(D2,LEN(D2)-B2),1)*1<5,AND(ISEVEN(MID(D2,B2,1)),("5"&REPT("0",LEN(RIGHT(D2,LEN(D2)-B2))-1))-RIGHT(D2,LEN(D2)-B2)=0)),0,1)))-1),LEN(RIGHT((LEFT(D2,B2)+IF(OR(LEFT(RIGHT(D2,LEN(D2)-B2),1)*1<5,AND(ISEVEN(MID(D2,B2,1)),("5"&REPT("0",LEN(RIGHT(D2,LEN(D2)-B2))-1))-RIGHT(D2,LEN(D2)-B2)=0)),0,1)),LEN((LEFT(D2,B2)+IF(OR(LEFT(RIGHT(D2,LEN(D2)-B2),1)*1<5,AND(ISEVEN(MID(D2,B2,1)),("5"&REPT("0",LEN(RIGHT(D2,LEN(D2)-B2))-1))-RIGHT(D2,LEN(D2)-B2)=0)),0,1)))-1))-1))&IF(INT(LOG(A2))-(LEN(LEFT(D2,B2))-LEN((LEFT(D2,B2)+IF(OR(LEFT(RIGHT(D2,LEN(D2)-B2),1)*1<5,AND(ISEVEN(MID(D2,B2,1)),("5"&REPT("0",LEN(RIGHT(D2,LEN(D2)-B2))-1))-RIGHT(D2,LEN(D2)-B2)=0)),0,1))))=0,""," E "&INT(LOG(A2))-(LEN(LEFT(D2,B2))-LEN((LEFT(D2,B2)+IF(OR(LEFT(RIGHT(D2,LEN(D2)-B2),1)*1<5,AND(ISEVEN(MID(D2,B2,1)),("5"&REPT("0",LEN(RIGHT(D2,LEN(D2)-B2))-1))-RIGHT(D2,LEN(D2)-B2)=0)),0,1))))))
作者: dxquan    時間: 2023-2-26 13:50
一個字“牛”
作者: xuhuilai    時間: 2023-2-27 08:48
牛啊,大佬。
作者: nn141008    時間: 2023-2-27 11:09
大寫的牛??!
作者: wangyiyong7703    時間: 2023-2-27 14:13
有效數字大于1,求公式可在附件中下載。已更新。如有好的意見和建議,請發貼。

四舍六入五成雙在excel(不再更新).xlsx

27.31 KB, 下載次數: 13, 下載積分: 金幣 -1


作者: alin72    時間: 2023-2-27 14:23
太牛了。公式我看著都頭暈
作者: stacay    時間: 2023-2-27 15:30
wangyiyong7703 發表于 2023-2-25 15:17
請您親測一下,多提提意見,原創不易

EXCEL受限于浮點運算機制,是比較難處理 的。
作者: yshf530    時間: 2023-2-27 15:58
謝謝你的分享,用心了
作者: wangyiyong7703    時間: 2023-2-27 17:05
stacay 發表于 2023-2-27 15:30
EXCEL受限于浮點運算機制,是比較難處理 的。

確實碰到這種情況,改變了思路,才破解了。很不容易。不用宏程序解決確實太難了。我用宏程序測試過,目前還沒有發現異常,宏程序在文件里面??蛇\行

四舍六入五成雙在excel(不再更新).xlsx

27.31 KB, 下載次數: 28, 下載積分: 金幣 -1

下載這個看一哈


作者: 22063974    時間: 2023-3-1 09:52
非常好用的,謝謝,這是編程界的來到了計量領域
作者: Maybeanyou    時間: 2023-3-1 13:56
謝謝,幫大忙了
作者: 26826768    時間: 2023-3-1 14:40
牛??!這個數據處理太牛了

作者: 于是乎    時間: 2023-3-1 15:43
謝謝你的分享,真是太牛了。
作者: azthankyou    時間: 2023-3-9 19:02
厲害了!我的哥!
作者: wangyiyong7703    時間: 2023-9-16 00:46
A2 輸入待修約數,B2輸入小數點,C2輸入公式


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))))
作者: wangyiyong7703    時間: 2023-9-16 01:01
A2輸入待修約數字,B2輸入保留小數點位數,C2輸入公式

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)))))
作者: 唐家琨少    時間: 2023-12-15 16:48
大佬思路太牛了,看了一下都是用很基礎的excel公式解決的,這個應該就不存在文件轉發給別人之后會因為office不一樣或者對方用WPS打開而失效了。
作者: wangyiyong7703    時間: 2023-12-19 15:50
唐家琨少 發表于 2023-12-15 16:48
大佬思路太牛了,看了一下都是用很基礎的excel公式解決的,這個應該就不存在文件轉發給別人之后會因為offic ...

關注之我后,還有更新的你可以看一哈其他的。用VB做過。現在做的這個還是有漏洞
作者: allene    時間: 2023-12-25 08:21
謝謝你的分享
作者: zzylyau126    時間: 2023-12-25 11:06
這個厲害!條件太多,復雜
作者: redxsnake    時間: 2023-12-28 16:17
講的很好,受益匪淺!學習了
作者: yuanxu2021    時間: 2024-11-16 11:07
感謝樓主分享!
作者: ge1422915514    時間: 2024-11-16 11:35

高級,提高生產力水平,不錯
作者: a7835209    時間: 2024-11-29 10:14
感謝樓主分享!下載學習了





歡迎光臨 計量論壇 (http://www.dy313.com/) Powered by Discuz! X3.4
久久伊人一区二区_在线日韩av_欧美男男video_国产精品性做久久久久久
亚洲人一二三区| 丝袜诱惑亚洲看片| 91精品在线免费| 成人午夜电影网站| 日韩—二三区免费观看av| 日韩久久一区二区| 久久久久久一二三区| 欧美日韩激情一区| 91美女片黄在线观看91美女| 国产一区二区三区高清播放| 亚洲国产成人高清精品| 国产精品久久久久aaaa樱花| 精品成人免费观看| 欧美一三区三区四区免费在线看| 色综合久久久久综合体桃花网| 国产精品一区二区x88av| 免费看欧美女人艹b| 亚洲午夜激情av| 一区二区在线观看视频在线观看| 国产午夜精品一区二区三区四区| 欧美成人猛片aaaaaaa| 欧美绝品在线观看成人午夜影视| 在线看日本不卡| 99re热视频精品| av在线不卡免费看| 丁香婷婷综合色啪| 国产麻豆精品95视频| 免费在线看成人av| 美女一区二区三区在线观看| 丝袜诱惑制服诱惑色一区在线观看| 亚洲综合在线第一页| 亚洲另类一区二区| 一二三区精品福利视频| 亚洲免费在线观看视频| 亚洲乱码一区二区三区在线观看| 中文字幕一区二区三区四区| 中文字幕一区二区三区精华液 | 6080yy午夜一二三区久久| 91看片淫黄大片一级在线观看| 成人午夜视频福利| heyzo一本久久综合| 91视频你懂的| 欧美在线观看18| 欧美日本一区二区三区四区| 7777精品伊人久久久大香线蕉超级流畅 | av一区二区不卡| av成人免费在线观看| 91色.com| 欧美图区在线视频| 欧美一区二区三区啪啪| 精品国产污污免费网站入口 | 国产拍欧美日韩视频二区| 亚洲国产成人午夜在线一区| 亚洲欧洲性图库| 亚洲影视在线观看| 男人的天堂亚洲一区| 国产在线精品一区二区三区不卡| 国产精品综合视频| 99久久伊人精品| 欧美日韩亚洲综合在线 | 成人在线视频一区| 色88888久久久久久影院野外| 91久久国产综合久久| 欧美精品一二三四| 久久久久久夜精品精品免费| 自拍偷自拍亚洲精品播放| 亚洲国产精品久久久男人的天堂 | 国产一区二区电影| 成人福利在线看| 在线影院国内精品| 欧美电影免费观看高清完整版| 国产日韩欧美一区二区三区乱码| 亚洲免费伊人电影| 麻豆精品新av中文字幕| 成人av动漫网站| 91精品国产综合久久久蜜臀图片| 久久久99久久| 天堂一区二区在线免费观看| 国产激情一区二区三区| 欧美三级电影精品| 国产午夜精品美女毛片视频| 亚洲自拍偷拍av| 国产91在线观看| 欧美一区二区精品在线| 亚洲视频在线一区观看| 久久66热re国产| 日本高清不卡aⅴ免费网站| 日韩三级精品电影久久久| 亚洲美女淫视频| 国产高清久久久| 欧美一区二区三区色| 亚洲美女免费在线| 国产一区二区精品久久99| 777亚洲妇女| 一区二区三区资源| 国产999精品久久久久久| 91精品国产91久久久久久最新毛片| 国产精品麻豆网站| 国产真实乱对白精彩久久| 欧美日韩免费在线视频| 亚洲日本一区二区| 国产98色在线|日韩| 欧美成人在线直播| 亚洲电影你懂得| 91片在线免费观看| 欧美激情在线看| 韩国一区二区在线观看| 7777精品伊人久久久大香线蕉完整版| 中文字幕一区二区三区不卡在线| 国产资源在线一区| 欧美成人一区二区| 视频在线观看国产精品| 欧美日韩一区二区不卡| 亚洲欧美日韩在线| 91免费小视频| 亚洲特黄一级片| 91小视频在线| 国产精品日韩成人| 国产91精品入口| 久久精品一区二区三区不卡牛牛| 九色|91porny| 26uuu久久天堂性欧美| 看片的网站亚洲| 精品久久久久久久人人人人传媒 | 国产一区二区导航在线播放| 日韩免费在线观看| 蜜臀av性久久久久蜜臀aⅴ四虎 | 中文字幕一区二区5566日韩| 国产高清在线观看免费不卡| 国产亚洲精品aa午夜观看| 久久aⅴ国产欧美74aaa| 日韩午夜激情视频| 毛片不卡一区二区| 精品久久一二三区| 国产成人av电影| 国产精品国产三级国产aⅴ入口 | 国产黄人亚洲片| 中文字幕av一区 二区| 99精品偷自拍| 亚洲丝袜自拍清纯另类| 色婷婷久久综合| 午夜精品福利一区二区蜜股av | 精品成人佐山爱一区二区| 激情综合网激情| 国产欧美一区二区精品久导航 | 欧美三级在线看| 日韩av中文字幕一区二区| 日韩一区二区中文字幕| 国产精品影视天天线| 国产精品美女久久久久aⅴ国产馆 国产精品美女久久久久av爽李琼 国产精品美女久久久久高潮 | 日韩限制级电影在线观看| 免费的国产精品| 久久久久久一二三区| 成人精品电影在线观看| 亚洲最色的网站| 欧美一区二区三区四区高清| 国内精品不卡在线| 日韩伦理免费电影| 欧美伦理视频网站| 国产一本一道久久香蕉| 国产精品久久久久毛片软件| 色婷婷综合久久久久中文一区二区 | 91视频在线看| 天堂蜜桃91精品| 久久这里都是精品| 97久久精品人人澡人人爽| 午夜精品福利一区二区蜜股av| 精品久久久久久久一区二区蜜臀| 丁香婷婷综合色啪| 亚洲成国产人片在线观看| 久久无码av三级| 91久久国产综合久久| 久久精品国产**网站演员| 中文字幕第一区二区| 欧美精品777| 懂色av一区二区三区免费看| 亚洲成人av免费| 中文字幕av资源一区| 7777精品伊人久久久大香线蕉完整版 | 亚洲免费电影在线| 日韩一区二区精品在线观看| 懂色av中文字幕一区二区三区| 亚洲成a人v欧美综合天堂| 欧美国产一区二区| 777xxx欧美| 色女孩综合影院| 国产一区二区调教| 亚洲成人中文在线| 国产精品国产三级国产有无不卡 | 亚洲欧美日韩在线不卡| 久久综合视频网| 欧美亚洲自拍偷拍| 国产成人av网站| 另类调教123区| 亚洲国产日韩a在线播放| 国产精品亲子乱子伦xxxx裸| 日韩一二在线观看| 欧美三级在线视频| 色综合久久中文综合久久牛| 国内不卡的二区三区中文字幕|