返回列表 上一主題 發帖

[發問] 類似Ctrl+F的功能

jsc0518

帖子
455 
主題
111 
精華
0 
積分
563 
點名
52  
作業系統
Windows 10 
軟體版本
Office 2019 
閱讀權限
50 
性別
男 
註冊時間
2013-11-7 
最後登錄
2025-3-12 

2024年全勤獎章2023年全勤獎章2022虎年全勤獎章2021牛年全勤獎章2020鼠年全勤獎章2019 豬年全勤獎章2018 狗年全勤獎章2017 雞年全勤獎章論壇贊助勳章
1# 跳轉到 »
發表於 2017-2-17 20:28 | 顯示全部帖子
回復 6# michael101772


  請問一下，我依照語法，但仍無像Ctrl+F一樣，可以到找到的欄位上，是否哪裡有誤?

能.rar (14.28 KB)
Just do it.

TOP

jsc0518

帖子
455 
主題
111 
精華
0 
積分
563 
點名
52  
作業系統
Windows 10 
軟體版本
Office 2019 
閱讀權限
50 
性別
男 
註冊時間
2013-11-7 
最後登錄
2025-3-12 

2024年全勤獎章2023年全勤獎章2022虎年全勤獎章2021牛年全勤獎章2020鼠年全勤獎章2019 豬年全勤獎章2018 狗年全勤獎章2017 雞年全勤獎章論壇贊助勳章
2#
發表於 2017-2-18 17:40 | 顯示全部帖子
回復 8# michael101772

您好，再請教一下，若我在A1 輸入 CCC
有辦法像 Ctrl +F 一樣嗎
當我按下第一次時，它會到D4
當我按下第二次時，它會到D7

Noname.jpg
Just do it.

TOP

jsc0518

帖子
455 
主題
111 
精華
0 
積分
563 
點名
52  
作業系統
Windows 10 
軟體版本
Office 2019 
閱讀權限
50 
性別
男 
註冊時間
2013-11-7 
最後登錄
2025-3-12 

2024年全勤獎章2023年全勤獎章2022虎年全勤獎章2021牛年全勤獎章2020鼠年全勤獎章2019 豬年全勤獎章2018 狗年全勤獎章2017 雞年全勤獎章論壇贊助勳章
3#
發表於 2017-2-19 08:25 | 顯示全部帖子
回復 12# cw3076

感謝您的回復

語法有加上去，仍無法移至第2個CCC，語法是不是我有誤解

Sub Search()

ActiveCell.Offset(1, 0).Activate

Worksheets("工作表1").[D:D].Find([A1]).Activate

End Sub
Just do it.

TOP

        靜思自在 : 願要大、志要堅、氣要柔、心要細。
返回列表 上一主題