ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

´M§ä&¨ú¥N

¦^´_ 2# register313
½Ð°Ý±z¬°¦ó¥Î Rng.Replace S(I), Application.Text(S(I) / 100, "J00") ªº¤è¦¡³B²z¡H
¥¦»P¤U¦C³B²z¤è¦¡¡A®t§O¦b©ó¤@­Ó¥H°}¦C¡B¤@­Ó¥Hª½±µ´À´«ªº¤è¦¡°µ²§°Ê¡C
R = Array("J07", "J11", "J15", "J23")
Rng.Replace S(I), R(I)
¦ý§Ú¦n©_ªº¬O Application.Text(S(I) / 100, "J00") ¬O¦p¦ó¹B§@ªº¡H
ÁÂÁ±z¡I

TOP

¦^´_ 4# register313
§Ú¥Î¤F     Range("D5").Value = Format(11, "J00") ¨Ó°µ´ú¸Õ¡A³ºµMµª®×·|¬O J11¡A
Amazing!  
Thanks a lot.

TOP

        ÀR«ä¦Û¦b : ¡i°±º¢¤£«e¡A²×µL©Ò±o¡j¤H³£°g©ó´M§ä©_ÂÝ¡A¦]¦Ó°±º¢¤£«e¡FÁa¨Ï®É¶¡¦A¦h¡B¸ô¦Aªø¡A¤]¤FµL¥Î³B¡A²×µL©Ò±o¡C
ªð¦^¦Cªí ¤W¤@¥DÃD