Você recebe um #Value porque o arquivo não existe ou houve um problema ao recuperar os dados. Se você modificar um pouco a sua função, você poderá retornar uma mensagem quando o arquivo não for encontrado.
Public Function ChkFile(Name As String) As String
Dim fso As Object
Set fso = CreateObject("Scripting.FileSystemObject")
ChkFile = IIf(fso.fileExists(Name), FileDateTime(Name), "File doesn't exist!")
Set fso = Nothing
End Function