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

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

2015/12/21 2016/05/21

ファイルを削除する

ファイルを削除するには、Kill ステートメント を使用します。ファイルはディスク上から削除されるのでゴミ箱から復活させることはできません。

【構文】

Kill pathname

引数・戻り値

pathname ・・・削除するファイルの名前と場所を文字列式で指定します。複数文字のワイルドカード（*）、単一文字のワイルドカード（?）を使用することで、複数のファイルを指定することも可能です。

存在しないファイルに対して、Kill ステートメント を使用するとエラーが発生します。（ファイルの存在を確認する方法については、ファイルの検索・フォルダ内のファイル一覧を取得（Dir 関数）を参照してください。）

開いているファイルに対して、Kill ステートメント を使用するとエラーが発生します。

ディレクトリまたはフォルダを削除する方法については、ディレクトリまたはフォルダの削除（RmDir ステートメント）を参照してください。

Kill ステートメント使用例

サンプルVBAソース

　
Sub Sample01_Kill()

    'ファイルの存在確認
    If Dir("C:\Documents\tmp\mybook のバックアップ.xlk") <> "" Then

        'ファイルを削除する
        Kill "C:\Documents\tmp\mybook のバックアップ.xlk"
    
    Else
    
        MsgBox "ファイルは存在しません"
        
    End If

End Sub

Sub Sample02_Kill()

    'ファイルを削除　ワイルドカード（？）を使用
    Kill "C:\Documents\tmp\test0?.xlsx"

End Sub

Sub Sample03_Kill()

    'ファイルを削除　ワイルドカード（*）を使用
    Kill "C:\Documents\tmp\*.txt"

End Sub

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

25

26

27

28

29

30

31

　

Sub Sample01_Kill()

'ファイルの存在確認

If Dir("C:\Documents\tmp\mybook のバックアップ.xlk") <> "" Then

'ファイルを削除する

Kill "C:\Documents\tmp\mybook のバックアップ.xlk"

Else

MsgBox "ファイルは存在しません"

End If

End Sub

Sub Sample02_Kill()

'ファイルを削除　ワイルドカード（？）を使用

Kill "C:\Documents\tmp\test0?.xlsx"

End Sub

Sub Sample03_Kill()

'ファイルを削除　ワイルドカード（*）を使用

Kill "C:\Documents\tmp\*.txt"

End Sub

　

実行結果

実行前

Sub Sample01_Kill() を実行

Sub Sample02_Kill() を実行

Sub Sample03_Kill() を実行

- Excel・ファイルの操作 Excel・ファイルの操作, Kill ステートメント, VBA基本, エクセルVBA

Tweet

Message コメントをキャンセル

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

関連記事

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

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

: Excelでテキストファイルを開く（OpenText メソッド）

Excelでテキストファイルを開く OpenText メソッドで、テキストファイ …

: Excel を終了する（Quit メソッド）

Excel を終了する（Quit メソッド） Quit メソッドを実行すると、E …

: ファイルをコピー（FileCopy ステートメント）

FileCopy ステートメントファイルをコピーします。ただし、開いているファ …

: ファイル属性の取得・設定（GetAttr 関数・SetAttr ステートメント）

ファイル属性の取得（GetAttr 関数）ファイルやフォルダ（ディレクトリ）の …

: XlBuiltInDialog 列挙型

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

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

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

: 「名前を付けて保存」ダイアログボックスを表示（GetSaveAsFilename メソッド）

GetSaveAsFilename メソッド「名前を付けて保存」ダイアログボッ …

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

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

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

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

PREV: フォルダ名・ファイル名を変更（Name ステートメント）
NEXT: ディレクトリまたはフォルダの作成（MkDir ステートメント）