VBAでファイルを削除する方法

1. ファイルを削除する基本的なコード例:

Sub DeleteFile()
    Dim filePath As String
    filePath = "C:\path\to\file.txt" '削除したいファイルのパスを指定します
    On Error Resume Next 'エラーハンドリングを有効にします
    Kill filePath 'ファイルを削除します
    On Error GoTo 0 'エラーハンドリングを無効にします
End Sub

この基本的なコード例では、Killステートメントを使用して、指定したファイルを削除します。On Error Resume Nextステートメントは、エラーが発生した場合でも実行を継続するために使用されます。

2. ファイルの存在をチェックしてから削除するコード例:

Sub DeleteFileWithCheck()
    Dim filePath As String
    filePath = "C:\path\to\file.txt" '削除したいファイルのパスを指定します
    If Dir(filePath) <> "" Then 'ファイルが存在するかチェックします
        On Error Resume Next 'エラーハンドリングを有効にします
        Kill filePath 'ファイルを削除します
        On Error GoTo 0 'エラーハンドリングを無効にします
    End If
End Sub

このコード例では、Dir関数を使用して指定したファイルの存在をチェックしてから、ファイルを削除しています。