Re: [請益] 請問VBA將網頁下拉的寫法

看板Soft_Job作者 (既得此生當盡其用)時間7月前 (2023/09/12 19:36), 7月前編輯推噓5(723)
留言12則, 10人參與, 7月前最新討論串2/2 (看更多)
Sub OpenAndScrollChrome() '啟動Chrome瀏覽器 Shell "C:\Program Files\Google\Chrome\Application\chrome.exe" '等待Chrome開啟 Application.Wait (Now + TimeValue("00:00:05")) '模擬下箭頭鍵 Application.SendKeys "{DOWN 5}", True '等待30秒 Application.Wait (Now + TimeValue("00:00:30")) '關閉當前網頁(Ctrl+W) Application.SendKeys "^{w}", True End Sub ----- Sent from JPTT on my iPhone -- Every man for himself and God against them all. -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 114.36.125.121 (臺灣) ※ 文章網址: https://www.ptt.cc/bbs/Soft_Job/M.1694518580.A.7F3.html

09/12 20:47, 7月前 , 1F
09/12 20:47, 1F

09/12 23:25, 7月前 , 2F
酷耶來試試看
09/12 23:25, 2F

09/13 10:38, 7月前 , 3F
推,難得有程式碼可以看...
09/13 10:38, 3F

09/13 11:01, 7月前 , 4F
所以他的問題是少一個true?
09/13 11:01, 4F

09/13 12:10, 7月前 , 5F
想詢問 down 5的意思是什麼呢
09/13 12:10, 5F

09/13 12:18, 7月前 , 6F
重複次數
09/13 12:18, 6F

09/13 15:21, 7月前 , 7F
原來是這樣的思路
09/13 15:21, 7F

09/13 19:04, 7月前 , 8F
感謝大神,但是試了還是不行
09/13 19:04, 8F

09/13 19:27, 7月前 , 9F
哪裡不行?
09/13 19:27, 9F

09/13 20:54, 7月前 , 10F
down5那邊不行,網頁無法往下
09/13 20:54, 10F
試試看 For i = 1 To 5 Application.SendKeys "{DOWN}", True Application.Wait (Now + TimeValue("00:00:01")) Next i Chrome要是目前活動窗口 不然指令會被送到別的地方

09/14 01:24, 7月前 , 11F
改Application.SendKeys "{PGDN 5}", True勒?
09/14 01:24, 11F

09/14 04:38, 7月前 , 12F
此id必噓
09/14 04:38, 12F
※ 編輯: femlro (114.36.125.121 臺灣), 09/14/2023 12:22:37
文章代碼(AID): #1b04qqVp (Soft_Job)
文章代碼(AID): #1b04qqVp (Soft_Job)