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: 63.078  | #84
◀ Vorheriges Beispiel Nächstes Beispiel ▶
ReplyAll ReplyAll
Mit diesem Addin für Outlook erhalten Sie in verschiedenen Situationen eine Warnung, bevor Sie auf eine Email versehentlich allen anderen Empfängern antworten.

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
Reporter Reporter
Mit dem Reporter erstellen Sie Berichte für Ihre Outlook Daten. Mit wenigen Klicks werden Werte aus Aufgaben, Terminen und dem Journal summiert.
email  Senden Sie eine Nachricht