FileSystemObject：フォルダを移動する（MoveFolder）

サイト管理人

9年前

フォルダを移動する（MoveFolder メソッド）

FileSystemObject（FSO）を使用して、フォルダを移動します。FileSystemObject（FSO）のインスタンスを生成する方法は、ファイルシステムオブジェクト（FileSystemObject）の使い方を参照してください。

【書式】

object.MoveFolder ( source, destination )

引数・戻り値

object ・・・ FileSystemObject オブジェクトを指定します。
source ・・・移動するフォルダのパスを含むファイル名を指定します。
destination ・・・移動先のパスを指定します。

引数 source のパスの最後のフォルダ名にのみ、ワイルドカードが使用でき、該当するフォルダが複数あればまとめて移動することができます。また一致するフォルダがない場合、エラーが発生します。なお、destination にはワイルドカードは使用できません。

FileSystemObject メソッド使用例

サンプルVBAソース

　
Sub Sample_MoveFolder()

    Dim fso As New FileSystemObject
    Dim sFolder As String
    Dim dFolder As String
    
    sFolder = "C:\Documents\mydata1\a*"
    dFolder = "C:\Documents\mydata2"
    
    fso.MoveFolder sFolder, dFolder

End Sub

Sub Sample_MoveFolder()

Dim fso As New FileSystemObject

Dim sFolder As String

Dim dFolder As String

sFolder = "C:\Documents\mydata1\a*"

dFolder = "C:\Documents\mydata2"

fso.MoveFolder sFolder, dFolder

End Sub

実行結果

サンプルVBAソース実行前

サンプルVBAソース実行後

フォルダを移動する（MoveFolder メソッド）

引数・戻り値

FileSystemObject メソッド 使用例

サンプルVBAソース

実行結果

FileSystemObject メソッド使用例