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

関連記事

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

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

: XlBuiltInDialog 列挙型

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

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

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

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

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

: Excel の組み込みダイアログボックス（Dialog, Dialogs）

Excel の組み込みダイアログボックスを表示 Dialog オブジェクトを使 …

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

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

: フォルダ名・ファイル名を変更（Name ステートメント）

フォルダ名およびファイル名を変更 Name ステートメントで、ファイル、ディレ …

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

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

: ファイルを削除（Kill ステートメント）

ファイルを削除するファイルを削除するには、Kill ステートメントを使用しま …

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

Get ステートメント Open ステートメントをランダムアクセスモード（Ra …

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