Mega Code Archive

 

Categories / VisualBasic Script / Excel

 

Load excel file

Sub LoadExcelFile()   Dim result As Variant   result = Application.GetOpenFilename("Excel files,*.xl?", 1)   If result = False Then Exit Sub   Workbooks.Open result End Sub