Be the first user to complete this post
|
Add to List |
Excel-VBA : Open a Excel File using Another Excel File using Browse Option.
This tutorial will teach you how to Open a Excel File using Another Excel File using Browse Option. We will be using Application.GetOpenFile() function to accomplish this.
NOTE: You can define any type file you want to , just set the proper filter.
FileFilter:="Excel Files *.xls* (*.xls*) - to open Excel files
FileFilter:="Excel Files *.txt* (*.txt*) - To open Text File
NOTE :Do not provide any filter if you want to select any type of file as attachment
Complete Code:
Sub browse() Dim FSO As Object Dim blnOpen strFileToOpen = Application.GetOpenFilename(Title:="Please choose a file to open", _ FileFilter:="Excel Files *.xls* (*.xls*),") If strFileToOpen = False Then MsgBox "No file selected.", vbExclamation, "Sorry!" Exit Sub Else Sheet1.Range("G5").Value = strFileToOpen Workbooks.Open Filename:=strFileToOpen End If End Sub
![Browse File - 1](/static/media/excel/2014/12/Browse-File-1-1024x585.jpg)
![Browse File - 2](/static/media/excel/2014/12/Browse-File-2-1024x607.jpg)
Also Read:
- Excel-VBA : Insert Multiple Images from a Folder to Excel Cells
- VBA Excel - Cells, Ranges and Offset : Offset
- VBA Codes - Record Macro
- VBA-Excel: Application.Wait OR Wait Method