
FileSystemObjectのGetTempNameメソッドについてです。
GetTempNameメソッド
概要
ランダムに生成された一時ファイルまたはフォルダーの名前を返します。
※ファイル自体は作成されず、一時ファイル(tmpファイル)の名前と拡張子のみを取得できます。
構文
FileSystemObject.GetTempName
VBAサンプル
Tempフォルダーにランダムな名前のtmpファイルを作成して文字を書き込む。
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 | Sub test() Dim tmp As String, tmpFol As String Dim fso As Object, ts As Object 'FileSystemObjectをセット Set fso = CreateObject("Scripting.FileSystemObject") 'Tmepフォルダーのフォルダーパス tmpFol = fso.GetSpecialFolder(TemporaryFolder) 'ランダムなtmpファイルの名前と拡張子のみ取得 tmp = fso.GetTempName 'Tmepフォルダーにランダムなtmpファイルを新規作成 Set ts = fso.CreateTextFile(tmpFol & "\" & tmp) ts.Write ("一時ファイル") ts.Close End Sub |