轉換ie物件語法為Selenium(chrome) ? - Excel程式區

帖子: 746
主題: 243
精華: 0
積分: 1002
點名: 0
作業系統: WINXP
軟體版本: OFFICE2003
閱讀權限: 50
性別: 男
註冊時間: 2011-5-30
最後登錄: 2024-5-2

11^# 跳轉到 »

發表於 2022-10-15 19:51 | 顯示全部帖子

本帖最後由 t8899 於 2022-10-15 19:52 編輯

回復 t8899

Sub test2()
Set driver = CreateObject("Selenium.ChromeDriver")
driver.Ge ...
checkout88 發表於 2022-10-15 16:12

謝謝指導，用這個速度快多了

帖子: 746
主題: 243
精華: 0
積分: 1002
點名: 0
作業系統: WINXP
軟體版本: OFFICE2003
閱讀權限: 50
性別: 男
註冊時間: 2011-5-30
最後登錄: 2024-5-2

12^#

發表於 2022-10-15 20:15 | 顯示全部帖子

本帖最後由 t8899 於 2022-10-15 20:38 編輯

回復 t8899

F8逐步測試

Sub test()
Set driver = CreateObject("Selenium.ChromeDriver")
driver ...
singo1232001 發表於 2022-10-13 20:07

driver.SwitchToNextWindow
這個我想跳到另一個程序繼續延用，會失敗 ??
程序之前有用 Public DRIVER As Object

帖子: 746
主題: 243
精華: 0
積分: 1002
點名: 0
作業系統: WINXP
軟體版本: OFFICE2003
閱讀權限: 50
性別: 男
註冊時間: 2011-5-30
最後登錄: 2024-5-2

13^#

發表於 2022-10-16 07:35 | 顯示全部帖子

回復 t8899

最上面除了
publice driver as object
多加一行
public w1,w2

w1 跟w2 沒跟過去
...
singo1232001 發表於 2022-10-16 02:16

試的結果只能用 DRIVER.SwitchToPreviousWindow ?
DRIVER.SwitchToWindowByTitle w1 '第一個交易所
DRIVER.SwitchToWindowByTitle w2 '第二個期交所
DRIVER.SwitchToNextWindow
這3個不行?

帖子: 746
主題: 243
精華: 0
積分: 1002
點名: 0
作業系統: WINXP
軟體版本: OFFICE2003
閱讀權限: 50
性別: 男
註冊時間: 2011-5-30
最後登錄: 2024-5-2

14^#

發表於 2022-10-16 09:29 | 顯示全部帖子

回復 t8899

建議你把程式碼貼出來好了

可能是沒有CLOSE掉八

或者需求說一下
singo1232001 發表於 2022-10-16 07:42

解決了
我用public w1 , 又用 DIM w1 , 把dim w1 拿掉就好了
謝謝!

帖子: 746
主題: 243
精華: 0
積分: 1002
點名: 0
作業系統: WINXP
軟體版本: OFFICE2003
閱讀權限: 50
性別: 男
註冊時間: 2011-5-30
最後登錄: 2024-5-2

15^#

發表於 2022-10-18 20:30 | 顯示全部帖子

本帖最後由 t8899 於 2022-10-18 20:36 編輯

回復 28# singo1232001

Sub test()
Set DRIVER = CreateObject("Selenium.ChromeDriver")
DRIVER.Get "https://tw.stock.yahoo.com/quote/1101.TW"
Set td = DRIVER.FindElementByXPath("//*[@id=""qsp-overview-realtime-info""]/div[2]/div[2]/div/ul")
Cells.ClearContents
' td.AsTable.ToExcel Cells(1, 1)
End Sub
圖中框起來的灰色框框不是一個table ??
要如何以table方式匯入excel ?