Excel2000 VBA WEBからCSVファイルを読み込んだ後のクエリーの削除

Excel2000 VBA  WEBからCSVファイルを読み込んだ後のクエリーの削除

クエリーの削除を行わないとクエリーがどんどん増えるので必ず削除する

例　東電の過去データ２０１１年度を読み込む処理

With ActiveSheet.QueryTables.Add(Connection:= _
        "URL;http://www.tepco.co.jp/forecast/html/images/juyo-2011.csv", Destination:= _
        Sheets("sheet1").Range("B2"))
        .Name = "2011" '名前を設定する読込シート名
        .Refresh BackgroundQuery:=False
        .Delete   'クエリー削除
End With

過去に書いた東電のCSVファイルの読込記事は間違いが多かった（ 間違いに気づいたのは進歩と言う事）

 

タグ：Excel2000 VBA