2 rychlé metody pro dávkové přiřazení více úkolů aplikace Outlook jedné osobě

Pokud jste v Outlooku vytvořili více úkolů a nyní je chcete přiřadit jedné osobě, budete toužit po hromadném přiřazení metod. V tomto článku vám ukážeme takové 2 přístupy.

Někdy musíte z nějakých důvodů někomu přiřadit několik existujících úkolů ve vlastní složce Úkoly. Obecně platí, že k přiřazení úkolu jej musíte otevřít a kliknout na tlačítko „Přiřadit úkol“, vyplnit příjemce v poli „Komu“ a nakonec kliknout na tlačítko „Odeslat“. To však znamená příliš zdlouhavé v případě, že chcete přiřadit mnoho úkolů. V následujících částech s vámi proto sdílíme 2 mnohem efektivnější a pohodlnější metody.

Metoda 1: Přeposílat úkoly jako přílohy v e-mailu

1. Začněte tím, že ve složce Úkoly stisknete klávesu „Ctrl“ a mezitím vyberete všechny úkoly, které chcete přiřadit.
2. Poté klikněte na tlačítko „Přeposlat“ ve skupině „Odpovědět“ na kartě „Domů“.
3. Najednou se zobrazí nový e-mail.
4. V tomto e-mailu byly připojeny všechny vybrané úkoly.
5. Nakonec můžete libovolně přidat příjemce, napsat a odeslat e-mail.

Metoda 2: Dávkové přiřazování úkolů pomocí aplikace Outlook VBA

1. Hned na začátku přejděte do editoru Outlook VBA odkazem na „Jak spustit kód VBA ve vašem Outlooku".
2. Dále vložte následující kód VBA do modulu.

Sub AssignMultipleTasksToAPerson()
    Dim objSelection As Outlook.Selection
    Dim objTask As Outlook.TaskItem
    Dim i As Long
    Dim lTaskCount As Long
 
    'Get selected items
    Set objSelection = Outlook.Application.ActiveExplorer.Selection
 
    If Not (objSelection Is Nothing) Then
       lTaskCount = 0
       For i = objSelection.Count To 1 Step -1
           If TypeOf objSelection(i) Is TaskItem Then
              Set objTask = objSelection(i)
              With objTask
                   'Alter the recipient email address as per your needs
                   .Recipients.Add ("johnsmith@datanumen.com")
                   .Recipients.ResolveAll
                   .Assign
                   .Send
              End With
              lTaskCount = lTaskCount + 1
           End If
       Next
 
      'Get prompt
       MsgBox lTaskCount & " tasks have been assigned!", vbInformation + vbOKOnly
    End If
End Sub

3. Poté přidejte toto makro na panel nástrojů Rychlý přístup.
4. Později vyberte úkoly, které mají být přiřazeny.
5. Nakonec klikněte na tlačítko makra na panelu nástrojů Rychlý přístup.
6. Tyto úkoly budou okamžitě přiděleny předem definovanému příjemci.

Únik z bolestivé ztráty dat z aplikace Outlook

Bude docela mizerné trpět ztrátou dat, včetně ztráty dat aplikace Outlook. Proto je nutné přijmout účinná preventivní opatření, která tomu zabrání. Nejprve byste měli provádět pravidelné zálohy dat. Kromě toho potřebujete vědět, kde můžete získat vestavěný nástroj pro opravu - scanpst a jak to spustit. V neposlední řadě, abyste zajistili okamžitou záchranu v případě selhání nástroje pro opravu doručené pošty, měli byste si předem připravit silný externí nástroj, například DataNumen Outlook Repair.

Úvod autora:

Shirley Zhang je expertem na obnovu dat DataNumen, Inc., která je světovým lídrem v oblasti technologií pro obnovu dat, včetně zotavení mdf a výhledové softwarové produkty pro opravy. Pro více informací navštivte www.datanumen.com