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

[µo°Ý] TEXT°ÝÃD½Ð±Ð

[µo°Ý] TEXT°ÝÃD½Ð±Ð

DEAR ALL ¤j¤j
1.©ó Sheet4.Range("U2")®Ñ¼g²[¼Æ
   =TEXT(Y2,"000-00-00") °õ¦æ²[¼ÆµL°ÝÃD
2.§ï¼g¬° VBA ¦p¤U µLªk°õ¦æ.
Sub BB()
  Sheet4.Range("U2") = Text(Sheet4.Range("Y2"), "000-00-00")
End Sub
3.¦p¦ó§ï²[¼Æ¬°VBA ·Ð¤£§[½ç±Ð  THANKS*10000
ù

DEAR  luckeyfly ¤j¤j & ikboy ¤j¤j
·PÁ«ü¾É   THANKS*10000
ù

TOP

        ÀR«ä¦Û¦b : ­n§åµû§O¤H®É¡A¥ý·Q·Q¦Û¤v¬O§_§¹¬üµL¯Ê¡C
ªð¦^¦Cªí ¤W¤@¥DÃD