Check a File Existence and popup an Message saying weather the file is Found or Not Found

[raghuram.star]

Hi

I have a question for you,

I'm want to run a macro where, the macro will check for the inputs given in a sheet and execute the codes, say

In Cell - B1 = FileName.doc
In Cell - B2 = C:\Directory\Folder\

Sub Check_File ()
     Dim FileName, FilePath, FileCheck as String

    FileName = Sheet1.Range("B1").Value
    FilePath = Sheet1.Range("B2").Value
    
    If FilePath = "Found" then
        If FileName = "Found" then
            Msg Box "File Found in Given Path"
            Execute Some Code
        Else
            MsgBox "File Not Found in Given Path"
        End If
    Else
            MsgBox "Given File Path Not Found"
    End If
 End Sub

I'm wondering, Is there a way to that.

Thanks in advance...

 

[njimack]

The first function in this link should point you in the right direction: Spreadsheet Page Excel Tips: Some Useful VBA Functions

 

[DeBeuz]

Hi,

Try something like this:

Sub Check_File()
    Dim FileName, FilePath, FileCheck As String

    FileName = Sheet1.Range("B1").Value
    FilePath = Sheet1.Range("B2").Value
    
    If Dir(FilePath, vbDirectory) = "" Then
        MsgBox "Given File Path Not Found"
    Else
        If Dir(FilePath & "\" & FileName) = "" Then
            MsgBox "File Not Found in Given Path"
        Else
            MsgBox "File Found in Given Path"
            'Execute Some Code
        End If
    End If
End Sub

 

[raghuram.star]

@ Debeuz

Thanks for the reply

If you don't mind, I have one doubt, Can we create the Folder Structure if it not existing

Like If I'm Searching for a Path like,
C:\Directory\Folder\Sub Folder\My Folder

In which "Sub Folder" is not existing, then can we create the "Sub Folder" under "Folder and then "My Folder" under "Sub Folder"?

In this example I have given 4 folders, if we have more folders like this can we loop and create complete Folder Structure..??

 

[Darren Bartrup]

My post here will give you the code to build a folder/subfolder structure:
http://www.mrexcel.com/forum/excel-questions/525842-creating-folders-subfolders-using-macro.html

 

[raghuram.star]

@ Darren Bartrup

Thanks for sharing the link, it cleared my doubt. Thanks!!

 

[Darren Bartrup]

No problem. Thanks for the feedback.