Mega Code Archive

 

Categories / VisualBasic Script / File Path

 

Load excel file

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