字串位置計算問題 - Excel程式區

[發問] 字串位置計算問題

2016猴年全勤獎章

1^# 跳轉到 »

發表於 2015-8-26 16:48 | 顯示全部帖子

Function zz(x, y)
For i = 1 To Len(x)
If Mid(UCase(x), i, 1) = UCase(y) Then a = a & ";" & i
Next
zz = Mid(a, 2)
End Function

自定函數.zip (8.6 KB)

靜思自在 : 【是否發揮了良能？】人間壽命因為短暫，才更顯得珍貴。難得來一趟人間，應問是否為人間發揮了自己的良能，而不要一味求長壽。