¥»©«³Ì«á¥Ñ ziv976688 ©ó 2021-7-19 04:59 ½s¿è
EX¡G
.Range("D2", "J" & Nrange - Num) .Copy .Range("K2") => OK
¦ý¥Î¦b¤½¦¡Âà´«ªº»yªk´N¤£¦æ¤F~
.[D2:J101].Formula = "=LEFT(TEXT(SUM(TEXT(MOD(M2+(0&TRIM(MID(SUBSTITUTE(V2,"","","" ""),1+{0,1,2,3,4}*9,9))),49),""[=0]!49"")*10^{8,6,4,2,0}),""00!,00!,00!,00!,00""),IF(V2="""",0,CHOOSE(1+LEN(V2)-LEN(SUBSTITUTE(V2,"","",)),2,5,8,11,14)))"
.[D2:J101] = .[D2:J101].Value
¦]¬°J101¬O¯B°Ê¦ì§}¡A©Ò¥H·Q±N.[D2:J101] §ï¬°¦p¦ü .Range("D2", "J" & Nrange - Num) ªº·N«ä¡A
¥H§Q¤½¦¡¯à¦Û°Ê¶ñº¡«á~¦AÂର¯ÂÈ¡C
½Ð°Ý¡G»yªkÀ³¸Ó«ç»ò½s¼g¡H
ÁÂÁÂ ! |