久久伊人一区二区_在线日韩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
一個字“?!?hr noshade size="2" width="100%" color="#808080"> 作者: 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做過?,F在做的這個還是有漏洞
作者: 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://m.dy313.com/) Powered by Discuz! X3.4
久久伊人一区二区_在线日韩av_欧美男男video_国产精品性做久久久久久
日韩久久精品一区| 亚洲三级视频在线观看| 亚洲三级在线免费| 成人激情综合网站| 精品三级在线看| 国产精品丝袜91| 欧美一区二区精品在线| 三级影片在线观看欧美日韩一区二区 | 一区二区三区在线视频观看58| 日日夜夜免费精品| 蜜臀av性久久久久蜜臀aⅴ流畅 | 国产成人在线网站| 亚洲精品第1页| 亚洲一区二区精品视频| 日本道精品一区二区三区| 盗摄精品av一区二区三区| 成人av电影免费在线播放| 在线视频观看一区| 精品一区精品二区高清| 在线视频一区二区三区| 精品久久久久香蕉网| 欧美精品自拍偷拍| 欧美一级日韩免费不卡| 91国内精品野花午夜精品 | 久久国产麻豆精品| 日本精品一区二区三区高清 | 久久精品99国产国产精| 亚洲另类色综合网站| 亚洲午夜久久久久久久久电影网 | 国产偷v国产偷v亚洲高清| 在线成人av网站| 一区二区三区国产豹纹内裤在线| 亚洲综合男人的天堂| 国产传媒久久文化传媒| 欧美日韩成人高清| 色呦呦国产精品| 日韩专区欧美专区| 日韩免费高清av| 亚洲丝袜美腿综合| 在线亚洲免费视频| 国产综合成人久久大片91| 欧美日韩一区二区不卡| 亚洲一级二级三级| 欧美精品一区二区蜜臀亚洲| 亚洲一二三级电影| 欧美日韩一区二区三区四区| 国产精品国产精品国产专区不蜜| 亚洲美女视频一区| 视频在线观看一区| 91精品国产免费| 免费成人美女在线观看.| 91免费看片在线观看| 毛片av一区二区三区| 欧美日韩一区视频| 裸体在线国模精品偷拍| 亚洲免费在线观看视频| 天堂在线一区二区| 337p日本欧洲亚洲大胆精品| 亚洲一区二区在线免费观看视频 | 一区二区三区在线观看欧美 | 激情都市一区二区| 欧美日韩免费观看一区二区三区 | 欧美放荡的少妇| 国内精品伊人久久久久av影院 | av在线免费不卡| 五月婷婷综合网| 久久众筹精品私拍模特| 99精品视频一区| 国产一区二区不卡老阿姨| 麻豆免费精品视频| 蜜桃视频一区二区| 亚洲va在线va天堂| 国产精品剧情在线亚洲| 精品黑人一区二区三区久久 | 精品一区二区三区在线观看国产 | 国产一区二区三区精品视频| 视频一区中文字幕| 亚洲人妖av一区二区| 91官网在线免费观看| 色婷婷综合中文久久一本| 色婷婷久久久久swag精品 | 激情文学综合插| 一个色综合网站| 中文字幕日韩精品一区| 中文字幕在线播放不卡一区| 2023国产精品| 国产精品无遮挡| 夜夜嗨av一区二区三区中文字幕| 亚洲一区在线视频观看| 久久av资源网| 一本大道久久a久久精二百| 91看片淫黄大片一级在线观看| 97久久精品人人澡人人爽| 在线视频国产一区| 国产午夜精品理论片a级大结局 | 欧美日韩一级大片网址| 欧美一卡在线观看| 自拍av一区二区三区| 欧美a级理论片| 丁香六月综合激情| 精品美女一区二区| 美国十次了思思久久精品导航| av一区二区三区黑人| 4438成人网| 亚洲午夜在线观看视频在线| 国产凹凸在线观看一区二区| 69堂国产成人免费视频| 亚洲丶国产丶欧美一区二区三区| 99视频一区二区| 国产精品福利在线播放| 国产a久久麻豆| 国产三级精品三级| 精品一区精品二区高清| 欧美电影在线免费观看| 亚洲免费在线观看| 欧美日韩国产不卡| 免费观看30秒视频久久| 欧美一区二区三区在线视频| 麻豆精品国产91久久久久久| 91精品蜜臀在线一区尤物| 日韩国产精品久久久| 欧美视频第二页| 丝袜国产日韩另类美女| 欧美美女一区二区在线观看| 亚洲小说欧美激情另类| 久久久亚洲欧洲日产国码αv| 播五月开心婷婷综合| 一区二区三区四区高清精品免费观看 | 欧美一区二区人人喊爽| 国产成人在线视频播放| 亚洲精品中文在线影院| 精品日本一线二线三线不卡 | 欧美国产欧美亚州国产日韩mv天天看完整| 激情偷乱视频一区二区三区| 亚洲欧美日韩一区| 国产精品国产三级国产三级人妇 | 国产电影一区在线| 美女被吸乳得到大胸91| 亚洲三级在线播放| 中文字幕电影一区| 国产日韩欧美在线一区| 精品久久人人做人人爱| 一本色道综合亚洲| 成人av在线网| 不卡的电影网站| 国产精品中文字幕欧美| 国产成人在线视频播放| 成人av片在线观看| 欧美三级在线播放| 欧美最猛性xxxxx直播| 97精品久久久午夜一区二区三区 | 久久精品视频一区二区| 91精品国产综合久久精品app| 看电视剧不卡顿的网站| 亚洲国产日韩一区二区| 午夜精品久久久久久久99樱桃| 亚洲一区在线观看视频| 亚洲一区在线观看视频| 亚洲国产一区二区视频| 一区二区视频在线看| 亚洲色图另类专区| 日本中文字幕一区| a美女胸又www黄视频久久| 91免费观看国产| 7777精品伊人久久久大香线蕉| 91精品国产综合久久久蜜臀图片| 久久伊99综合婷婷久久伊| 亚洲精品日韩综合观看成人91| 天天色天天操综合| a级高清视频欧美日韩| 欧美精品色一区二区三区| 精品国产一区二区亚洲人成毛片| 久久免费偷拍视频| 亚洲国产wwwccc36天堂| 国产精品中文字幕一区二区三区| 91久久精品国产91性色tv| 久久久久国产精品麻豆ai换脸| 一区二区三区毛片| 国内成人精品2018免费看| 色94色欧美sute亚洲13| 欧美一区二区三级| 日韩精品一二三区| 欧美一区二区在线视频| 亚洲精选视频免费看| 成人国产在线观看| 国产亚洲欧美日韩日本| 国产成人综合自拍| 国产拍欧美日韩视频二区| 日韩电影在线一区二区| 欧美日本高清视频在线观看| 中文字幕日韩av资源站| 国产精品小仙女| 亚洲人成网站在线| 欧美丰满一区二区免费视频| 一区二区三区在线播放| 欧美性生活一区| 韩国女主播成人在线观看| 日本一区二区成人在线| 94-欧美-setu| 亚洲国产一区在线观看|