Board logo

標題: [發問] 抓取特殊符號左右的值 [打印本頁]

作者: jsc0518    時間: 2021-9-16 07:34     標題: 抓取特殊符號左右的值

Dear all,
大家好!
請問一下:
A1 =  1.5/2.3/3 ,我要如何把值給取出  B1=1.5、C1=2.3、D1=3
另外我的數值有時候無小數點,有時候小數點會到1~3位,請問公式要如何下?

Thank you.
作者: samwang    時間: 2021-9-16 08:40

回復 1# jsc0518



B1 =IFERROR(IF(FIND(".",A1),TEXT(A1,"#.#")),A1)
作者: jsc0518    時間: 2021-9-16 09:21

回復 2# samwang
Dear samwang,
感謝您的回覆歐。
抱歉我沒把問題說得很清楚,我想要的是如下圖的呈現。感恩


[attach]34029[/attach]
作者: hcm19522    時間: 2021-9-16 10:32

https://blog.xuite.net/hcm19522/twblog/590028723
作者: samwang    時間: 2021-9-16 10:37

回復 3# jsc0518

請測試看看,謝謝

Sub test()
Dim a, Ar()
a = Split(Cells(1, 1), "/")
For i = 0 To UBound(a)
    ReDim Preserve Ar(s)
    Ar(s) = Split(Cells(1, 1), "/")(i)
    s = s + 1
Next
Range("b1").Resize(1, s) = Ar
End Sub
作者: jsc0518    時間: 2021-9-16 13:02

回復 5# samwang
Dear samwang,
VBA可以拆分可以用歐,感謝您




歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)