Load excel file : Workbook File « Excel « VBA / Excel / Access / Word






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

 








Related examples in the same category

1.Is selected file open?
2.Open Workbook file (xls file)
3.Get path of current work book
4.Get work book from same directory
5.Save as the active workbook
6.Get next file name
7.Open a text file for workbook
8.Get active workbook name only(without path name)
9.Presents user with a GetOpenFileName dialog that allows multiple file selection.
10.tells you how many workbooks are open
11.Save changes automatically, specify this as a parameter of the Close method