open file validation

[Alberto Ast]

how do I validate while trying to open a file with macros so it will not fail
if file does not exist?

 

[Jacob Skaria]

Try the below..


Sub Macro()

Dim strFile As String
Dim wb As Workbook

strFile = "c:\1.xls"
If Dir(strFile, vbNormal) = "" Then
MsgBox strFile & vbLf & "File not found": Exit Sub
End If
Set wb = Workbooks.Open(strFile)
End Sub

If this post helps click Yes

 

[Alberto Ast]

thanks Jacob, I'll try it...
thanks for your support on several questions today.