【猫動画】
おすすめYouTube動画の紹介
チャンネル名【しずか日記】
高評価・チャンネル登録して頂ければ動画更新の励みになります。
フィギアスケートを見るしずく。宇野昌磨になると滅茶苦茶可愛い反応！！ジャンプを捕まえようと必死です。
Dim buf As String, tmp As Variant, n As Long
Open "ファイル名" For Input As #1
Do Until EOF(1)
Line Input #1, buf
tmp = Split(buf, ",")
n = n + 1
'項目の数だけ追加する。（例は４つの項目）
Cells(n, 1).Value = tmp(0)
Cells(n, 2).Value = tmp(1)
Cells(n, 3).Value = tmp(2)
Cells(n, 4).Value = tmp(3)
Loop
Close #1
【猫動画】
おすすめYouTube動画の紹介
チャンネル名【しずか日記】
高評価・チャンネル登録して頂ければ動画更新の励みになります。
４カ月と２歳しずくの寝顔を比較してみました