指定された特殊フォルダを取得する

サンプルソース

' ファイル操作オブジェクトを生成
Set objFso = CreateObject("Scripting.FileSystemObject")

' 特殊フォルダオブジェクトを取得
Set objFolder = objFso.GetSpecialFolder(0)

Cells(1,1) = objFolder.DateCreated

' 特殊フォルダオブジェクトを解放
Set objFolder = Nothing
' ファイル操作オブジェクトを解放
Set objFso = Nothing

解説

Scripting.FileSystemObjectはファイル操作をするオブジェクトです。

GetSpecialFolderで特殊フォルダのオブジェクトを取得します。
パラメータ→ 0:Windows フォルダ、1:System フォルダ、2:Temp フォルダ




ファイル操作



Excel VBA講座
VBScriptサンプル集

日付操作

文字列操作
     ...すべてのサンプルをみる



関連リンク
 セル、シート、ブックの参照や操作、
 書式設定に関するサンプル集。
Copyright (C) ExcelVBA@Workshop All rights reserved.