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

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
---------------
Jacob Skaria


"Alberto Ast" wrote:

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

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

"Jacob Skaria" wrote:

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
---------------
Jacob Skaria


"Alberto Ast" wrote:

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