VBOffice

Excel-Datei aus Outlook öffnen

Mit einem Klick können Sie immer wieder benötigte Dateien direkt aus Outlook öffnen.

Zuletzt geändert: 01.08.2015 | Aufrufe: 82.384  | #84
◀ Vorheriges Beispiel Nächstes Beispiel ▶
SAM SAM
Legen Sie fest, mit welcher "Identität" Ihre Emails beim Empfänger erscheinen sollen. Mit SAM bestimmen Sie den Absender und Speicherort für Emails anhand von Regeln.

Wenn Sie häufig eine bestimmte Datei, z.B. eine Excel-Arbeitsmappe, benötigen, lohnt es sich, diese per VBA direkt aus Outlook zu öffnen.

Im Beispiel müssen Sie noch den Wert für die Variable 'File' anpassen, damit die richtige Datei gefunden wird.


tip  So fügen Sie Makros in Outlook ein
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)
  Ws.Activate
  Set Rn = Ws.Range("a1")
  Rn.Activate
  Xl.Visible = True
End Sub
OLKeeper OLKeeper
Der OLKeeper verhindert zuverlässig, dass Sie Microsoft Outlook unbeabsichtigt schließen und so etwa wichtige Emails verpassen würden.
email  Senden Sie eine Nachricht