如何將IE瀏覽器改成火狐瀏覽器 - Excel程式區 - 麻辣家族討論版版

麻辣家族討論版版 » Excel程式區 » 如何將IE瀏覽器改成火狐瀏覽器

返回列表下一主題上一主題發帖

如何將IE瀏覽器改成火狐瀏覽器

vpower 發短消息加為好友 vpower 當前離線 UID 383 帖子 155 主題 56 精華 0 積分 242 金錢 242 點名 0 作業系統 WinXP 軟體版本專業版2002 閱讀權限 0 在線時間 64 小時註冊時間 2010-5-29 最後登錄 2011-7-18 禁止發言帖子 155 主題 56 精華 0 積分 242 點名 0 作業系統 WinXP 軟體版本專業版2002 閱讀權限 0 註冊時間 2010-5-29 最後登錄 2011-7-18	*1^# 跳轉到 »* 倒序看帖** 打印字體大小: tT 發表於 2010-9-8 18:30 \| 顯示全部帖子如何將IE瀏覽器改成火狐瀏覽器開啟IE瀏覽器 CreateObject("InternetExplorer.Application") 如果要改成火狐瀏覽器該如何更改呢? 如果要改成其他瀏覽器又要到哪個地方查詢呢? 謝謝! 收藏分享

vpower 發短消息加為好友 vpower 當前離線 UID 383 帖子 155 主題 56 精華 0 積分 242 金錢 242 點名 0 作業系統 WinXP 軟體版本專業版2002 閱讀權限 0 在線時間 64 小時註冊時間 2010-5-29 最後登錄 2011-7-18 禁止發言帖子 155 主題 56 精華 0 積分 242 點名 0 作業系統 WinXP 軟體版本專業版2002 閱讀權限 0 註冊時間 2010-5-29 最後登錄 2011-7-18	2^# 發表於 2010-9-12 15:45 \| 顯示全部帖子回復 2# jackdream 您好!好像沒有找到我要的!我把我的VBA PO上來好了! Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Target.Column = 2 And Target.Value <> "" Then '此處2表示在B欄且資料不等於空 Cancel = True '取消雙擊事件(修改資料要按F2或直接在fx區上改) With CreateObject("InternetExplorer.Application") .Navigate "http://maps.google.com.tw/" '瀏覽google Do While .Busy Or .ReadyState <> 4 DoEvents Loop .Document.all("d_d").innerText = "大溪鎮員林路三段257巷33弄45號" '這一個是出發地 .Document.all("d_daddr").innerText = Target '這一個是目的地(即b欄上資料) .Document.all("d_sub").Click '送出訊息 .Visible = True '開啟網頁視窗 End With End If End Sub 紅色的部分好像是開啟IE瀏覽器但是我想改成火狐瀏覽器可是我更改成火狐瀏覽器以後他的下一行又會出錯!請大大幫忙!謝謝!

	TOP

靜思自在 : 我們要做好社會的環保，也要做好內心的環保。

返回列表下一主題上一主題