こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

解決済みの質問

ファイル名一覧からテキストファイル生成

1000種類のテキストファイルを用意したいです。
ファイルの中身はすべて一緒でかまいません。
ファイル名が違います。
ファイル名は、Noで連番とかではないです。
ファイル名一覧を指定すれば、一括作成できる
ソフトはないでしょうか?

投稿日時 - 2005-06-11 14:08:49

QNo.1442491

困ってます

質問者が選んだベストアンサー

OSはWindowsですか?

他にも方法はあると思いますが、、、
Excelのマクロとか。

Sub Test()
Dim fs, myPath As String
 myPath = "C:\" 'パスを指定
 Set fs = CreateObject("Scripting.FileSystemObject")
 For i = 1 To Range("A65536").End(xlUp).Row
   fs.CreateTextFile myPath & Range("A" & i) & ".txt"
 Next i
End Sub

投稿日時 - 2005-06-11 14:29:41

お礼

winです。マクロまで書いてくれて、
どうもありがとうございます。

投稿日時 - 2005-06-18 01:51:31

このQ&Aは役に立ちましたか?

1人が「このQ&Aが役に立った」と投票しています

回答(1)

あなたにオススメの質問