VBA code to find file names within a folder on local drive

[gogazapr]

I have been given a large list of file names in excel worksheet. I have to find which of those files DO NOT exist in a folder on my local drive. Is there a VBA code I can write to perform this operation?
Note: most of the files are in the folder, I have to identify those that are not.

 

[John_w]

This macro expects the file names in column A starting at A2 and puts the results in column B.

Public Sub Find_Files_In_Folder()

    Dim sourceFolder As String
    Dim fileNames As Variant
    Dim fileNameCell As Range
    
    sourceFolder = "C:\path\to\folder"    'CHANGE FOLDER PATH
    
    fileNames = "|" & Replace(CreateObject("WScript.Shell").Exec("cmd /c DIR /B /A-D """ & sourceFolder & """").StdOut.ReadAll, vbCrLf, "|")
    
    With ActiveSheet
        For Each fileNameCell In .Range("A2", .Cells(.Rows.Count, "A").End(xlUp))
            If InStr(1, fileNames, "|" & fileNameCell.Value & "|", vbTextCompare) Then
                fileNameCell.Offset(, 1).Value = "Found"
            Else
                fileNameCell.Offset(, 1).Value = "Not found"
            End If
        Next
    End With
    
End Sub