Aufgabenorganisation und vieles mehr. Während es bereits sehr benutzerfreundlich ist, gibt es doch Momente, in denen wir uns eine etwas spezifischere oder automatisierte Erfahrung wünschen. Stellen Sie sich vor, Sie könnten Outlook so konfigurieren, dass es automatisch Ihre bevorzugten Fenster in der Reihenfolge und Größe öffnet, die Sie bevorzugen, jedes Mal, wenn Sie die Anwendung starten. In diesem Artikel werden wir genau das tun und Ihnen zeigen, wie Sie ein einfaches VBA (Visual Basic for Applications) Skript erstellen können, das Ihre Outlook-Erfahrung optimiert.
VBA ermöglicht es, benutzerdefinierte Automatisierungs-Skripte in vielen Microsoft Office-Anwendungen zu schreiben, einschließlich Outlook. Wir werden ein Skript erstellen, das automatisch vier spezifische Outlook-Fenster (E-Mail, Kalender, Kontakte und Aufgaben) in einer bestimmten Reihenfolge und Größe öffnet, sobald die Anwendung gestartet wird. Dies kann besonders nützlich sein, wenn Sie Ihre täglichen Aufgaben straffen und Ihren Workflow verbessern möchten.
Schritt 1: VBA-Editor öffnen
Zunächst müssen Sie den VBA-Editor in Outlook öffnen. Das können Sie tun, indem Sie Alt + F11
drücken, während Sie in Outlook sind.
Schritt 2: Skript einfügen
Im VBA-Editor finden Sie auf der linken Seite ein Fenster, das als „Projekt-Explorer“ bezeichnet wird. Hier sollten Sie „Microsoft Office Outlook-Objekte“ und darunter „ThisOutlookSession“ sehen. Doppelklicken Sie auf „ThisOutlookSession“, um den Code-Editor zu öffnen. Fügen Sie dann das VBA-Skript ein, das wir Ihnen zur Verfügung gestellt haben.
Private Sub Application_Startup()
Dim myOlApp As New Outlook.Application
Dim myNameSpace As Outlook.NameSpace
Dim myInbox As MAPIFolder
Dim myExplorer As Explorer
Set myNameSpace = myOlApp.GetNamespace("MAPI")
Set myInbox = myNameSpace.GetDefaultFolder(olFolderInbox)
' E-Mail
Set myExplorer = myOlApp.Explorers.Add(myInbox, olFolderDisplayNoNavigation)
myExplorer.Display
myExplorer.WindowState = olNormalWindow
myExplorer.Top = 0
myExplorer.Left = 0
myExplorer.Width = 600
myExplorer.Height = 800
' Kalender
Set myExplorer = myOlApp.Explorers.Add(myNameSpace.GetDefaultFolder(olFolderCalendar), olFolderDisplayNoNavigation)
myExplorer.Display
myExplorer.WindowState = olNormalWindow
myExplorer.Top = 0
myExplorer.Left = 600
myExplorer.Width = 600
myExplorer.Height = 800
' Kontakte
Set myExplorer = myOlApp.Explorers.Add(myNameSpace.GetDefaultFolder(olFolderContacts), olFolderDisplayNoNavigation)
myExplorer.Display
myExplorer.WindowState = olNormalWindow
myExplorer.Top = 0
myExplorer.Left = 1200
myExplorer.Width = 600
myExplorer.Height = 800
' Aufgaben
Set myExplorer = myOlApp.Explorers.Add(myNameSpace.GetDefaultFolder(olFolderTasks), olFolderDisplayNoNavigation)
myExplorer.Display
myExplorer.WindowState = olNormalWindow
myExplorer.Top = 0
myExplorer.Left = 1800
myExplorer.Width = 600
myExplorer.Height = 800
End Sub
Schritt 3: Skript erklärt
In dem VBA-Skript gibt es bestimmte Eigenschaften für jeden Explorer
-Objekt, das die Fenster für E-Mails, Kalender, Kontakte und Aufgaben repräsentiert. Diese Eigenschaften legen die Position und Größe der jeweiligen Fenster fest:
Top
: Setzt die obere Kante des Fensters in Pixeln ab dem oberen Rand des Bildschirms.Left
: Setzt die linke Kante des Fensters in Pixeln ab dem linken Rand des Bildschirms.Width
: Setzt die Breite des Fensters in Pixeln.Height
: Setzt die Höhe des Fensters in Pixeln.
Hier ist ein Beispielabschnitt des Codes, der ein E-Mail-Fenster öffnet:
' E-Mail
Set myExplorer = myOlApp.Explorers.Add(myInbox, olFolderDisplayNoNavigation)
myExplorer.Display
myExplorer.WindowState = olNormalWindow
myExplorer.Top = 0
myExplorer.Left = 0
myExplorer.Width = 600
myExplorer.Height = 800
myExplorer.Top = 0
: Setzt die obere Kante des Fensters auf 0 Pixel vom oberen Rand des Bildschirms.myExplorer.Left = 0
: Setzt die linke Kante des Fensters auf 0 Pixel vom linken Rand des Bildschirms.myExplorer.Width = 600
: Setzt die Breite des Fensters auf 600 Pixel.myExplorer.Height = 800
: Setzt die Höhe des Fensters auf 800 Pixel.
Um die Position und die Größe des Fensters zu ändern, können Sie diese Werte anpassen. Zum Beispiel:
- Wenn Sie das Fenster weiter unten auf dem Bildschirm positionieren möchten, können Sie
Top
auf einen höheren Wert setzen. - Wenn Sie das Fenster weiter rechts auf dem Bildschirm positionieren möchten, können Sie
Left
auf einen höheren Wert setzen. - Um das Fenster breiter oder schmaler zu machen, können Sie
Width
anpassen. - Um das Fenster höher oder kürzer zu machen, können Sie
Height
anpassen.
Diese Werte können für jedes der vier Fenster (E-Mail, Kalender, Kontakte und Aufgaben) individuell angepasst werden. Ändern Sie einfach die entsprechenden Werte im Code.
Fazit
Mit einem einfachen VBA-Skript können Sie Ihre Outlook-Erfahrung erheblich verbessern, indem Sie die Anwendung automatisch so konfigurieren, dass sie Ihre bevorzugten Fenster in einer bestimmten Reihenfolge und Größe öffnet. Dies ist ein kleiner Schritt, der jedoch erhebliche Auswirkungen auf Ihre tägliche Produktivität und Benutzererfahrung haben kann. Probieren Sie es aus und optimieren Sie Ihren Outlook-Workflow!