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

[µo°Ý] §PÂ_Àx¦s®æ¤º¦³´X­Ó¦r¤¸¡A¨Ã¥H¨â­Ó¬°³æ¦ì±Æ¦C

[µo°Ý] §PÂ_Àx¦s®æ¤º¦³´X­Ó¦r¤¸¡A¨Ã¥H¨â­Ó¬°³æ¦ì±Æ¦C

½Ð°Ý¦U¦ì«e½ú
¦pÃD¡AÁ|­Ó¨Ò¤l
        ¨Ó·½             ¿é¥X
           B                   C
1   0x0753         53-07
2   0x1234         34-12
3   0x0900         00-09
4   0x123456    56-34-12

    ¤U­±«ü³æ¤@Àx¦s®æ®É¡G
  1.     Dim x,i  As Integer
  2.     x = (Len(Mid(Cells(1, 2), 3)))/2              '­pºâ¦@¦³´X­Ó¨â­Ó¤@²Õ
  3.     For i = 1 To x                                               '­n°µªº¦¸¼Æ
  4.         ­n½Ð«e½úÀ°¦£ªº¦a¤è
  5.     Next
½Æ»s¥N½X
§Ú©Ò¯à·Q¨ìªº¦a¤è¦p¤W¡G¤£ª¾¹D°j°é¤ºÀ³¸Ó«ç»ò°µ­pºâ
¦pªG«e½ú¦³¨ä¥L§ó²³æªº¤è¦¡¡A¤]½Ð¤£§[«ü±Ð

ÁÂÁÂ

oobird µoªí©ó 2012-3-12 21:30


¸g¹L´ú¸Õ
¥L·|Åܦ¨
0x1234   43-23

³o¬O§_¦³Àô¸`¤W¦³°ÝÃD??

TOP

¦^´_ 3# Hsieh

§Ú·Q½Ð°Ý
Len(Split(a, "x")(1))

(1) ¥Î·N¦ó¦b??
§Ú±N(1)®³±¼«á¡A·|¥X²{«¬ºA¤£²Å¦X~³o¬O¥Î¨ÓÅܧ󫬺A¶Ü??

TOP

¦^´_ 7# Hsieh


    ¤F¸Ñ±zªº·N«ä¤F~«D±`ÁÂÁÂ

    ³o¥\¯àÁÙ¯u¤è«K

TOP

¦^´_ 6# oobird


   ¸ò Hsieh ¤j¤jªº¤èªk¦³²§¦±¦P¤u¤§§®
   Åý§Ú¦h¾Ç¤F¤@ºØ
   «D±`·P¿E!!

TOP

        ÀR«ä¦Û¦b : ¤H­nª¾ºÖ¡B±¤ºÖ¡B¦A³yºÖ¡C
ªð¦^¦Cªí ¤W¤@¥DÃD