Wenn Sie schnell Texte in das Ende einer ziemlich langen E-Mail-Nachricht einfügen möchten, dauert es einige Zeit, bis Sie zum Ende scrollen. In diesem Artikel wird eine Methode vorgestellt, mit der Sie über VBA schnell zum Ende oder Anfang des E-Mail-Textes springen können.
Manchmal möchte man beim Lesen langer E-Mails schnell zum Anfang oder Ende des Nachrichtentextes springen oder den Cursor dorthin bewegen. Beispielsweise, wenn man die Signatur des Absenders prüfen möchte und dafür ans Ende springen muss. Normalerweise muss man dafür so lange scrollen, bis man das Ende erreicht. Das kann etwas umständlich sein. Deshalb stellen wir Ihnen hier einen VBA-Code zur Verfügung, mit dem Sie mit nur einem Klick zum Anfang oder Ende springen können.
Springe schnell zum Anfang oder Ende des Nachrichtentexts
- Starten Sie als Erstes Ihr Outlook-Programm.
- Drücken Sie dann im Outlook-Hauptfenster die Tasten „Alt + F11“.
- Als Nächstes rufen Sie das Fenster "Microsoft Visual Basic für Applikationen" auf.
- Zu diesem Zeitpunkt müssen Sie ein leeres Modul öffnen oder direkt ein neues einfügen.
- Anschließend sollten Sie den folgenden VBA-Code kopieren und in ein solches Modulfenster einfügen.
Dim objCurrentMail As Outlook.MailItem Dim objWordDocument As Word.Document Dim objWordRange As Word.Range Dim VarPosition As Variant Sub JumpToEnd() 'Funktioniert nur, wenn die aktuelle E-Mail mit dem Word-Editor bearbeitet wird Set objCurrentMail = Outlook.Application.ActiveInspector.CurrentItem Set objWordDocument = objCurrentMail.GetInspector.WordEditor If Not (objWordDocument Is Nothing) Then VarPosition = objWordDocument.Range.End - 1 Set objWordRange = objWordDocument.Range(VarPosition, VarPosition) objWordRange.Select End If End Sub Sub JumpToStart() If Not (objWordDocument Is Nothing) Then VarPosition = objWordDocument.Range.Start Set objWordRange = objWordDocument.Range(VarPosition, VarPosition) objWordRange.Select End If End Sub
- Danach sollten Sie die beiden neuen Unterprogramme besser zur Symbolleiste für den Schnellzugriff des Nachrichtenfensters hinzufügen.
- Öffnen Sie zunächst eine E-Mail im Nachrichtenfenster.
- Klicken Sie dann in der Symbolleiste für den Schnellzugriff auf den Abwärtspfeil.
- Wählen Sie aus der Dropdown-Liste "Weitere Befehle" aus.
- Im nächsten Fenster können Sie die Makros wie im folgenden Screenshot zur Symbolleiste für den Schnellzugriff hinzufügen:
- Klicken Sie zuletzt auf eine Reihe von "OK", um die Änderungen zu speichern.
- Ab sofort können Sie jederzeit zum Anfang oder Ende einer E-Mail springen, indem Sie einfach auf die entsprechende Schaltfläche in der Schnellzugriffsleiste klicken (siehe folgendes Bild):
Was ist, wenn die PST-Datei beeinträchtigt wird?
Aufgrund der Tatsache, dass die PST-Datei anfällig für Fehler und Beschädigungen ist, sollten Sie Ihr Bestes geben, um Ihre PST-Daten zu schützen. Beispielsweise müssen Sie Ihre PST-Datei regelmäßig sichern. Außerdem, um zurückkommen zu können beschädigtes PST Daten rechtzeitig, sollten Sie ein leistungsfähiges Tool in der Nähe halten, wie DataNumen Outlook Repair. Es ist spezialisiert auf die Behebung von PST-Problemen und das Abrufen von PST-Daten.
Einführung des Autors:
Shirley Zhang ist eine Datenrettungsexpertin in DataNumen, Inc., das weltweit führend bei Datenwiederherstellungstechnologien ist, einschließlich SQL Server fixieren und Outlook-Reparatursoftwareprodukte. Für weitere Informationen besuchen Sie www.datanumen.com €XNUMX