Be the first user to complete this post
|
Add to List |
Excel-VBA : Open a MS Word Document using Excel File using Explorer Window.
This tutorial will teach you how to Open a MS Word Document using Excel File using Explorer Window. 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:="Word Files *.doc* (*.doc*) - to open Excel files.
Complete Code:
Sub browse() Dim FSO As Object Dim blnOpen strFileToOpen = Application.GetOpenFilename(Title:="Please choose a file to open", _ FileFilter:="Word Files *.doc* (*.doc*),") If strFileToOpen = False Then MsgBox "No file selected.", vbExclamation, "Sorry!" Exit Sub Else Sheet2.Range("G5").Value = strFileToOpen Set objWord = CreateObject("Word.Application") Set objDoc = objWord.Documents.Open(strFileToOpen) objWord.Visible = True End If End Sub


Also Read:
- VBA-Excel: Create a new Word Document
- VBA-Excel: Create and Save the Word document
- VBA-Excel: Format the Existing Table in a Word document
- VBA-Excel: Format already written text in a word document – Format All Content
- Excel-VBA : Insert Multiple Images from a Folder to Excel Cells
- VBA-Excel: Get ALL The Opened Internet Explorer (IE) using Microsoft Excel
- VBA-Excel: Writing Text to Word document
- Excel-VBA : Send a Mail using Predefined Template From MS Outlook Using Excel