Your technology certification is waiting. Enroll in Cloud Class ®
This course will teach participants about installing and configuring Python, syntax, importing, statements, types, strings, booleans, files, lists, tuples, comprehensions, functions, and classes.
Private Sub ComboBox1_DropButtonClick()
Dim ws As Worksheet
Dim Path As String
Dim File As String
File = "Data.xlsx"
Path = "J:\John\Experts Exchange"
' Make sure the file exists
If Right(Path, 1) <> "\" Then Path = Path & "\"
If Dir(Path & File) = "" Then
MsgBox "File Not Found"
If Len(Application.Workbooks(File).Name) > 0 Then
Workbooks.Open Filename:=Path & File
For Each ws In Workbooks(File).Worksheets
Open in new window
Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.
Have a better answer? Share it in a comment.
Please enter a first name
Please enter a last name
Must be at least 4 characters long.
Join and Comment
From novice to tech pro — start learning today.
Premium members can enroll in this course at no extra cost.