・もっとも簡単かつ良くあるCSV読み込みVBAコード ・「,」「"」に対応したCSV読み込みVBAコード ・CSVをExcelブックとして開くVBA ・クエリーテーブルを使ったCSV読み込みVBAコード ・その他のCSV読み込み方法 Sub CSV入力() Dim varFileName As Variant Dim objFSO As New FileSystemObject Dim inTS As TextStream Dim strRec As String Dim strSplit() As String Dim i As Long, j As Long, k As Long Dim lngQuote As Long Dim strCell As String Dim blnCrLf As Boolean varFileName = Application.GetOpenFilen