返回列表 上一主題 發帖

請問分割字串..

准提部林

帖子
2848 
主題
10 
精華
0 
積分
2903 
點名
0  
作業系統
〔略〕 
軟體版本
〔略〕 
閱讀權限
100 
性別
男 
來自
〔略〕 
註冊時間
2013-5-13 
最後登錄
2026-7-25 
1# 跳轉到 »
發表於 2015-9-8 10:19 | 顯示全部帖子
本帖最後由 准提部林 於 2015-9-8 10:24 編輯

A1文字：TV,早餐,dinner,1235Apple
Sub TEST()
TT = Split([A1], ",")
[B1].Resize(, UBound(TT) + 1) = TT
End Sub

或：
TT = Split([A1] & ",", ",")　'文字串多加一個逗號，可略過A1空白時的錯誤（不然就要以if去排除）
[B1].Resize(, UBound(TT)) = TT

TOP

        靜思自在 : 不怕事多，只怕多事。
返回列表 上一主題