Excel VBA使用选定的工作表

Question

Excel VBA新手在这里.我只需要一个宏来刷新我正在查看的单张纸上的查询.我已经有了刷新宏,但我总是要指定要刷新的工作表名称.是否可以在我正在查看的任何工作表上运行宏？这是当前状态中的宏:

Sub Refresh_Query()
Sheets("Sheet1").Select
Range("B6").Select
Selection.QueryTable.Refresh BackgroundQuery:=False
End Sub

Answer 1

您想要使用ActiveSheet.Name,例如:

Sub Refresh_Query()
    Sheets(ActiveSheet.Name).Select
    Range("B6").Select
    Selection.QueryTable.Refresh BackgroundQuery:=False
End Sub