ExcelWork.info

Excel(エクセル)のマクロ・VBA・関数・操作などのメモ

ファイルシステムオブジェクト(FileSystemObject)の使い方

      2016/12/10

ファイルシステムオブジェクト(FileSystemObject)

FileSystemObject(FSO)を利用するとファイルフォルダドライブの様々な操作を行うことができます。
FileSystemObject(FSO)を利用するには、Microsoft Scripting Runtime を参照設定するか、CreateObject 関数 を使用します。
なお、FileSystemObject の場合、使用後の解放( Set FSO = Nothing とか)は不要のようです(たぶん)。つけている方もいらっしゃるので、気になる方はつけてください。


FileSystemObject(FSO)を利用する1

Microsoft Scripting Runtime を参照設定します。

  1. VBE(Visual Basic Editor) を起動し、[ツール] – [参照設定] をクリックします。
    FSO 参照設定 1
  2. 「参照設定」ダイアログボックスが表示されるので、スクロールバーを動かし、「Microsoft Scripting Runtime」を表示し、チェックマークを付けて、「OK」ボタンをクリックします。
    FSO 参照設定 2

【書式】

<FileSystemObject のインスタンス生成>
Dim fso As New FileSystemObject


引数・戻り値

  • fso  ・・・  任意の名前( FileSystemObject オブジェクト の変数名)を指定します。



FileSystemObject(FSO)を利用する2

参照設定を行わず、CreateObject 関数を使って、FileSystemObject(FSO) を利用します。
ただし、この方法の場合、参照設定を行った場合と比べて実行速度が遅くなります。また、VBE(Visual Basic Editor)の入力支援機能を使用することはできません。


【書式】

<FileSystemObject のインスタンス生成>
Dim fso [ As Object ]
Set fso = CreateObject(“Scripting.FileSystemObject”)


引数・戻り値

  • fso  ・・・  任意の名前( FileSystemObject オブジェクト の変数名)を指定します。



FSO 使用例

サンプルVBAソース 1


実行結果 1

FSO(参照設定)使用例



サンプルVBAソース 2


実行結果 2

FSO(参照設定しない)使用例



 - FileSystemObject , , , , , ,

Comment

  1. 名無し より:

    この「参照設定を行わない使用例」は動作しないのではないでしょうか
    宣言の所で、ScriptingRuntime が参照設定になっていないためエラーで動作しないはずです
    7・8・9行目の
    As Folder
    As Files
    As File
    の3つの所は「ScriptingRuntime」が必要なはずで
    デバッグメニューからコンパイルをすると、ユーザー定義型は定義されていませんという
    エラーになりましたので、参照設定を外さずに「CreateObject」に置き換えたのかと思われます

    なので、参照設定を外していないのであればCreateObjectを使う必要性が薄いような気がいたします

    ※Officeのバージョン
    Excel 2007, Access 2007
    で確認

    • 管理人 より:

      コメントありがとうございます。

      7、8、9行目を修正しました。
      修正前のコードでは、Scripting Runtime を参照設定せずに実行すると
      「ユーザー定義型は定義されていません。」等のエラメッセージが表示され動作しません。
      ご指摘ありがとうございました。

      ※ 7、8、9行目の修正前のコードは以下の通りです。
      Dim TargetFolder As Folder
      Dim myFiles As Files
      Dim myFile As File

Message

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です

  関連記事

FSO CreateFolder メソッド
FileSystemObject:フォルダの作成(CreateFolder メソッド)

フォルダの作成(CreateFolder メソッド) FileSystemObj …

FSO Drives プロパティ
FileSystemObject:ドライブを取得する(Drives プロパティ)

ドライブ(Drives コレクション)を取得する(Drives プロパティ) F …

FSO SubFolders プロパティ
FileSystemObject:指定フォルダに含まれるすべてのフォルダを取得(SubFolders プロパティ)

フォルダに含まれるすべてのフォルダを取得(SubFolders プロパティ) F …

FSO Name プロパティ 01
FileSystemObject:フォルダまたはファイルの名前を取得または設定する(Name プロパティ)

フォルダまたはファイルの名前を取得または設定する(Name プロパティ) Fil …

FSO DriveExists メソッド
FileSystemObject:ドライブの存在確認(DriveExists メソッド)

ドライブの存在確認(DriveExists メソッド) FileSystemOb …

FSO ShortPath プロパティ・ShortName プロパティ
FileSystemObject:8.3形式のファイル名(フォルダ名)またはパスを取得(ShortPath, ShortName)

8.3形式のファイル名(フォルダ名)またはパスを取得(ShortPath, Sh …

FSO Path プロパティ
FileSystemObject:ファイルやフォルダまたはドライブのパスを取得(Path プロパティ)

ファイルやフォルダまたはドライブのパスを取得(Path プロパティ) FileS …

FSO FolderExists メソッド 1
FileSystemObject:フォルダの存在確認(FolderExists メソッド)

フォルダの存在確認(FolderExists メソッド) FileSystemO …

FileSystemObject:Folder オブジェクトの取得

Folder オブジェクトの取得 Folder オブジェクト を取得するには、F …

FileSystemObject:フォルダを移動する(MoveFolder)

フォルダを移動する(MoveFolder メソッド) FileSystemObj …