| 
    
     |  | 返信が遅くなりましてすみませんでした。 お教えいただいた内容は実は最初に試みてはみたのですが、別ウィンドウで立ち上がってしまうため、他の方法を探しておりました。ただ、Macから出力されたデータという事でなかなかうまくいかないため、この方法で何とか運用してみようかと思います。ありがとうございました。
 
 ▼n さん:
 >>拡張子をtxt形式に直し、エクセルシートから「開く」をクリックして、テキストファイルウィザードでカンマにチェックを入れて完了を押すと正常に表示される..
 >..という事ですよね。
 >その作業をマクロ記録してみてもらえませんか。
 >OpenTextメソッドの引数Originがどう記録されるか、確認してみたいんですが。
 >
 >それによっては
 >Dim x
 >x = Application.GetOpenFilename("csv,*.csv")
 >If VarType(x) = vbBoolean Then Exit Sub
 >Workbooks.OpenText Filename:=x, Origin:=10001, DataType:=xlDelimited, TextQualifier:=xlDoubleQuote, Comma:=True
 >こんな感じでいけるハズ。
 
 
 |  |