So stapeln Sie eine Aufgabe in Ihrem Outlook mehreren Personen getrennt zu

Aus bestimmten Gründen, wie z. B. Vertraulichkeit oder Datenschutz, möchten Sie beim Zuweisen einer Aufgabe zu vielen Personen möglicherweise separat senden. Jetzt werden wir hier eine Methode vorstellen, um es zu bekommen.

Wenn Sie eine Aufgabe zuweisen, mehrere Empfänger ausfüllen und auf "Senden" klicken, erhalten Sie eine Warnung, dass die an viele Personen gesendete Aufgabe nicht aktualisiert wird. Wenn Sie also rechtzeitig Aufgabenaktualisierungen erhalten möchten, sollten Sie die Aufgabe vielen Empfängern separat zuweisen.

Abgesehen von der Berücksichtigung der Aufgabenaktualisierung müssen Sie aus Gründen der Vertraulichkeit eine Aufgabe natürlich separat an mehrere Personen senden. Im Allgemeinen müssen Sie separate Aufgaben erstellen, Empfänger hinzufügen und nacheinander senden. Es ist offensichtlich mühsam. Im Folgenden stellen wir Ihnen einen viel effizienteren Weg vor.

Batch Weisen Sie mehreren Personen eine Aufgabe separat zu

1. Drücken Sie zunächst „Alt + F11“, um den Outlook VBA-Editor zu öffnen.
2. Kopieren Sie anschließend im Fenster "Microsoft Visual Basic für Applikationen" den VBA-Code in ein leeres Modul oder Projekt.

Sub AssignTaskToMultipleContactsSeparately()
    Dim objCurrentTask As Outlook.TaskItem
    Dim objRecipients As Outlook.Recipients
    Dim objRecipient As Outlook.Recipient
    Dim objCopiedTask As Outlook.TaskItem
    Dim i As Long
    Dim strRecipientName As String
 
    Set objCurrentTask = Outlook.Application.ActiveInspector.CurrentItem
 
    If Not objCurrentTask Is Nothing Then
       Set objRecipients = objCurrentTask.Recipients
 
       For Each objRecipient In objRecipients
           Set objCopiedTask = objCurrentTask.Copy
 
           For i = objCopiedTask.Recipients.Count To 1 Step -1
               objCopiedTask.Recipients.Remove (i)
           Next
 
           strRecipientName = Split(objRecipient.Address, "@")(0)
           strRecipientName = UCase(Left(strRecipientName, 1)) & Right(strRecipientName, Len(strRecipientName) - 1)
 
           With objCopiedTask
                .Recipients.Add (objRecipient.Address)
                .Recipients.ResolveAll
                .Subject = .Subject & " (" & strRecipientName & ")"
                .Assign
                .Send
          End With
        Next
 
        objCurrentTask.Close olDiscard
    End If
End Sub

3. Fügen Sie anschließend dieses Makro dem Menüband des Aufgabenfensters hinzu, indem Sie auf den „Optionalen Schritt“ im Beitrag verweisen – „So führen Sie VBA-Code in Outlook aus".
4. Führen Sie schließlich die folgenden Schritte aus, um dieses Makro auszuprobieren.

• Erstellen Sie zunächst eine neue Aufgabe und fügen Sie die Empfänger nach Belieben hinzu.
• Klicken Sie dann in der Multifunktionsleiste auf die Makro-Schaltfläche.
• Sofort wird die aktuelle Aufgabe den Empfängern separat zugewiesen, wie im folgenden Screenshot gezeigt.

Kümmere dich um deinen Ausblick

Outlook ist anfällig für Fehler und Korruption. Wenn Sie nicht gerne Outlook-Daten verlieren, sollten Sie daher regelmäßig Backups für Ihre Outlook-Daten erstellen. Nur auf diese Weise können Sie die Outlook-Datei problemlos wiederherstellen, auch wenn sie beschädigt wird beschädigtes Outlook Daten aus Backups. Wenn Sie kein Backup haben, müssen Sie auf ein bemerkenswertes und leistungsstarkes Wiederherstellungstool zurückgreifen, z DataNumen Outlook Repair.

Einführung des Autors:

Shirley Zhang ist eine Datenrettungsexpertin in DataNumen, Inc., das weltweit führend bei Datenwiederherstellungstechnologien ist, einschließlich SQL Server Erholung und Outlook-Reparatursoftwareprodukte. Für weitere Informationen besuchen Sie www.datanumen.com €XNUMX