jesscc

帖子: 162
主題: 44
精華: 0
積分: 244
點名: 0
作業系統: windows 7
軟體版本: office 2010
閱讀權限: 20
性別: 男
註冊時間: 2011-4-4
最後登錄: 2022-10-3

論壇贊助勳章

1^# 跳轉到 » 正序看帖

打印

字體大小: tT

發表於 2021-8-17 16:43 | 只看該作者

[發問] 以 Enter 替代按鈕

原程式是我在D3輸入查詢文字後(不想用TextBox物件)，按按鈕可以進行查詢，但現在希望按鍵盤 Enter 也可調用CommandButton1的查詢功能，該如何做呢?

活頁簿1.rar (10.14 KB)

樓主熱帖

Jess

jesscc

中學生 Rank: 2

帖子: 162
主題: 44
精華: 0
積分: 244
點名: 0
作業系統: windows 7
軟體版本: office 2010
閱讀權限: 20
性別: 男
註冊時間: 2011-4-4
最後登錄: 2022-10-3

論壇贊助勳章

12^#

發表於 2021-8-19 20:25 | 只看該作者

感謝兩位大大的指導。

Jess

TOP

singo1232001

　暱稱: 熱狗慶

中學生 Rank: 2

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

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

11^#

發表於 2021-8-19 18:52 | 只看該作者

enter觸發 v3.zip (20.07 KB) 回復 10# jesscc

3跟4 玩玩看
沒招了剩下看有沒有大大能幫你= =

TOP

jesscc

中學生 Rank: 2

帖子: 162
主題: 44
精華: 0
積分: 244
點名: 0
作業系統: windows 7
軟體版本: office 2010
閱讀權限: 20
性別: 男
註冊時間: 2011-4-4
最後登錄: 2022-10-3

論壇贊助勳章

10^#

發表於 2021-8-19 17:37 | 只看該作者

其實我要的效果簡單表達就是這樣
CommandButton1 --> Click --> 觸發(只要[D3]<>""，不論儲存格的選取發生任何變化)
鍵盤 Enter --> Click --> 觸發(只要[D3]<>""，不論儲存格的選取發生任何變化)
所以鍵盤 Enter = CommandButton1

S大的V1版本比較能對應我要的效果，因為我查過一些類似 key code=13 的寫法，似乎可以把焦點對應到鍵盤ENTER上，所以思路一直朝這方向發展。

Jess

TOP

singo1232001

　暱稱: 熱狗慶

中學生 Rank: 2

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

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

9^#

發表於 2021-8-19 13:25 | 只看該作者

回復 8# jesscc

enter觸發 v2.zip (15.88 KB)
自動觸發(2)試試因為你的需求與你原先的解釋有點模糊
我只能用猜的

TOP

jesscc

中學生 Rank: 2

帖子: 162
主題: 44
精華: 0
積分: 244
點名: 0
作業系統: windows 7
軟體版本: office 2010
閱讀權限: 20
性別: 男
註冊時間: 2011-4-4
最後登錄: 2022-10-3

論壇贊助勳章

8^#

發表於 2021-8-19 12:40 | 只看該作者

回復 7# Andy2483

A大，我應該這樣敘述
輸入關鍵字後，沒有立刻按 Enter 而是用滑鼠點選[D3]以外任意儲存格，此時會有一次因滑鼠點擊的觸發，但這次觸發之後鍵盤 Enter 就沒作用了。
所以目前的程式是輸入關鍵字後，必須按 Enter 才會有一次Enter觸發(但這個Enter觸發並不是因為連結了查詢按鈕，因為不管滑鼠點在哪裡，查詢按鈕是隨時可觸發的)

Jess

TOP

Andy2483

　暱稱: 厚臉皮的學生

大學生 Rank: 4

帖子: 1425
主題: 40
精華: 0
積分: 1449
點名: 0
作業系統: Windows 7
軟體版本: Excel 2010 & 2016
閱讀權限: 50
性別: 男
來自: 台灣
註冊時間: 2020-7-15
最後登錄: 2024-4-16

7^#

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

回復 6# jesscc

謝謝S大。試 Run 後感覺功能是我想要的，但是輸入關鍵字後，用滑鼠點選[D3]以外任意儲存格，這時鍵盤 Enter 就沒作用了，證明鍵盤 Enter 和查詢按鈕沒達成焦點連結，不知這是不是Worksheet_SelectionChange觸發的硬傷。
謝謝A大。輸入關鍵字後，用滑鼠點選任意儲存格都會觸發，鍵盤 Enter 和查詢按鈕沒達成焦點連結。
兩段紅色字是不是矛盾了? 還是其他意思?

用行動裝置瀏覽論壇學習很方便,謝謝論壇經營團隊
請大家一起上論壇來交流

TOP

jesscc

中學生 Rank: 2

帖子: 162
主題: 44
精華: 0
積分: 244
點名: 0
作業系統: windows 7
軟體版本: office 2010
閱讀權限: 20
性別: 男
註冊時間: 2011-4-4
最後登錄: 2022-10-3

論壇贊助勳章

6^#

發表於 2021-8-19 08:22 | 只看該作者

謝謝S大。試 Run 後感覺功能是我想要的，但是輸入關鍵字後，用滑鼠點選[D3]以外任意儲存格，這時鍵盤 Enter 就沒作用了，證明鍵盤 Enter 和查詢按鈕沒達成焦點連結，不知這是不是Worksheet_SelectionChange觸發的硬傷。
謝謝A大。輸入關鍵字後，用滑鼠點選任意儲存格都會觸發，鍵盤 Enter 和查詢按鈕沒達成焦點連結。

Jess

TOP

Andy2483