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

計量論壇

標題: 四舍六入五成雙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)

作者: wangyiyong7703    時間: 2023-2-22 22:04
還有有效數字,里面公式太復雜了,就不作解析了。
作者: 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
大寫的牛?。?hr noshade size="2" width="100%" color="#808080"> 作者: wangyiyong7703    時間: 2023-2-27 14: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受限于浮點運算機制,是比較難處理 的。

確實碰到這種情況,改變了思路,才破解了。很不容易。不用宏程序解決確實太難了。我用宏程序測試過,目前還沒有發現異常,宏程序在文件里面。可運行
作者: 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://www.bkd208.com/) Powered by Discuz! X3.4
国产一区国产精品,2019中文亚洲字幕,电影在线高清,欧美精品一区二区三区久久
国内精品免费在线观看| 欧美日韩高清影院| 日韩视频一区二区在线观看| 亚洲男人的天堂在线aⅴ视频| 免费欧美日韩国产三级电影| 在线欧美日韩国产| 亚洲欧洲日韩av| 国产成人免费在线观看| 日韩精品一区二区三区三区免费| 一区二区三区波多野结衣在线观看 | 一区二区三区四区不卡在线 | 成人白浆超碰人人人人| 欧美大肚乱孕交hd孕妇| 日韩专区中文字幕一区二区| 99国产精品久久久久久久久久久| 国产日韩欧美一区二区三区综合| 精品一区二区三区久久久| 欧美一区二区黄色| 日韩成人伦理电影在线观看| 欧美日韩激情一区二区| 亚洲福利国产精品| 欧美日韩国产bt| 五月综合激情网| 欧美另类一区二区三区| 午夜精品福利久久久| 欧美疯狂性受xxxxx喷水图片| 亚洲成人综合视频| 7777精品伊人久久久大香线蕉完整版 | 国产91在线观看| 欧美高清在线一区| 一本大道久久a久久精二百| 中文字幕佐山爱一区二区免费| 99久久免费国产| 亚洲一区二三区| 5858s免费视频成人| 蜜桃91丨九色丨蝌蚪91桃色| 精品乱人伦小说| 成人性生交大片免费看中文网站| 国产精品久久久久精k8| 在线观看日韩一区| 青草av.久久免费一区| 久久久精品tv| 91激情五月电影| 琪琪一区二区三区| 国产精品毛片久久久久久| 色综合夜色一区| 美日韩一区二区三区| 国产三级欧美三级日产三级99 | 亚洲午夜免费视频| 欧美一区二区三区四区视频| 国产传媒日韩欧美成人| 一二三区精品福利视频| 欧美一区二区三区男人的天堂| 国产一区二区h| 亚洲美女偷拍久久| 欧美mv日韩mv国产网站app| 成人av网站在线观看免费| 亚洲高清久久久| 国产亚洲成年网址在线观看| 在线观看成人免费视频| 韩国av一区二区| 亚洲美女区一区| 久久精品一区二区| 欧美日本一区二区在线观看| 成人91在线观看| 蜜臀av性久久久久蜜臀av麻豆| 国产精品久久久久久久裸模| 91精品国产入口| 91国产视频在线观看| 激情丁香综合五月| 亚洲午夜一区二区三区| 国产精品乱码久久久久久| 欧美一级久久久久久久大片| 色综合久久中文字幕| 黄色日韩网站视频| 性感美女久久精品| 亚洲欧美区自拍先锋| 久久免费精品国产久精品久久久久| 91精彩视频在线| 99久久婷婷国产综合精品| 国产尤物一区二区在线| 美国十次了思思久久精品导航| 一区二区三区中文字幕精品精品| 久久亚洲二区三区| 日韩欧美国产一区二区在线播放 | 日本精品裸体写真集在线观看| 国产麻豆午夜三级精品| 麻豆91小视频| 婷婷夜色潮精品综合在线| 一区二区三区在线免费播放| 日韩美女久久久| 国产精品不卡视频| 欧美国产日韩一二三区| 精品国产99国产精品| 日韩一区二区三区在线视频| 欧美日韩国产高清一区二区 | 日韩精品成人一区二区在线| 亚洲一区二区成人在线观看| 一色屋精品亚洲香蕉网站| 欧美国产禁国产网站cc| 欧美国产国产综合| 国产精品美女久久久久av爽李琼| 国产日韩欧美在线一区| 国产女人aaa级久久久级| 欧美国产1区2区| 国产精品污网站| 国产精品高潮呻吟久久| 日韩伦理av电影| 亚洲精品视频在线观看免费 | 亚洲男人的天堂在线aⅴ视频| 亚洲综合视频在线| 国产欧美视频在线观看| 日本一区二区动态图| 亚洲欧洲一区二区在线播放| 国产精品成人免费精品自在线观看| 国产精品久久久久久久久搜平片 | 亚洲影视在线播放| 蜜桃av一区二区在线观看| 99在线视频精品| 日韩精品一区二区三区四区| 亚洲一区在线视频| 国产成人一区在线| 日韩欧美亚洲一区二区| 亚洲精品综合在线| 精品一区二区久久| 宅男在线国产精品| 国产精品不卡一区| 麻豆精品国产传媒mv男同 | 久久97超碰国产精品超碰| 视频一区二区三区在线| 夜夜夜精品看看| 极品少妇xxxx精品少妇偷拍| 国产麻豆精品久久一二三| 99热在这里有精品免费| 成人在线视频一区| 三级一区在线视频先锋| 91精品免费在线| 免费观看30秒视频久久| 在线综合亚洲欧美在线视频| 一区二区三区91| 欧美成人伊人久久综合网| 日韩国产欧美在线视频| 日韩一区二区三区电影在线观看| 青娱乐精品视频在线| 日韩午夜小视频| 蜜桃av噜噜一区二区三区小说| 日韩一本二本av| 国产一区不卡在线| 精品少妇一区二区三区日产乱码 | 欧美一二三四在线| 午夜视频在线观看一区| 4438x亚洲最大成人网| 国产麻豆视频精品| 国产精品视频一二三| 在线亚洲一区二区| 亚洲午夜一区二区三区| 欧美一级高清片| 国产成人免费网站| 亚洲黄色尤物视频| 4438x亚洲最大成人网| 久久精品免费看| 中文字幕视频一区| 欧美日韩国产欧美日美国产精品| 亚洲一区在线观看网站| 欧美成人一区二区| 色综合色综合色综合| 日本视频一区二区三区| 国产精品免费丝袜| 日韩一级视频免费观看在线| 日本乱人伦一区| 丰满放荡岳乱妇91ww| 国产精品亚洲一区二区三区妖精| 日本在线不卡一区| 亚洲一级二级三级在线免费观看| 久久久久久夜精品精品免费| 日韩免费观看高清完整版 | 色94色欧美sute亚洲线路二| 国产成人av电影在线| 日本不卡在线视频| 午夜精品久久久久久久99水蜜桃| 国产精品福利在线播放| 日本一区二区三区免费乱视频| 日韩一区二区三| 久久精品亚洲精品国产欧美kt∨| 日韩一区二区在线看| 精品视频免费看| 欧美日韩在线三级| 在线亚洲高清视频| 色悠悠久久综合| 欧美日韩国产区一| 久久综合色播五月| 精品理论电影在线观看| 亚洲视频你懂的| 图片区小说区国产精品视频| 精品一二三四区| 不卡视频在线看| 欧美一区二区三区成人| 国产精品久久久久aaaa| 一区二区三区精密机械公司| 日本亚洲三级在线|