返回列表 上一主題 發帖

[發問] 更新WEB資料不跳轉

[發問] 更新WEB資料不跳轉

請問各位大大
我工作表1~6放了不同標的股票現價資料
7放了調閱WEB的股票現價資料
我想在1~6都放一個按鈕
按了之後會去更新WEB的資料
但焦點依然停留在目前的工作表
而不會跑到7
請問要怎寫VB按鈕呢
謝謝

我目前是用按鈕,但是這樣很不方便,每次新增工作表就得再手動增加
不知道有沒大大知道怎麼寫才能通用,而不用再新增巨集方式
謝謝

Sub Macro3()
'
' Macro3 Macro
' USER 在 2021/8/27 錄製的巨集
'

'
    Sheets("7").Select
    Cells.Select
    Range("B1").Activate
    Selection.QueryTable.Refresh BackgroundQuery:=False
    Sheets("").Select
End Sub

TOP

        靜思自在 : 能付出愛心就是福,能消除煩惱就是慧。
返回列表 上一主題