Excel VBA - アクティブなテーブル/ドキュメントを名前で閉じる - ファイルパスではない

Question

私は定期的にYahooのリンクから株価を更新するワークブックを持っています。 'table'という名前の読み取り専用ファイルを開きます。私はいくつかの追加の回のクリックで結果がデータをインポートすることを開いて複数の「テーブル」ファイルを持っている場合は、以下の例のリンク

http://real-chart.finance.yahoo.com/table.csv?s=INTC&a=05&b=9&c=2000&d=06&e=7&f=2016&g=d&ignore=.csv

は、物事が厄介されます。

私はどこのcsv/xlsファイルが 'テーブル'という名前のファイルを開くことができるマクロを持つことができる方法はありますか？

このデータを取得するために使用される機能は

=HYPERLINK("http://real-chart.finance.yahoo.com/table.csv?s=INTC&a=05&b=9&c=2000&d=06&e=7&f=2016&g=d&ignore=.csv","link") 

であり、私は以前にも同様の近くに、ブックスクリプトを使用しましたが、私は私の人生のためにそれがあるために、このファイルを開いて参照する方法を見つけ出すことはできません閉じた

Answer 1

これは、コードを実行しているものと同じExcelインスタンスでファイルが開かれていることと、開いているファイルに変更を保存しないことを前提としています。

Sub CloseTableWorkbooks() 

Dim wb as Workbook 

For each wb in Application.Workbooks 
    If Instr(1, wb.Name, "table") Then wb.Close False 
Next 

End Sub 

Answer 2

Dim book As Workbook 
    For Each book In Application.Workbooks 
     if book.name = "table.xls" or book.name = "table.csv" then 
      book.close 
     end if 
    Next 

「あなたが閉じる前に保存しますか？」のようなあなたは、いくつかのメッセージを取得しますこれはExcelが通常行うものです。あなたもそれらを防ぐことができますが、私はあなたがそれを望むかどうかわからない。