Point :ファイルを削除したい。
Sub Test()
Dim DelFile
DelFile= "C:\My Documents\New\Test.txt
'削除したいファイルのパス
KillnDelFile
'ファイルを削除
End Sub
Kill ステートメントでは、複数のファイルを指定するための "*" (アスタリスク) および "?" (疑問符) のワイルドカード文字を使用できます。
例:フォルダ内のすべてのテキストファイルを削除するには。
Sub Test()
Dim DelFile
DelFile = "C:\My
Documents\New\*.txt
'削除したいファイルのパス
KillnDelFile
'C:\My
Documents\New内のすべてのテキストファイルを削除
End Sub
※開いているファイルを削除しようとすると、エラーが発生します。
|