テキストファイルの読み込み・変換について (ID:80493)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 どうしたいのでしょうか？ 1 2 3 4 5 を５ケの変数に取り込む．．．でしょうか？ そうなら Dim dat() As Strring Dim tmp As Strring Dim i As Integer tmp = "1 2 3 4 5" For i = 0 to 2 '全てのタブを１ケの空白に置換 '場合に依っては２を５とかに多くする tmp = Replace(tmp , vbTab," ") tmp = Replace(tmp , " "," ") '空白２ケを空白１ケに置換 Next i '空白が１ケの区切りになってから dat = split(tmp," ") debug.print dat(0) ' 0 debug.print dat(1) ' 1