PTT推薦

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

看板Soft_Job標題Re: [請益] 請問VBA將網頁下拉的寫法作者
femlro
(既得此生當盡其用)
時間推噓 5 推:7 噓:2 →:3

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留言評論
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 114.36.125.121 (臺灣)
PTT 網址

brucetu09/12 20:47

neo527709/12 23:25酷耶來試試看

lchcoding09/13 10:38推,難得有程式碼可以看...

B098869808809/13 11:01所以他的問題是少一個true?

kero96124009/13 12:10想詢問 down 5的意思是什麼呢

TSMCfabXX09/13 12:18重複次數

neo527709/13 15:21原來是這樣的思路

erpp09/13 19:04感謝大神,但是試了還是不行

femlro09/13 19:27哪裡不行?

erpp09/13 20:54down5那邊不行,網頁無法往下

試試看 For i = 1 To 5 Application.SendKeys "{DOWN}", True Application.Wait (Now + TimeValue("00:00:01")) Next i Chrome要是目前活動窗口 不然指令會被送到別的地方

Firstshadow09/14 01:24改Application.SendKeys "{PGDN 5}", True勒?

peter9809/14 04:38此id必噓

※ 編輯: femlro (114.36.125.121 臺灣), 09/14/2023 12:22:37