返回列表 上一主題 發帖

字串問題

本帖最後由 Hsieh 於 2014-6-5 09:48 編輯

回復 1# ONT

純數字可用
=SUMPRODUCT(--MID(A1,LEN(A1)-ROW(INDIRECT("A1:A"&LEN(A1)))+1,1),10^(LEN(A1)-ROW(INDIRECT("A1:A"&LEN(A1)))))
若包含非數字字串則必須使用VBA自定義函數
  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
複製代碼
學海無涯_不恥下問

TOP

        靜思自在 : 【時間成就一切】時間可以造就人格,可以成就事業,也可以儲積功德。
返回列表 上一主題