フォルダ情報を表示する

サンプルソース

' ファイル操作オブジェクトを生成
Set objFso = CreateObject("Scripting.FileSystemObject")
' フォルダオブジェクトを生成
Set objFolder = objFso.GetFolder("c:\windows")

' フォルダの作成日時を取得
Cells(1,1) = "作成日時:" & objFolder.DateCreated
' フォルダの更新日時を取得
Cells(1,1) = "更新日時:" & objFolder.DateLastModified
' フォルダのサイズを取得
Cells(1,1) = "サイズ:" & objFolder.Size
' フォルダのタイプを取得
Cells(1,1) = "タイプ:" & objFolder.Type
' フォルダの属性を取得
Cells(1,1) = "属性:" & objFolder.Attributes

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

解説

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

GetFolderで指定されたパスのフォルダオブジェクトを取得します。





ファイル操作




Excel VBA講座




アクセスランキング


文字操作
関連する内容
データ型操作
日付操作
配列操作
ファイル操作
データベース操作
ディクショナリ操作


Copyright (C) Excel@Workshop All rights reserved.