Excel（エクセル）のマクロ・ＶＢＡ・関数・操作などのメモ

ディレクトリまたはフォルダの削除（RmDir ステートメント）

2015/12/22 2016/05/21

ディレクトリまたはフォルダの削除

ディレクトリまたはフォルダを削除するには、RmDir ステートメント を使用します。

【構文】

RmDir path

引数・戻り値

path ・・・削除するディレクトリまたはフォルダの名前を文字列式で指定します。path には、ドライブを含めることもできます。ドライブを指定しない場合は、現在のドライブが対象となります。

存在しないディレクトリまたはフォルダに対して、RmDir ステートメント を実行しようとするとエラーが発生します。

ディレクトリまたはフォルダ内にファイルが含まれている状態で、RmDir ステートメント で、削除しようとするとエラーが発生します。ディレクトリまたはフォルダ内を空にしてから削除してください。

ディレクトリまたはフォルダを中のファイルごと削除したい場合には、FileSystemObject オブジェクト の DeleteFolder メソッド を使用すると便利です。詳細に関しては、FileSystemObject：ファイル・フォルダを削除する（DeleteFile メソッド,DeleteFolder メソッド）を参照してください。

RmDir ステートメント使用例

サンプルVBAソース

　
Sub Sample_RmDir()

    Dim delDir
    delDir = "C:\Documents\tmp\emptydir"
    
    If Dir(delDir, vbDirectory) <> "" Then
    
        'フォルダが存在する時、削除
        RmDir delDir
    
    End If

End Sub

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

　

Sub Sample_RmDir()

Dim delDir

delDir = "C:\Documents\tmp\emptydir"

If Dir(delDir, vbDirectory) <> "" Then

'フォルダが存在する時、削除

RmDir delDir

End If

End Sub

　

実行結果

実行前（「emptydir」は、空のフォルダ）

実行後

DeleteFolder メソッドで、ファイルごとフォルダを削除する例

サンプルVBAソース

　
Sub Sample_RemoveDirFile()

    Dim myFSO As Object
    
    Set myFSO = CreateObject("Scripting.FileSystemObject")
        
    'フォルダを削除
    myFSO.DeleteFolder "C:\Documents\tmp\mydir"
    
    Set myFSO = Nothing

End Sub

1

2

3

4

5

6

7

8

9

10

11

12

13

14

　

Sub Sample_RemoveDirFile()

Dim myFSO As Object

Set myFSO = CreateObject("Scripting.FileSystemObject")

'フォルダを削除

myFSO.DeleteFolder "C:\Documents\tmp\mydir"

Set myFSO = Nothing

End Sub

　

実行結果

実行前（「mydir」は、テキストファイルを含むフォルダ）

実行後

- Excel・ファイルの操作 CreateObject 関数, DeleteFolder メソッド, Excel・ファイルの操作, FileSystemObject オブジェクト, RmDir ステートメント, VBA基本, エクセルVBA

Tweet

Message コメントをキャンセル

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: テキストファイル：データを読み込む（Line Input # ステートメント）

Line Input # ステートメント Open ステートメントをシーケンシャ …

: テキストファイル：データを読み込む（Input 関数・InputB 関数）

Input 関数・InputB 関数 Open ステートメントをシーケンシャル入 …

: テキストファイル：出力する 1 行の幅を設定（Width # ステートメント）

Width # ステートメント Open ステートメントをシーケンシャル出力モ …

: 「ファイルを開く」ダイアログボックスを表示（GetOpenFilename メソッド）

GetOpenFilename メソッドファイル名を取得するための、「ファイル …

: テキストファイル（Open ステートメント・Close ステートメント）

新規ブックを開かずにテキストファイルを開く OpenText ステートメントを …

: ファイルのタイムスタンプを取得（FileDateTime 関数）

ファイルのタイムスタンプを取得ファイルのタイムスタンプを取得するには、File …

: EOF 関数

EOF 関数 Open ステートメントをランダムアクセスモード（Random） …

: テキストファイル：データを書き込む（Write # ステートメント）

Write # ステートメント Open ステートメントをシーケンシャル出力モ …

: XlBuiltInDialog 列挙型

XlBuiltInDialog 列挙型 Excel の組み込みダイアログボックス …

: ファイルの検索・フォルダ内のファイル一覧を取得（Dir 関数）

Dir 関数 Dir 関数で、ファイルの存在を確認したり、指定したフォルダ内のフ …

PREV: ディレクトリまたはフォルダの作成（MkDir ステートメント）
NEXT: ファイル属性の取得・設定（GetAttr 関数・SetAttr ステートメント）