jsc0518

帖子: 455
主題: 111
精華: 0
積分: 563
點名: 68
作業系統: Windows 10
軟體版本: Office 2019
閱讀權限: 50
性別: 男
註冊時間: 2013-11-7
最後登錄: 2025-4-6

2024年全勤獎章 2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章 2017 雞年全勤獎章論壇贊助勳章

1^# 跳轉到 » 倒序看帖

打印

字體大小: tT

發表於 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.

樓主熱帖

Just do it.

samwang

大學生 Rank: 4

帖子: 976
主題: 7
精華: 0
積分: 1018
點名: 0
作業系統: Win10
軟體版本: Office 2016
閱讀權限: 50
性別: 男
註冊時間: 2013-4-19
最後登錄: 2025-1-10

2^#

發表於 2021-9-16 08:40 | 只看該作者

回復 1# jsc0518

B1 =IFERROR(IF(FIND(".",A1),TEXT(A1,"#.#")),A1)

TOP

jsc0518

高中生 Rank: 3 Rank: 3

帖子: 455
主題: 111
精華: 0
積分: 563
點名: 68
作業系統: Windows 10
軟體版本: Office 2019
閱讀權限: 50
性別: 男
註冊時間: 2013-11-7
最後登錄: 2025-4-6

2024年全勤獎章 2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章 2017 雞年全勤獎章論壇贊助勳章

3^#

發表於 2021-9-16 09:21 | 只看該作者

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

Just do it.

TOP

hcm19522

大學生 Rank: 4

帖子: 1410
主題: 4
精華: 0
積分: 1420
點名: 0
作業系統: WIN
軟體版本: 2007
閱讀權限: 50
性別: 男
註冊時間: 2015-9-11
最後登錄: 2025-4-5

熱烈參與勳章

4^#

發表於 2021-9-16 10:32 | 只看該作者

https://blog.xuite.net/hcm19522/twblog/590028723

google"EXCEL迷" blog 或google網址:https://hcm19522.blogspot.com/

TOP

samwang

大學生 Rank: 4

帖子: 976
主題: 7
精華: 0
積分: 1018
點名: 0
作業系統: Win10
軟體版本: Office 2016
閱讀權限: 50
性別: 男
註冊時間: 2013-4-19
最後登錄: 2025-1-10

5^#

發表於 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

TOP

jsc0518

高中生 Rank: 3 Rank: 3

帖子: 455
主題: 111
精華: 0
積分: 563
點名: 68
作業系統: Windows 10
軟體版本: Office 2019
閱讀權限: 50
性別: 男
註冊時間: 2013-11-7
最後登錄: 2025-4-6

2024年全勤獎章 2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章 2017 雞年全勤獎章論壇贊助勳章

6^#

發表於 2021-9-16 13:02 | 只看該作者

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

Just do it.

TOP