Si të caktoni në grup një detyrë për shumë persona veç e veç në Outlook tuaj

Për disa arsye, të tilla si konfidencialiteti ose privatësia, kur u caktoni një detyrë shumë personave, mund të dëshironi të dërgoni veçmas. Tani, këtu do të prezantojmë një metodë për ta marrë atë.

Kur caktoni një detyrë, nëse plotësoni marrës të shumtë dhe klikoni "Dërgo", do të merrni një paralajmërim që tregon se detyra e dërguar shumë personave nuk do të përditësohet. Kështu, nëse doni të merrni përditësimet e detyrave në kohë, është më mirë t'ua caktoni detyrën shumë marrësve veçmas.

Sigurisht, përveç shqyrtimit të përditësimit të detyrës, për shkak të konfidencialitetit, ju duhet t'i dërgoni një detyrë disa personave veç e veç. Në përgjithësi, ju duhet të krijoni detyra të veçanta, të shtoni marrësin dhe të dërgoni një nga një. Është padyshim i mundimshëm. Pra, në vijim do t'ju prezantojmë një mënyrë shumë më efikase.

Caktoni një detyrë për disa persona veç e veç

1. Për të filluar, shtypni "Alt + F11" për të hyrë në redaktorin VBA të Outlook.
2. Më pas, në dritaren "Microsoft Visual Basic për Aplikacione", kopjoni kodin VBA në një modul ose projekt bosh.

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. Më pas, shtoni këtë makro në shiritin e dritares së Detyrave duke iu referuar "Hapit Opsional" në postim - "Si të ekzekutoni kodin VBA në Outlook tuaj".
4. Përfundimisht, ndërmerrni hapat e mëposhtëm për të provuar këtë makro.

• Së pari, krijoni një detyrë të re dhe shtoni marrësit sipas dëshirës.
• Pastaj, klikoni butonin makro në shirit.
• Menjëherë, detyra aktuale do t'u caktohet marrësve veçmas, siç tregohet në pamjen e mëposhtme të ekranit.

Kujdesuni për opinionin tuaj

Outlook është i prirur ndaj gabimeve dhe korrupsionit. Prandaj, nëse hezitoni të pësoni humbje të të dhënave të Outlook, duhet të bëni kopje rezervë të rregullt për të dhënat tuaja të Outlook. Vetëm në këtë mënyrë, edhe pse skedari i Outlook bëhet i korruptuar, ju ende mund ta riktheni lehtësisht Outlook i korruptuar të dhënat nga kopjet rezervë. Nëse nuk keni kopje rezervë, duhet të përdorni një mjet rikuperimi të jashtëzakonshëm dhe të fuqishëm, si p.sh DataNumen Outlook Repair.

Hyrje e autorit:

Shirley Zhang është një eksperte për rikuperimin e të dhënave DataNumen, Inc., e cila është lider botëror në teknologjitë e rikuperimit të të dhënave, duke përfshirë SQL Server shërim dhe produkte softuerike të riparimit të pamjes. Për më shumë informacion vizitoni www.datanumen.com