麻辣家族討論版版 » Excel程式區 » Userform Listbox Search 問題1

返回列表下一主題上一主題發帖

[發問] Userform Listbox Search 問題1

中學生 Rank: 2

帖子: 163
主題: 45
精華: 0
積分: 246
點名: 27
作業系統: win7
軟體版本: ie
閱讀權限: 20
性別: 男
註冊時間: 2015-7-8
最後登錄: 2024-9-14

1^# 跳轉到 » 倒序看帖

字體大小: tT

發表於 2021-8-11 10:07 | 只看該作者

[發問] Userform Listbox Search 問題1

各位大大你好,

我想在一個頁面里做一個選項尋找功能的, 當我一開始執行程式時,將所有數據都顯示出來, 但當我做尋找時用(Me.listbox.clear) 就會出垷error 請幫忙指點我的錯處,

還有一個問題就是如果我想分段篩選或重點選項選,我己經用了sh.Range("A2:S" & ish).AutoFilter field:=3, Criteria1:="=*" & Me.TextBox1 & "*" 但都一樣做唔到應有

InkedLISTBOX_LI.jpg (164.08 KB)

LISTBOX SEARCH.rar (23.94 KB)

樓主熱帖

收藏

　暱稱: 熱狗慶

中學生 Rank: 2

帖子: 354
主題: 5
精華: 0
積分: 387
點名: 0
作業系統: windows7
軟體版本: vba,vb,excel2007
閱讀權限: 20
性別: 男
註冊時間: 2017-1-8
最後登錄: 2024-8-2

論壇榮譽勳章論壇贊助勳章

2^#

發表於 2021-8-11 12:25 | 只看該作者

本帖最後由 singo1232001 於 2021-8-11 12:27 編輯

回復 1# mdr0465

參考看看

LISTBOX SEARCH.zip (34.21 KB)
內有一張隱藏工作表因為要搭配RowSource

中學生 Rank: 2

帖子: 163
主題: 45
精華: 0
積分: 246
點名: 27
作業系統: win7
軟體版本: ie
閱讀權限: 20
性別: 男
註冊時間: 2015-7-8
最後登錄: 2024-9-14

3^#

發表於 2021-8-11 15:49 | 只看該作者

本帖最後由 mdr0465 於 2021-8-11 15:53 編輯

回復 2# singo1232001

Singo師兄,

謝謝你的幫忙, 但當中有一些事情想麻煩你幫忙修改, 因為我我在篩選過程中, 底部的橫向捧在幾次篩選中( listbox 會自動向下放大) 而令到横向消失了,

還有一件事情, 能否開設一個按鈕是"除消"所有的篩選呢和"不必要"的圓卷選項可以刪除嗎?? 有篩選出來的項目有圓圈選項,之後我是有需要用到的

bar.png (48.74 KB)

bar2.png (49.34 KB)

　暱稱: 熱狗慶

中學生 Rank: 2

帖子: 354
主題: 5
精華: 0
積分: 387
點名: 0
作業系統: windows7
軟體版本: vba,vb,excel2007
閱讀權限: 20
性別: 男
註冊時間: 2017-1-8
最後登錄: 2024-8-2

論壇榮譽勳章論壇贊助勳章

4^#

發表於 2021-8-11 23:11 | 只看該作者

LISTBOX SEARCH v1.zip (38.74 KB) 回復 3# mdr0465

LISTBOX SEARCH v1.zip (38.74 KB)

中學生 Rank: 2

帖子: 163
主題: 45
精華: 0
積分: 246
點名: 27
作業系統: win7
軟體版本: ie
閱讀權限: 20
性別: 男
註冊時間: 2015-7-8
最後登錄: 2024-9-14

5^#

發表於 2021-8-12 00:53 | 只看該作者

回復 4# singo1232001

singo萬分感謝你的回覆,但小弟愚昧, 我看到當中的第一行是沒有被選中和能不能夠可以在每次篩選中都顯示出所以有的項目出來呢?

萬分感謝

擷取.PNG (15.89 KB)

擷取2.PNG (12.63 KB)

　暱稱: 熱狗慶

中學生 Rank: 2

帖子: 354
主題: 5
精華: 0
積分: 387
點名: 0
作業系統: windows7
軟體版本: vba,vb,excel2007
閱讀權限: 20
性別: 男
註冊時間: 2017-1-8
最後登錄: 2024-8-2

論壇榮譽勳章論壇贊助勳章

6^#

發表於 2021-8-12 01:18 | 只看該作者

LISTBOX SEARCH v1.zip (38.13 KB) 回復 5# mdr0465

中學生 Rank: 2

帖子: 163
主題: 45
精華: 0
積分: 246
點名: 27
作業系統: win7
軟體版本: ie
閱讀權限: 20
性別: 男
註冊時間: 2015-7-8
最後登錄: 2024-9-14

7^#

發表於 2021-8-12 15:54 | 只看該作者

回復 6# singo1232001

Singo師兄

再次萬分感謝你的幫忙.....
但最後一難題是當我篩選其中一個項目後
A1 儲存格的文字會跟A欄最後一個文字倒轉請問應如何解決,

謝謝你

　暱稱: 熱狗慶

中學生 Rank: 2

帖子: 354
主題: 5
精華: 0
積分: 387
點名: 0
作業系統: windows7
軟體版本: vba,vb,excel2007
閱讀權限: 20
性別: 男
註冊時間: 2017-1-8
最後登錄: 2024-8-2

論壇榮譽勳章論壇贊助勳章

8^#

發表於 2021-8-12 23:29 | 只看該作者

本帖最後由 singo1232001 於 2021-8-12 23:34 編輯

回復 7# mdr0465

不太清楚你的意思
我先順便把取資料也做了

LISTBOX SEARCH v2.zip (50.26 KB)

另外listbox的用法可以參考該討論串的7樓
http://forum.twbts.com/thread-23251-1-2.html

中學生 Rank: 2

帖子: 163
主題: 45
精華: 0
積分: 246
點名: 27
作業系統: win7
軟體版本: ie
閱讀權限: 20
性別: 男
註冊時間: 2015-7-8
最後登錄: 2024-9-14

9^#

發表於 2021-8-15 11:20 | 只看該作者

回復 8# singo1232001

Sijgo萬分感謝你感謝你

靜思自在 : 每天無所事事，是人生的消費者，積極、有用才是人生的創造者。

返回列表下一主題上一主題