VBを使い、テキストをする保存について

質問

VBで、あるデータを取得したテキストを保存する際に「テストyyyyMMdd.txt」と日付を保存名に入れて保存したいのですが、この場合の方法が解りません。ご教授お願いします。

回答No.3

kigoshi · ベストアンサー

CStr(Date) の中身は 2005/08/28 となっています。

Left(CStr(Date), 4) は、この文字列の左側４桁を抽出する、という意味です。
Mid(CStr(Date), 6, 2)　は、６文字目から２桁を、同様に　Right(CStr(Date), 2)　は右側２桁を抽出する　という意味です。

※CStrでなくてStrでよかったかも。

回答No.2

kigoshi

訂正。
.txtを忘れてました。

Open pathName & "テスト" & Left(CStr(Date), 4) & Mid(CStr(Date), 6, 2) & Right(CStr(Date), 2) & ".txt" For Output As fileNum

お礼

回答、ありがとうございます。お聞きしたいのですが・・・教えていただいたコード内の数字は何を示しているのですか？初心者なのですみませんが教えてください。

回答No.1

kigoshi

たとえば、きょうの日付でいいのなら、

Open pathName & "テスト" & Left(CStr(Date), 4) & Mid(CStr(Date), 6, 2) & Right(CStr(Date), 2) For Output As #1

でファイルオープンするといけるかな。