フォルダを削除
フォルダを削除します。
Option Explicit
Call sbDeleteFolder("abc")
Sub sbDeleteFolder(ByVal strFolderPath)
Dim fsoTemp
Set fsoTemp = CreateObject("Scripting.FileSystemObject")
Call fsoTemp.DeleteFolder(strFolderPath, True)
Set fsoTemp = Nothing
End Sub