- ©«¤l
- 4901
- ¥DÃD
- 44
- ºëµØ
- 24
- ¿n¤À
- 4916
- ÂI¦W
- 94
- §@·~¨t²Î
- Windows 7
- ³nÅ骩¥»
- Office 20xx
- ¾\ŪÅv
- 150
- ©Ê§O
- ¨k
- ¨Ó¦Û
- ¥x¥_
- µù¥U®É¶¡
- 2010-4-30
- ³Ì«áµn¿ý
- 2025-4-19
               
|
¥»©«³Ì«á¥Ñ 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¨ç¼Æ- Function TranStr(mystr As Variant) As String
- Dim i%
- For i = Len(mystr) To 1 Step -1
- TranStr = IIf(TranStr = "", Mid(mystr, i, 1), TranStr & Mid(mystr, i, 1))
- Next
- End Function
½Æ»s¥N½X
|
|