12
返回列表 上一主題 發帖

[發問] 請問資料比對問題,如何將多筆資料對應到一個儲存格中並用"、"分隔

happycoccolin
　暱稱: NANAKO

中學生Rank: 2

帖子
72 
主題
7 
精華
0 
積分
88 
點名
0  
作業系統
Windows 7 
軟體版本
Office 2007 
閱讀權限
20 
性別
女 
註冊時間
2012-6-28 
最後登錄
2018-11-14 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2012-7-19 15:54 | 只看該作者

[發問] 請問資料比對問題,如何將多筆資料對應到一個儲存格中並用"、"分隔

本帖最後由 happycoccolin 於 2012-7-20 17:43 編輯

哈囉~~~

請教一下,目前有資料對應的問題如下~~若單純使用VLOOKUP做,只會顯是一筆資料...不知還能怎麼寫@@

謝謝~~~~

SHEET1
A                                   B                   C
1234-5678        11111        aa、bb、cc、dd        <-如何在C欄位顯示SHEET2裡面,A欄位對應的資料,用"、"分隔,對應欄位不一定,有可能到10個
1234-5678        11111        aa、bb、cc、dd       
1234-5678        11111        aa、bb、cc、dd       
1234-5678        11111        aa、bb、cc、dd       
2345-6789        22222        ee、ff、gg       
2345-6789        22222        ee、ff、gg       
2345-6789        22222        ee、ff、gg       
3456-7890        33333                                     <-若沒有資料則顯示空白
3456-7890        33333               
3456-7890        33333               
3456-7890        33333               
3456-7890        33333               
3456-7890        33333       

SHEET2
A                                  B
1234-5678        aa
1234-5678        bb
1234-5678        cc
1234-5678        dd
2345-6789        ee
2345-6789        ff
2345-6789        gg
3456-7890
3456-7890
3456-7890
3456-7890
123.zip (7.02 KB)
收藏 分享

zz5151353

帖子
206 
主題
3 
精華
0 
積分
218 
點名
0  
作業系統
WIN10 
軟體版本
OFFICE 365 
閱讀權限
100 
性別
男 
來自
台灣台北 
註冊時間
2010-5-15 
最後登錄
2023-6-18 
2#
發表於 2012-7-27 11:37 | 只看該作者
本帖最後由 zz5151353 於 2012-7-27 12:17 編輯

函數有難度,請參考自定義函數吧

函數是可以做到  但是有一問題 沒辦法產生,噸號,豆號等等.....
{=PHONETIC(OFFSET(Sheet2!B$1,MATCH(A1,Sheet2!A:A,)-1,,COUNTIF(Sheet2!A:A,A1)))}

123.rar (8.29 KB)

300 字節以內
不支持自定義 Discuz! 代碼

TOP

happycoccolin
　暱稱: NANAKO

中學生Rank: 2

帖子
72 
主題
7 
精華
0 
積分
88 
點名
0  
作業系統
Windows 7 
軟體版本
Office 2007 
閱讀權限
20 
性別
女 
註冊時間
2012-6-28 
最後登錄
2018-11-14 
3#
發表於 2012-8-3 10:13 | 只看該作者
回復 2# zz5151353


    哈囉~~~~~我不能下載檔案耶~~也謝謝回覆~~我會了解一下內容試試看~謝謝喔!!!

TOP

c_c_lai

帖子
2035 
主題
24 
精華
0 
積分
2031 
點名
0  
作業系統
Win7 
軟體版本
Office2010 
閱讀權限
100 
性別
男 
註冊時間
2012-3-22 
最後登錄
2024-2-1 
4#
發表於 2012-8-3 10:52 | 只看該作者
本帖最後由 c_c_lai 於 2012-8-3 10:54 編輯

回復 3# happycoccolin
' 我替 zz5151353  大大回答妳的問題：
  1. Function zz(rng As Range, Page As Range, FVal) As String
  2.     Dim SN()
  3.     For i = 1 To rng.Count
  4.         If rng(i) = FVal Then
  5.             ReDim Preserve SN(s)
  6.             SN(s) = Page(i): s = s + 1
  7.         End If
  8.     Next
  9.     zz = Join(SN, "、")
  10. End Function
複製代碼

TOP

happycoccolin
　暱稱: NANAKO

中學生Rank: 2

帖子
72 
主題
7 
精華
0 
積分
88 
點名
0  
作業系統
Windows 7 
軟體版本
Office 2007 
閱讀權限
20 
性別
女 
註冊時間
2012-6-28 
最後登錄
2018-11-14 
5#
發表於 2012-9-5 18:02 | 只看該作者
回復 4# c_c_lai


    哇!!我會花時間看一下~~~謝謝您的回覆喔!!!!!

TOP

ML089

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

論壇榮譽勳章論壇贊助勳章熱烈參與勳章2014馬年全勤獎章2015羊年全勤獎章2016猴年全勤獎章
6#
發表於 2012-9-9 19:49 | 只看該作者
回復 1# happycoccolin

使用函數難以一步到位，後面增加一些輔助欄位先將各值求出，C欄再將D、E、F、....各欄字串合併起來
採用自定函數是比較簡單容易
{...} 表示需要用 CTRL+SHIFT+ENTER 三鍵輸入公式

TOP

happycoccolin
　暱稱: NANAKO

中學生Rank: 2

帖子
72 
主題
7 
精華
0 
積分
88 
點名
0  
作業系統
Windows 7 
軟體版本
Office 2007 
閱讀權限
20 
性別
女 
註冊時間
2012-6-28 
最後登錄
2018-11-14 
7#
發表於 2014-5-7 11:55 | 只看該作者
回復 4# c_c_lai


大大你好~~

突然想到~若Sheet2 B欄之中有重複的~是否可以只取一次就好,不要重複出現呢~

例如

我使用此方法後 C欄會出現

aa、bb、cc、dd、aa、aa、aa

是否可以只出現
aa、bb、cc、dd

123-0507.zip (13.08 KB)

TOP

c_c_lai

帖子
2035 
主題
24 
精華
0 
積分
2031 
點名
0  
作業系統
Win7 
軟體版本
Office2010 
閱讀權限
100 
性別
男 
註冊時間
2012-3-22 
最後登錄
2024-2-1 
8#
發表於 2014-5-7 18:34 | 只看該作者
回復 7# happycoccolin
是否如此？
  1. Function zz(rng As Range, Page As Range, FVal) As String
  2.     Dim SN(), flag As Boolean
  3.    
  4.     For i = 1 To rng.Count               '  rng.Count = 14
  5.         If rng(i) = FVal Then            '  rng(1) = "1234-5678"、
  6.             If s > 0 Then
  7.                 flag = True
  8.                 For j = 0 To s - 1
  9.                     If (SN(j) = Page(i)) Then
  10.                         flag = False
  11.                         Exit For
  12.                     End If
  13.                 Next j
  14.             Else
  15.                 flag = True
  16.             End If
  17.             
  18.             If flag Then
  19.                 ReDim Preserve SN(s)
  20.                 SN(s) = Page(i): s = s + 1   '  Page(1) = "aa"
  21.             End If
  22.         End If
  23.     Next
  24.     zz = Join(SN, "、")
  25. End Function

  27. Sub Test()
  28.     With Sheets(2)
  29.         str1 = zz(.Range("A1:A14"), .Range("B1:B14"), "1234-5678")
  30.     End With
  31.     MsgBox str1
  32. End Sub
複製代碼
123-0507.rar (15.94 KB)

TOP

happycoccolin
　暱稱: NANAKO

中學生Rank: 2

帖子
72 
主題
7 
精華
0 
積分
88 
點名
0  
作業系統
Windows 7 
軟體版本
Office 2007 
閱讀權限
20 
性別
女 
註冊時間
2012-6-28 
最後登錄
2018-11-14 
9#
發表於 2014-5-8 17:22 | 只看該作者
回復 8# c_c_lai


    是的!!!!!已經測試成功!!謝謝大大!!!!!!

TOP

happycoccolin
　暱稱: NANAKO

中學生Rank: 2

帖子
72 
主題
7 
精華
0 
積分
88 
點名
0  
作業系統
Windows 7 
軟體版本
Office 2007 
閱讀權限
20 
性別
女 
註冊時間
2012-6-28 
最後登錄
2018-11-14 
10#
發表於 2014-8-8 14:49 | 只看該作者
回復 8# c_c_lai


    板大你好,
想請教一下,若是反推,原本C欄位內資料(由逗點分開)有數個,A欄B欄資料相同,要如何把B欄資料個別取出呢?

如下

A                                  B                 C
1234-5678        11111        aa,bb,cc,dd
2345-6789        22222        ee,ff,gg
3456-7890        33333        hh,ii
-----------------------------------
拆成如下
A                                  B                 C
1234-5678        11111        aa
1234-5678        11111        bb
1234-5678        11111        cc
1234-5678        11111        dd
1234-5678        11111        aa
1234-5678        11111        aa
1234-5678        11111        aa
2345-6789        22222        ee
2345-6789        22222        ff
2345-6789        22222        gg
3456-7890        33333        hh
3456-7890        33333        ii
123-0808.rar (15.94 KB) 夾檔

TOP

        靜思自在 : 犯錯出懺悔心，才能清淨無煩惱。
12
返回列表 上一主題