■FileSpecで表されるファイルを削除する。Forceには読み取り専用属性が設定されているファイルを削除するかどうかをブール値で指定する
Sub DeleteFile(FileSpec As String,[Force As Boolean = False])
VBA FileSystemObjectの主なプロパティとメソッド - ray88’s diary
VBA FileSystemObject(ファイルシステムオブジェクト)事前バインディングと実行時バインディング - ray88’s diary
■サンプルコード
Sub Test() Dim FSO As Object Dim MyPath As String 'ファイルシステムオブジェクトをインスタンス化 Set FSO = CreateObject("Scripting.FileSystemObject") MyPath = "C:\Users\デスクトップ\ExcelVBAプロジェクト\FSOテスト" '対象ファイルが存在するかチェック If FSO.FileExists(MyPath & "\01.txt") Then '対象ファイルがあればファイルを削除する FSO.DeleteFile MyPath & "\01.txt" End If Set FSO = Nothing End Sub