EXCEL VBA中報1004錯誤

VBA中定義單元格：

1.選中單元格

2.選資料/匯入外部資料/新增web查詢

    Sheets("Sheet1").Select
    Range("A2").Select
    With Selection.QueryTable
        .Connection = _
        "URL;http://10.100.10.181:8082/pis2report/html/output.jsp?operation=FINAL-DISPLAY&fromDate=20070201&toDate=20070306"
        .Refresh BackgroundQuery:=False
        .RefreshOnFileOpen = False
        .RefreshPeriod = 0
    End With