Občas můžete chtít poslat mnoho položek kalendáře jiným osobám. V této situaci je možná budete chtít odeslat v dávce. Nyní tento článek ukáže 2 způsoby, jak toho dosáhnout.
Chcete-li rychle odeslat položku kalendáře e-mailem, bez ohledu na schůzku nebo schůzku, stačí tuto položku otevřít a poté kliknout na tlačítko „Přeposlat“ ve skupině „Akce“. Je to docela snadné. Tímto způsobem by však bylo odesílání více položek kalendáře poněkud problematické. Proto vás zde naučíme 2 mnohem rychlejší metody. Oba vám umožní provést tento úkol hromadně.
Metoda 1: Hromadné odeslání v jedné poště
- Na úplném začátku vyberte položky kalendáře, které chcete.
- Poté podržte stisknuté pravé tlačítko myši a přetáhněte je do navigačního panelu „Pošta“.
- Dále v zobrazeném seznamu vyberte možnost „Kopírovat sem jako zprávu s přílohou“.
- Najednou se zobrazí nový e-mail, ve kterém byly připojeny vybrané položky kalendáře.
Metoda 2: Hromadné odeslání v samostatných e-mailech
- Pro začátek přejděte v Outlooku do editoru VBA pomocí klávesových zkratek „Alt + F11“.
- Poté v novém okně vložte následující kód VBA do prázdného modulu.
Sub BatchForwardMultipleCalendarItems()
Dim objSelection As Outlook.Selection
Dim i As Integer
Dim objCalendarItem As Outlook.AppointmentItem
Dim objMail As Outlook.MailItem
Set objSelection = Outlook.Application.ActiveExplorer.Selection
For i = objSelection.Count To 1 Step -1
Set objCalendarItem = objSelection.Item(i)
Set objMail = Outlook.Application.CreateItem(olMailItem)
With objMail
.Attachments.Add objCalendarItem
'Change the recipient's email address
.Recipients.Add ("shelly@datanumen.com")
.Recipients.ResolveAll
.Subject = objCalendarItem.Subject
.Body = "Type body here ...."
.Send
End With
Next i
End Sub
Poznámka: Změňte e-mailovou adresu příjemce podle vlastních potřeb.
- Poté postupujte podle volitelného kroku uvedeného v části „Jak spustit kód VBA ve vašem Outlooku” a přidejte toto nové makro na panel nástrojů Rychlý přístup.
- Nakonec vyzkoušejte toto makro.
- Nejprve vyberte více položek kalendáře.
- Poté klikněte na tlačítko makra na panelu nástrojů Rychlý přístup.
- Aplikace Outlook okamžitě rozešle samostatné e-maily, které jsou připojeny k položkám kalendáře.
Zbavte se poškození dat aplikace Outlook
Vzhledem k tomu, že Outlook je náchylný k chybám a poškození, musíte si dávat pozor na všechna rizika pro váš Outlook. Obvykle zahrnují skryté viry v e-mailech, lidské chyby a dokonce i hardwarové poruchy atd. Kromě toho, že byste si měli dávat pozor na tato nebezpečí, měli byste provést určitá opatření, jako je pravidelné zálohování dat pro aplikaci Outlook, příprava výkonného Oprava PST nástroj jako DataNumen Outlook Repair a tak dále.
Ú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ě SQL Server obnova a výhledové softwarové produkty pro opravy. Pro více informací navštivte www.datanumen.com