タイトル : Re^3: エクセルシートへのCSVファイルインポートについて 投稿日 : 2008/04/25(Fri) 13:03 投稿者 : るしぇ
こういうパターンの場合、Add の戻り値が追加されるテーブルの 参照になっています。 ヘルプに明記されてないのがアレですが(^^; オブジェクトブラウザで確認して戻り値が As QueryTable となっていたので間違いないでしょう。 xlQueryTables = xlSheet.QueryTables xlDataRange = xlSheet.Range("A1") xlQueryTable = xlQueryTables.Add(Connection:="TEXT;C:\test.csv", Destination:=xlDataRange) With xlQueryTable ・・・ End With でどうでしょうか? |