123
返回列表 上一主題 發帖

[發問] 請問一下如何擷取A1儲存格中括號內的數值,並將之顯示在B1儲存格呢?

Hsieh

帖子
4901 
主題
44 
精華
24 
積分
4916 
點名
90  
作業系統
Windows 7 
軟體版本
Office 20xx 
閱讀權限
150 
性別
男 
來自
台北 
註冊時間
2010-4-30 
最後登錄
2024-4-18 

2023年全勤獎章2022虎年全勤獎章2021牛年全勤獎章2020鼠年全勤獎章2019 豬年全勤獎章2018 狗年全勤獎章2017 雞年全勤獎章2016猴年全勤獎章2015羊年全勤獎章2014馬年全勤獎章2013蛇年全勤獎章2012龍年全勤獎章論壇貢獻勳章熱心公益勳章2011兔年全勤獎章
11# 跳轉到 »
發表於 2012-7-18 14:07 | 只看該作者
回復 10# jackson7015

好像是在考試唷
=LEFT(MID(SUBSTITUTE(A1,"-",";",LEN(A1)-LEN(SUBSTITUTE(A1,"-",""))),FIND(";",SUBSTITUTE(A1,"-",";",LEN(A1)-LEN(SUBSTITUTE(A1,"-",""))))+1,255),LEN(A1)-(FIND(";",SUBSTITUTE(A1,"-",";",LEN(A1)-LEN(SUBSTITUTE(A1,"-",""))))+1))
學海無涯_不恥下問

TOP

jackson7015

帖子
233 
主題
53 
精華
0 
積分
292 
點名
0  
作業系統
WinXp 
軟體版本
2010 
閱讀權限
20 
性別
男 
註冊時間
2012-1-6 
最後登錄
2024-3-8 

論壇贊助勳章
12#
發表於 2012-7-19 08:24 | 只看該作者
抱歉，一直麻煩Hsieh 版大
因為想要了解，這種類似問題的相關不同排列擷取，所以才問了相似的問題
目前三種都可正常執行運用
感謝Hsieh 版大的熱心幫忙

TOP

Hsieh

帖子
4901 
主題
44 
精華
24 
積分
4916 
點名
90  
作業系統
Windows 7 
軟體版本
Office 20xx 
閱讀權限
150 
性別
男 
來自
台北 
註冊時間
2010-4-30 
最後登錄
2024-4-18 

2023年全勤獎章2022虎年全勤獎章2021牛年全勤獎章2020鼠年全勤獎章2019 豬年全勤獎章2018 狗年全勤獎章2017 雞年全勤獎章2016猴年全勤獎章2015羊年全勤獎章2014馬年全勤獎章2013蛇年全勤獎章2012龍年全勤獎章論壇貢獻勳章熱心公益勳章2011兔年全勤獎章
13#
發表於 2012-7-19 09:04 | 只看該作者
回復 12# jackson7015
這種類似問題，其實都可以自己思考，你會發現這個問題中所用的函數不就是MID函數中，擷取長度的變化
最初的技巧只有SUBSTITUTE來將最後一個分隔符號用特定字元取代，得以判斷所需擷取的片段
接下來的變形都是MID或LEFT或RIGHT來擷取部分字串
應該徹底了解整個公式的意義才能加以運用。
學海無涯_不恥下問

TOP

jackson7015

帖子
233 
主題
53 
精華
0 
積分
292 
點名
0  
作業系統
WinXp 
軟體版本
2010 
閱讀權限
20 
性別
男 
註冊時間
2012-1-6 
最後登錄
2024-3-8 

論壇贊助勳章
14#
發表於 2012-7-19 16:27 | 只看該作者
感謝Hsieh版大的指導
小弟的函數運用還在起步學習階段，相同函數多要參考多種相似運用來慢慢解析
會慢慢改進學習態度；感激Hsieh版大不吝指教

TOP

happycoccolin
　暱稱: NANAKO

中學生Rank: 2

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


Hsieh 大大請教一下~
目前我使用上遇到一個問題,利用B欄來做比對,但是若比對到例如字元為:IR10000 & R10000,會出現混淆的現象~只會抓到IR10000的值,請問要怎麼改呢?謝謝!!

Sheet1
A                                       B                   C
09-87654321        IR10000        12-34567890        
09-87654322        R10000          12-34567890 (應該要抓到12-34567891)        
09-87654323        D1               

Sheet2
A                                       B
12-34567890        R10000,R10001
12-34567891        IR10000
12-34567892        C2,D3

TOP

Hsieh

帖子
4901 
主題
44 
精華
24 
積分
4916 
點名
90  
作業系統
Windows 7 
軟體版本
Office 20xx 
閱讀權限
150 
性別
男 
來自
台北 
註冊時間
2010-4-30 
最後登錄
2024-4-18 

2023年全勤獎章2022虎年全勤獎章2021牛年全勤獎章2020鼠年全勤獎章2019 豬年全勤獎章2018 狗年全勤獎章2017 雞年全勤獎章2016猴年全勤獎章2015羊年全勤獎章2014馬年全勤獎章2013蛇年全勤獎章2012龍年全勤獎章論壇貢獻勳章熱心公益勳章2011兔年全勤獎章
16#
發表於 2012-9-5 22:23 | 只看該作者
回復 15# happycoccolin

模糊比對無法達成那就用自定義函數試試

   
未命名.png
2012-9-5 22:23
  1. Function Dictionary(key As Range, item As Range, crt As String)
  2. Set d = CreateObject("Scripting.Dictionary")
  3. For i = 1 To key.Count
  4.   For Each a In Split(key(i), ",")
  5.     d(CStr(a)) = item(i).Value
  6.   Next
  7. Next
  8. Dictionary = d(CStr(crt))
  9. End Function
複製代碼
學海無涯_不恥下問

TOP

happycoccolin
　暱稱: NANAKO

中學生Rank: 2

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


HSIEN大大我試過了謝謝您!!謝謝!

只是VBA完全不熟,還蠻想搞清楚來龍去脈的~@@

是要多花點時間研讀了

TOP

ddrreate

帖子
1 
主題
0 
精華
0 
積分
5 
點名
0  
作業系統
Windows 8 
軟體版本
Pro 
閱讀權限
10 
性別
男 
註冊時間
2013-8-1 
最後登錄
2013-8-10 
18#
發表於 2013-8-1 15:20 | 只看該作者
回復  happycoccolin
Hsieh 發表於 2012-7-2 18:10



請問這種模糊比對要如何用VBA寫出來
我的問題其實用這個函數能解決, 不過我還是想知道VBA要怎麼寫

TOP

mhl9mhl9

帖子
214 
主題
74 
精華
0 
積分
296 
點名
0  
作業系統
win7 
軟體版本
office2007 
閱讀權限
20 
性別
男 
來自
hk 
註冊時間
2013-6-17 
最後登錄
2018-11-3 
19#
發表於 2013-8-5 18:11 | 只看該作者
B1=MID(A1,FIND("(",A1)+1,FIND(")",A1)-FIND("(",A1)-1)
C5=IF(FIND(B5,Sheet2!B1)>0,Sheet2!A1,"")
lmh

TOP

shuwen0219

帖子
24 
主題
2 
精華
0 
積分
70 
點名
0  
作業系統
xp,vista,win7 
軟體版本
2003 
閱讀權限
20 
性別
女 
來自
TAIPE 
註冊時間
2010-5-4 
最後登錄
2023-7-12 
20#
發表於 2015-9-18 12:35 | 只看該作者
本帖最後由 shuwen0219 於 2015-9-18 12:38 編輯

{1187632393755295}
[T200P1275298438942244]       
請問同一欄裏的資料有這兩種,我要取出中間的數值的要怎麼做?
由後算取16碼數字.

TOP

        靜思自在 : 【生命在呼吸間】佛陀說：「生命在呼吸間。」人無法管住自己的生命，更無法擋住死期，讓自己永住人間。既然生命去來這麼無常，我們更應該好好地愛惜它、利用它、充實它，讓這無常、寶貴的生命，散發它真善美的光輝，映照出生命真正的價值。
123
返回列表 上一主題