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 を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

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

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

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

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

: 開いているファイルの現在の読み取り位置または書き込み位置を取得（Seek 関数）

Seek 関数 Open ステートメントで開いたファイル内の現在の読み取り位置 …

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

FindFile メソッド「ファイルを開く」ダイアログボックスを表示します。G …

: EOF 関数

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

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

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

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

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

: 「ファイル」ダイアログボックスを表示・設定（FileDialog オブジェクト）

FileDialog オブジェクト FileDialog オブジェクトのメソッ …

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

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

: Open ステートメントで使用できるファイル番号を取得（FreeFile 関数）

FreeFile 関数 Open ステートメントで使用するファイル番号（ 1 ～ …

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