' カンマ(,)区切りのテキストファイルを読む Workbooks.OpenText Filename:="c:\a.csv", DataType:=xlDelimited, Comma:=True ' タブ区切りのテキストファイルを読む Workbooks.OpenText Filename:="c:\a.csv", DataType:=xlDelimited, Tab:=True ' セミコロン(;)区切りのテキストファイルを読む Workbooks.OpenText Filename:="c:\a.csv", DataType:=xlDelimited, Semicolon:=True ' 空白区切りのテキストファイルを読む Workbooks.OpenText Filename:="c:\a.csv", DataType:=xlDelimited, Space:=True ' 任意