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

¦r¦ê°ÝÃD

¥»©«³Ì«á¥Ñ Hsieh ©ó 2014-6-5 09:48 ½s¿è

¦^´_ 1# ONT

¯Â¼Æ¦r¥i¥Î
=SUMPRODUCT(--MID(A1,LEN(A1)-ROW(INDIRECT("A1:A"&LEN(A1)))+1,1),10^(LEN(A1)-ROW(INDIRECT("A1:A"&LEN(A1)))))
­Y¥]§t«D¼Æ¦r¦r¦ê«h¥²¶·¨Ï¥ÎVBA¦Û©w¸q¨ç¼Æ
  1. Function TranStr(mystr As Variant) As String
  2. Dim i%
  3. For i = Len(mystr) To 1 Step -1
  4.   TranStr = IIf(TranStr = "", Mid(mystr, i, 1), TranStr & Mid(mystr, i, 1))
  5. Next
  6. End Function
½Æ»s¥N½X
¾Ç®üµL²P_¤£®¢¤U°Ý

TOP

        ÀR«ä¦Û¦b : °µ¸Ó°µªº¨Æ¬O´¼¼z¡A°µ¤£¸Ó°µªº¨Æ¬O·Mè¡C
ªð¦^¦Cªí ¤W¤@¥DÃD