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

---

作者: 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/)