finding whether a folder exists or not

[muralidhary]

hello
i want to find whether a folder exists or not
how can i do
please help me

[venom8]

try this :

Option Explicit
 
Private Sub Form_Load()
 
Dim myFolder As String
 
 
myFolder = Dir$("C:\SampleFolder\")
 
If myFolder = "" Then
    MsgBox "Folder does not exist!"
ElseIf myFolder <> "" Then
    MsgBox "Folder Exist!"
End If
 
End Sub

[muralidhary]

the above code is working but
it is working if the folder contains any file
otherwise the
function is returning empty string
the i am not able to verify
can u help me

[Kaverin]

If Dir$("c:\somedir", vbDirectory) <> "" Then
   'directory exists
Else
   'directory doesn't exist
End If

That should work even if the dir has no files in it, since you're explicitly looking for the dir.