VBA check if file exists

by

something like this

best to use a workbook variable to provide further control (if needed) of the opened workbook

updated to test that file name was an actual workbook – which also makes the initial check redundant, other than to message the user than the Textbox is blank

Dim strFile As String
Dim WB As Workbook
strFile = Trim(TextBox1.Value)
Dim DirFile As String
If Len(strFile) = 0 Then Exit Sub

DirFile = "C:\Documents and Settings\Administrator\Desktop\" & strFile
If Len(Dir(DirFile)) = 0 Then
  MsgBox "File does not exist"
Else
 On Error Resume Next
 Set WB = Workbooks.Open(DirFile)
 On Error GoTo 0
 If WB Is Nothing Then MsgBox DirFile & " is invalid", vbCritical
End If

More Related Contents:

  1. Save excel file multiple times with file names in another workbook.
  2. Read/Parse text file line by line in VBA
  3. How do I find the last column with data?
  4. Easiest way to loop through a filtered list with VBA?
  5. What is the difference between dim and set in vba
  6. Quicker way to get all unique values of a column in VBA?
  7. How to set recurring schedule for xlsm file using Windows Task Scheduler
  8. Parsing an ISO8601 date/time (including TimeZone) in Excel
  9. Getting the actual usedrange
  10. Delete a row in Excel VBA
  11. VBA: Convert Text to Number
  12. Concatenate cell data into another data if values matches
  13. Iterating through populated rows
  14. How can I run VBA code each time a cell gets its value changed by a formula?
  15. How to convert 32 bit VBA code into 64 bit VBA code
  16. Using VBA to detect which decimal sign the computer is using
  17. Referencing Excel Userform Control Name Value From String (VBA)
  18. Loop through each row of a range in Excel
  19. Outputting Excel rows to a series of text files
  20. How to create a range from two ranges in VBA?
  21. XML parse VBA excel (function trip, & MSXML2.DOMDocument)
  22. Refreshing all the pivot tables in my excel workbook with a macro
  23. Countif With Multiple OR Criteria
  24. Vlookup to copy color of a cell
  25. every possible combination of the contents of 2 columns in excel
  26. excel vba freeze pane without select
  27. How to delete rows in Excel based on criteria using VBA?
  28. Converting a string representation of a constant into a constant?
  29. Macro to export MS Word tables to Excel sheets
  30. VBA WinHTTP to download file from password proteced https website

Leave a Comment