http://msdn.microsoft.com/ja-jp/library/cc428203.aspx あたりにFileSystemObject オブジェクトの説明があったので見ていくまんま Dim d ' Create a variable. Set d = CreateObject("Scripting.Dictionary") d.Add "a", "アテネ" d.Add "b", "ベオグラー…