返回列表 上一主題 發帖

VBA 點選href=javascript:GetUrl()

msmplay

帖子
218 
主題
73 
精華
0 
積分
290 
點名
0  
作業系統
WIN10 
軟體版本
Office2010 
閱讀權限
20 
性別
女 
註冊時間
2014-5-19 
最後登錄
2022-11-29 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2018-5-31 14:45 | 只看該作者

VBA 點選href=javascript:GetUrl()

請問如何以vba點選網頁連結按鈕，但因網頁為公司內網無法提供，還請網大幫忙看看是否有解，謝謝。


href="javascript:GetUrl('../../OrderManagement/TMSCustomerOderList.aspx','422')"


網頁按鈕與編碼如圖

網頁按鍵.PNG

收藏 分享
*宅女一枚無誤*

li_hsien

帖子
248 
主題
55 
精華
0 
積分
314 
點名
218  
作業系統
XP / WIN7 
軟體版本
2003 / 2007 
閱讀權限
20 
性別
男 
來自
Tainan 
註冊時間
2013-10-18 
最後登錄
2024-11-25 

2023年全勤獎章2022虎年全勤獎章2021牛年全勤獎章2020鼠年全勤獎章2019 豬年全勤獎章2018 狗年全勤獎章2017 雞年全勤獎章2016猴年全勤獎章論壇贊助勳章2014馬年全勤獎章2015羊年全勤獎章熱烈參與勳章
2#
發表於 2018-6-1 09:12 | 只看該作者
回復 1# msmplay

單看這一串href="javascript:GetUrl('../../OrderManagement/TMSCustomerOderList.aspx','422')"

應該看不出實際的網址吧?!

但如果你是要用VBA連網站

可以參考下方做法
  1. Sub IE()

  3.     Dim objIE As InternetExplorer
  4.    
  5.     'IE(InternetExplorer)
  6.     Set objIE = CreateObject("InternetExplorer.Application")
  7.    
  8.     objIE.Visible = True
  9.    
  10.     'URL
  11.     objIE.Navigate "http://www.google.com/"
  12.    
  13. End Sub
複製代碼
記得把引用勾起來
用功到世界末日那一天∼∼∼

TOP

msmplay

帖子
218 
主題
73 
精華
0 
積分
290 
點名
0  
作業系統
WIN10 
軟體版本
Office2010 
閱讀權限
20 
性別
女 
註冊時間
2014-5-19 
最後登錄
2022-11-29 
3#
發表於 2018-6-1 18:56 | 只看該作者
回復 2# li_hsien


  l大~~~非常感謝你，但這不是要開啟一個網頁，而是點選一個網頁中的按鈕連結也就是開啟網頁功能我會，但要再進階點選那個按鈕我就不會了!!!不知道是否有其他解呢??
*宅女一枚無誤*

TOP

faye59
　暱稱: 温奇
　頭銜: 議論者

中學生Rank: 2

帖子
104 
主題
5 
精華
0 
積分
110 
點名
0  
作業系統
win7 
軟體版本
Office2007 
閱讀權限
20 
性別
男 
註冊時間
2017-11-14 
最後登錄
2019-4-30 

論壇榮譽勳章論壇贊助勳章
4#
發表於 2018-6-9 21:36 | 只看該作者
如果是javascript按鈕觸發的話大部分我都是這樣用。
  1. myIE.document.parentwindow.execscript "javascript:__doPostBack('ctt$Content$Query','')", "JavaScript"
複製代碼
你的訊息來看我會找到Javacript產生出的網頁在裡面做操作，
取的網頁名稱方法
1.點連結進入後看Navigate網址。
2.Excel"錄製巨集"後"從Web取得外部資料"輸入網址到要的資料畫面後"匯出"，在停止錄製，從VBA內看錄下資料來源網址。

TOP

        靜思自在 : 吃苦了苦、苦盡廿來，享福了福、福盡悲來。
返回列表 上一主題