Wie sende ich immer eine neue E-Mail von einem bestimmten Konto in Outlook?
Angenommen, Sie haben mehrere E-Mail-Konten in Ihrem Outlook erstellt und beim Senden einer E-Mail in Outlook hängt das im Feld Von angezeigte E-Mail-Konto davon ab, in welchem Konto Sie sich gerade befinden. Egal in welchem Konto Sie sich gerade befinden, Sie möchten immer neue E-Mails senden E-Mails von einem bestimmten E-Mail-Konto, das folgende Tutorial kann Ihnen helfen, die Methode in diesem Tutorial kann Ihnen helfen.
Senden Sie immer eine neue E-Mail von einem bestimmten Konto mit VBA-Code
- Automatisieren Sie den E-Mail-Versand mit Auto CC / BCC, Automatische Weiterleitung nach Regeln; schicken Automatische Antwort (Abwesend) ohne dass ein Exchange-Server erforderlich ist ...
- Erhalten Sie Erinnerungen wie BCC-Warnung wenn Sie auf alle antworten, während Sie sich in der BCC-Liste befinden, und Bei fehlenden Anhängen erinnern für vergessene Anhänge...
- Verbessern Sie die E-Mail-Effizienz mit (Allen) mit Anhängen antworten, Begrüßung oder Datum und Uhrzeit automatisch zur Signatur oder zum Betreff hinzufügen, Beantworten Sie mehrere E-Mails...
- Optimieren Sie den E-Mail-Versand mit E-Mails abrufen, Anbaugeräte (Alles komprimieren, Alles automatisch speichern...), Duplikate entfernen und Kurzbericht...
Senden Sie immer eine neue E-Mail von einem bestimmten Konto mit VBA-Code
Mit diesem VBA-Code können Sie problemlos neue E-Mails von einem bestimmten Konto in Outlook senden. Bitte gehen Sie wie folgt vor.
1. Bitte drücken Sie Andere + F11 öffnen Microsoft Visual Basic für Applikationen Dialogbox.
2. Erweitere das Project1 > Microsoft Outlook-Objekte durch Doppelklick. Und dann doppelklicken Sie auf DieseOutlookSession öffnen VbaProject.OTM Dialogbox.
3. Kopieren Sie den folgenden VBA-Code und fügen Sie ihn in das Dialogfeld ein.
VBA: Senden Sie immer eine neue E-Mail von einem bestimmten Konto.
Public Sub NewBySpecAccount()
Dim oAccount As Outlook.Account
Dim oMail As Outlook.MailItem
For Each oAccount In Application.Session.Accounts
If oAccount.DisplayName = "Your account name" Then
Set oMail = Application.CreateItem(olMailItem)
oMail.SendUsingAccount = oAccount
oMail.Display
End If
Next
End Sub
4. Jetzt müssen Sie das “Ihr Kontoname”An das E-Mail-Konto, an das Sie immer neue E-Mails senden möchten. Siehe Screenshot:
5. Drücken Sie dann F5 Taste auf der Tastatur, um den VBA-Code auszuführen.
6. Nach dem Ausführen des VBA-Codes ein neuer Nachricht Das Fenster wird geöffnet. Bitte verfassen Sie Ihre E-Mail-Adresse und klicken Sie auf Absenden Taste, um es zu senden.
Note: Dieser VBA-Code wurde erfolgreich in Outlook 2007, 2010 und 2013 getestet, jedoch nicht in Exchange 2007 und 2010 ausgeführt.
Beste Office-Produktivitätstools
Kutools for Outlook - Über 100 leistungsstarke Funktionen zur Optimierung Ihres Outlooks
🤖 KI-Mail-Assistent: Sofortige Profi-E-Mails mit KI-Magie – geniale Antworten mit einem Klick, perfekter Ton, mehrsprachige Beherrschung. Verwandeln Sie den E-Mail-Versand mühelos! ...
📧 E-Mail Automation: Abwesenheit (verfügbar für POP und IMAP) / Planen Sie das Senden von E-Mails / Automatisches CC/BCC nach Regeln beim E-Mail-Versand / Automatische Weiterleitung (erweiterte Regeln) / Begrüßung automatisch hinzufügen / Teilen Sie E-Mails mit mehreren Empfängern automatisch in einzelne Nachrichten auf ...
📨 E-Mail-Management: E-Mails einfach abrufen / Blockieren Sie betrügerische E-Mails nach Betreff und anderen / Doppelte E-Mails löschen / Erweiterte Suche / Ordner konsolidieren ...
📁 Anhänge Pro: Batch speichern / Stapeltrennung / Stapelkomprimierung / Automatisches Speichern / Automatische Trennung / Automatische Komprimierung ...
???? Schnittstellenmagie: 😊Mehr hübsche und coole Emojis / Steigern Sie Ihre Outlook-Produktivität mit Registerkartenansichten / Ausblick minimieren statt schließen ...
👍 Wunder mit einem Klick: Allen mit eingehenden Anhängen antworten / Anti-Phishing-E-Mails / 🕘Zeitzone des Absenders anzeigen ...
👩🏼🤝👩🏻 Kontakte und Kalender: Fügen Sie Kontakte aus ausgewählten E-Mails im Stapel hinzu / Teilen Sie eine Kontaktgruppe in einzelne Gruppen auf / Geburtstagserinnerungen entfernen ...
Auf über 100 Eigenschaften Warten Sie auf Ihre Erkundung! Klicken Sie hier, um mehr zu erfahren.