How to delete Folder using VBA

VBA RmDir Method

Here is a simple method to delete the entire folder using VBA

<?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" />

Sub Delete_Folders_FS()

Dim sFolder As String

On Error GoTo Err_Msg

sFolder = "c:\temp\2Bdeleted\"

RmDir (sFolder)

Err_Msg:

If Err.Number <> 0 Then

MsgBox Err.Description

Err.Clear

End If

End Sub