返回列表 上一主題 發帖

[發問] 關於函數做資料剖析 如何應用於單一儲存格內大量剖析呢?

starry1314
　暱稱: 豪

高中生Rank: 3Rank: 3

帖子
471 
主題
121 
精華
0 
積分
579 
點名
0  
作業系統
WIN10 
軟體版本
OFFICE2019 
閱讀權限
50 
性別
男 
註冊時間
2015-4-16 
最後登錄
2023-1-17 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2015-6-20 14:39 | 只看該作者

[發問] 關於函數做資料剖析 如何應用於單一儲存格內大量剖析呢?

S18=牛,羊,豬,葵香

C2=MID($S$18,1,SEARCH(",",$S$18,1)-1)  
C2=  牛

那要怎麼繼續讀出後面的文字呢?
有找到但也太落落長了....因S18可能會有到雙位數的數量需要剖析...
[attach]21218[/attach]
收藏 分享

starry1314
　暱稱: 豪

高中生Rank: 3Rank: 3

帖子
471 
主題
121 
精華
0 
積分
579 
點名
0  
作業系統
WIN10 
軟體版本
OFFICE2019 
閱讀權限
50 
性別
男 
註冊時間
2015-4-16 
最後登錄
2023-1-17 
2#
發表於 2015-6-20 14:59 | 只看該作者
回復 1# starry1314


    [attach]21218[/attach]

TOP

rouber590324

帖子
561 
主題
160 
精華
0 
積分
725 
點名
0  
作業系統
WINDOWS 
軟體版本
xp 
閱讀權限
50 
性別
男 
來自
桃園 
註冊時間
2014-9-10 
最後登錄
2024-8-7 

論壇榮譽勳章論壇贊助勳章熱烈參與勳章
3#
發表於 2015-6-23 16:02 | 只看該作者
試試如下

Sub nn()
  Dim lRow&
  Dim aR, aA
  
  aR = Split([S18], ",")
  lRow = 1
  For Each aA In aR
    Cells(lRow + 1, 3) = aA
    lRow = lRow + 1
  Next
End Sub
羅

TOP

ML089

帖子
2025 
主題
13 
精華
0 
積分
2053 
點名
0  
作業系統
WIN7 
軟體版本
Office2007 
閱讀權限
100 
性別
男 
來自
台北市 
註冊時間
2011-3-2 
最後登錄
2024-3-14 

論壇榮譽勳章論壇贊助勳章熱烈參與勳章2014馬年全勤獎章2015羊年全勤獎章2016猴年全勤獎章
4#
發表於 2015-6-28 17:33 | 只看該作者
回復 1# starry1314


    函數最常用的方法 "炸開法"

=TRIM(MID(SUBSTITUTE($S$18,",",REPT(" ",99)),ROW(A1)*99-98,99))
下拉
{...} 表示需要用 CTRL+SHIFT+ENTER 三鍵輸入公式

TOP

starry1314
　暱稱: 豪

高中生Rank: 3Rank: 3

帖子
471 
主題
121 
精華
0 
積分
579 
點名
0  
作業系統
WIN10 
軟體版本
OFFICE2019 
閱讀權限
50 
性別
男 
註冊時間
2015-4-16 
最後登錄
2023-1-17 
5#
發表於 2015-6-28 18:17 | 只看該作者
回復 5# ML089


    COOL,神奇的東西~感謝分享！！

TOP

        靜思自在 : 待人退一步，愛人寬一寸，就會活得很快樂。
返回列表 上一主題