[ホーム] > [VBScript FAQ 一覧] > [テキストファイルを新規に作成し書き込むサンプル]

テキストファイルを新規に作成し書き込むサンプル | VBScript / VBA FAQ



Excel VBA にて新規にファイルを作成し、そのファイルに書き込むサンプルコードです。

サンプル========================================

Const ForReading = 1
Const ForWriting = 2
Const ForAppending = 8

Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFSOFileToWrite = objFSO.OpenTextFile("c:\temp\test.txt" , ForWriting , True)

objFSOFileToWrite.Write "テスト" & Chr(13) & Chr(10)
objFSOFileToWrite.Close
set objFSOFileToWrite = nothing
Set objFSO = Nothing
================================================


[ホーム] > [VBScript FAQ 一覧]





(ご注意) 本サイト内の内容を使用して発生したいかなる時間的損害、金銭的損害あるいはいかなる損害に対して、いかなる人物も一切の責任を負いません。あくまでも個人の判断で使用してください。
本サイト内掲載されている情報は、著作権法により保護されています。いかなる場合でも権利者の許可なくコピー、配布することはできません。
このページはリンクフリーです。(このページへの直接リンクも可能です。)
雑誌等での紹介は特に連絡は不要です。
Copyright(c) tooljp.com 2007-2018