Open Excel File from within Outlook

Open frequently used files with a single click directly from Outlook.

Last modified: 2015/08/01 | Accessed: 20.615  | #84
◀ Previous sample Next sample ▶
Determine the "identity" of your emails. Set with SAM the sender, signature and folder for sent items with the help of rules.

Do you frequently want to look at a certain file, an Excel workbbok for instance? This example demonstrates how to open the file via VBA from within Outlook.

You just need to adjust the value of the 'File' variable to point to the Excel workbook.

tip  How to add macros to Outlook
Public Sub OpenMyExcelFile()
  Dim File$
  Dim Xl As Object ' Excel.Application
  Dim Wb As Object ' Excel.Workbook
  Dim Ws As Object ' Excel.Worksheet
  Dim Rn as Object ' Excel.Range

  File = "c:file.xls"

  On Error Resume Next
  Set Xl = GetObject(, "excel.application")
  On Error GoTo 0
  If Xl Is Nothing Then Set Xl = New Excel.Application
  Set Wb = Xl.Workbooks.Open(File)
  Set Ws = Wb.Sheets(1)
  Set Rn = Ws.Range("a1")
  Xl.Visible = True
End Sub
Category-Manager Category-Manager
Access the master category list in the blink of an eye, share your color categories in a network, get a reminder service, and more.
email  Send a message