'CSVファイルの取り込み 一行ずつ取得しカンマでスプリットする最も定番なパターン Sub getCSV() Dim ws As Worksheet Set ws = ThisWorkbook.Worksheets(1) Dim strPath As String strPath = "C:UsersNoriakiDropbox40_ブログvba-csvtestラーメン店アンケート_dq.csv" Dim i, j As Long Dim ...