帖子: 9
主題: 3
精華: 0
積分: 12
點名: 0
作業系統: windows
軟體版本: 7
閱讀權限: 10
註冊時間: 2015-9-13
最後登錄: 2015-11-30

1^# 跳轉到 » 正序看帖

字體大小: tT

發表於 2015-9-22 23:54 | 只看該作者

match 搜尋不同工作表可以指定變數嗎?

如主題:match 搜尋不同工作表可以指定變數嗎?
假設~
工作表AAA裡面A欄有
AA001
AA002

工作表BBB裡面A欄有
BB001
BB002

工作表CCC裡面想使用MATCH
A1欄為AAA
A2欄為BBB
A3欄為搜尋值(假設為AA001)
A4為MATCH的結果

執行Cells(4, 1) = [MATCH(A3,AAA!A1:A20,0)]
可試出 AA001 在 AAA表中的第1個位置。
若想把當中的AAA!改成變數的方式，請問該如何修改?

例如改成
Cells(4, 1) = [MATCH(A3,Worksheets(Cells(1, 1)A1:A20,0)]
就會出現錯誤了~ 有點煩惱
還望前輩指點迷津，有勞費心了，謝謝

demo match.zip (16.2 KB)

樓主熱帖

EGBT

中學生 Rank: 2

帖子: 127
主題: 38
精華: 0
積分: 166
點名: 0
作業系統: Microsoft
軟體版本: Windows 7
閱讀權限: 20
性別: 男
註冊時間: 2015-7-31
最後登錄: 2018-8-3

50^#

發表於 2015-10-2 20:41 | 只看該作者

回復 48# GBKEE

請問GBKEE大大

關於Combobox下拉是選單的List

清單內容能不能從程式碼打好預設，而不是從儲存格?

TOP

EGBT

中學生 Rank: 2

帖子: 127
主題: 38
精華: 0
積分: 166
點名: 0
作業系統: Microsoft
軟體版本: Windows 7
閱讀權限: 20
性別: 男
註冊時間: 2015-7-31
最後登錄: 2018-8-3

49^#

發表於 2015-9-26 15:07 | 只看該作者

回復 48# GBKEE

基本上打開出現"載入DLL時發生錯誤"

這時候不管存檔與否，程式都已經消失不見了

TOP

GBKEE

超級版主 Rank: 8 Rank: 8

帖子: 5923
主題: 13
精華: 1
積分: 5986
點名: 0
作業系統: win10
軟體版本: Office 2010
閱讀權限: 150
性別: 男
來自: 台灣基隆
註冊時間: 2010-5-1
最後登錄: 2022-1-23

2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱烈參與勳章 2011兔年全勤獎章

48^#

發表於 2015-9-26 09:00 | 只看該作者

回復 47# EGBT
關閉檔案(要存檔).再開啟看看

感恩的心......(在麻辣家族討論區.用心學習會有進步的)
但資源無限,後援有限, 一天1元的贊助,人人有能力.

TOP

EGBT

中學生 Rank: 2

帖子: 127
主題: 38
精華: 0
積分: 166
點名: 0
作業系統: Microsoft
軟體版本: Windows 7
閱讀權限: 20
性別: 男
註冊時間: 2015-7-31
最後登錄: 2018-8-3

47^#

發表於 2015-9-25 21:38 | 只看該作者

回復 46# GBKEE

大大求救..為什麼會出現"載入DLL時發生錯誤"

工具 -> 設定引用項目都有打勾

我檔案都有備份，只是我想知道為什麼會出現"載入DLL時發生錯誤"...

但不是因為程式碼才導致"載入DLL時發生錯誤"的發生，因為我試過很次.....

引用項目.png (7.33 KB)

都有打勾

引用項目.png

TOP

GBKEE

超級版主 Rank: 8 Rank: 8

帖子: 5923
主題: 13
精華: 1
積分: 5986
點名: 0
作業系統: win10
軟體版本: Office 2010
閱讀權限: 150
性別: 男
來自: 台灣基隆
註冊時間: 2010-5-1
最後登錄: 2022-1-23

2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱烈參與勳章 2011兔年全勤獎章

46^#

發表於 2015-9-25 08:31 | 只看該作者

回復 44# EGBT

match_type 是 1，則 MATCH 函數會
找到等於或僅次於 lookup_value 的值。Lookup_array 必須以遞增次序排列：...-2, -1, 0, 1, 2, ..., A-Z, FALSE, TRUE。
match_type 是 -1，則 MATCH 函數會
找到等於或大於 lookup_value 的最小值。Lookup_array 必須以遞減次序排序：TRUE, FALSE, Z-A, ...2, 1, 0, -1, -2, ...，以此類推。
如果 match_type 引數被省略，則假設其值為 1

Sub test()
Dim x As Variant, Mdate As Date
x = Application.Match(Range("A1"), Range("B:B"), -1)
If IsNumeric(x) Then
Mdate = Range("b" & x)
x = Range("A1") - Mdate
If x >= 0 And x <= 5 Then MsgBox Mdate
End If
End Sub

複製代碼

感恩的心......(在麻辣家族討論區.用心學習會有進步的)
但資源無限,後援有限, 一天1元的贊助,人人有能力.

TOP

citizen0923

小學生 Rank: 1

帖子: 9
主題: 3
精華: 0
積分: 12
點名: 0
作業系統: windows
軟體版本: 7
閱讀權限: 10
註冊時間: 2015-9-13
最後登錄: 2015-11-30

45^#

發表於 2015-9-24 19:44 | 只看該作者

回復 citizen0923
GBKEE 發表於 2015-9-24 05:43

謝謝G大~ 我試出來了!!
Private Sub CommandButton1_Click()
Dim sheetx As String
sheetx = Cells(1, 1)
Cells(4, 1) = Application.Match(Range("A3"), Sheets(sheetx).Range("A1:A10"), 0)
End Sub
改成這樣~就可以自由的更改搜尋的分頁名稱了~ 再次感謝您~!!謝謝

TOP

EGBT

中學生 Rank: 2

帖子: 127
主題: 38
精華: 0
積分: 166
點名: 0
作業系統: Microsoft
軟體版本: Windows 7
閱讀權限: 20
性別: 男
註冊時間: 2015-7-31
最後登錄: 2018-8-3

44^#

發表於 2015-9-24 16:55 | 只看該作者

回復 43# GBKEE

如果 match_type 是 -1，則 MATCH 函數會找到等於或大於 lookup_value 的最小值。Lookup_array 必須以遞減次序排序：TRUE, FALSE, Z-A, ...2, 1, 0, -1, -2, ...，以此類推。

關鍵就是在...要遞減排序...我看Match說明

只有打到match_type 為 1 , Lookup_array 必須以遞增排列...

我想請問一下...假如說 match_type = -1 (找遞減)

數值：2015/1/1

陣列：
2015/1/12
2014/12/20
2014/12/10
2014/12/5

以 match_type = -1 會找到 2014/12/20

我能控制在 5日內嗎? 也就是說找2014/12/25 ~ 2014/12/29 假如沒有就是找不到

TOP

GBKEE

超級版主 Rank: 8 Rank: 8

帖子: 5923
主題: 13
精華: 1
積分: 5986
點名: 0
作業系統: win10
軟體版本: Office 2010
閱讀權限: 150
性別: 男
來自: 台灣基隆
註冊時間: 2010-5-1
最後登錄: 2022-1-23

2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱烈參與勳章 2011兔年全勤獎章

43^#

發表於 2015-9-24 15:31 | 只看該作者

本帖最後由 GBKEE 於 2015-9-24 15:37 編輯

回復 42# EGBT
x As Single (是針對溢位修改的型態 )
Match 找不到傳回錯誤值,與x的型態不對,故程式有型態不符合的誤值.
所以必須是 Dim x As Variant

Match打 1 or -1 都不行...打0就可以
應該是 Match打 0 or -1 都不行...打1就可以

Match_type 是個數字，其值有三種可能：-1、0 或 1。用以指定 Microsoft Excel 如何從 lookup_array 裡尋找 lookup_value。
如果 match_type 是 1，則 MATCH 函數會找到等於或僅次於 lookup_value 的值。Lookup_array 必須以遞增次序排列：...-2, -1, 0, 1, 2, ..., A-Z, FALSE, TRUE。
如果 match_type 是 0，則 MATCH 函數會找第一個完全等於 lookup_value 的比較值。Lookup_array 可以依任意次序排列。
如果 match_type 是 -1，則 MATCH 函數會找到等於或大於 lookup_value 的最小值。Lookup_array 必須以遞減次序排序：TRUE, FALSE, Z-A, ...2, 1, 0, -1, -2, ...，以此類推。
如果 match_type 引數被省略，則假設其值為 1。

複製代碼

感恩的心......(在麻辣家族討論區.用心學習會有進步的)
但資源無限,後援有限, 一天1元的贊助,人人有能力.

TOP

EGBT