Pokud často potřebujete změnit čas připomenutí více schůzek, tento článek vám bude značně nápomocný. Tato metoda vám efektivně ušetří ruční změnu času připomenutí jeden po druhém.
Předchozí článek - „3 kroky k vytvoření a změně připomenutí pro položky kalendáře v dávkách„Sdílí metodu hromadné změny času připomenutí mnoha schůzek. Přesto stále vyžaduje, abyste nejprve změnili nastavení zobrazení a poté ručně změnili připomenutí jedné události. Proto vám zde představíme mnohem efektivnější způsob. Zde si ukážeme podrobné kroky a konkrétní kód VBA. Nemusíte se tedy obávat, že byste o VBA neměli žádné znalosti. Jen čtěte dál.
Dávková změna doby připomenutí více schůzek
- Na úplném začátku spusťte program Outlook.
- Poté přejděte do editoru VBA s odkazem na „Jak spustit kód VBA ve vašem Outlooku".
- Dále zkopírujte a vložte následující kód VBA do nepoužívaného modulu.
Sub BatchChangeRemindersMultipleAppointments()
Dim lReminderMinBeforeStart As Long
Dim objSelection As Outlook.Selection
Dim i As Long
Dim objAppointment As Outlook.AppointmentItem
'Enter the number of minutes the reminder should occur prior to the start of the appointment
lReminderMinBeforeStart = InputBox("Enter the reminder minutes before start:", , "45")
Set objSelection = Outlook.ActiveExplorer.Selection
For i = objSelection.Count To 1 Step -1
If TypeOf objSelection.Item(i) Is AppointmentItem Then
Set objAppointment = objSelection.Item(i)
'Enable the reminder
If objAppointment.ReminderSet = False Then
With objAppointment
.ReminderSet = True
.Save
End With
End If
With objAppointment
.ReminderMinutesBeforeStart = lReminderMinBeforeStart
.Save
End With
End If
Next
'Prompt you of "Complete"
MsgBox "Complete!", vbInformation + vbOKOnly
End Sub
- Poté přidejte toto makro na pás karet nebo na panel nástrojů Rychlý přístup.
- Nakonec to můžete vyzkoušet.
- Nejprve vyberte požadované schůzky.
- Poté klikněte na tlačítko makra.
- Dále v rozbalovacím dialogovém okně zadejte počet minut připomenutí před začátkem schůzky.
- Nyní můžete zkontrolovat čas připomenutí vybraných schůzek, které byly upraveny podle vašeho přání.
Odstraňte chyby aplikace Outlook
Pokud se v aplikaci Outlook často setkáváte s různými chybami, měli byste provést některá důkladná opatření. Například musíte zálohovat soubor Outlook PST najednou, prohledat soubor, zda neobsahuje viry, a zabít je, naučit se, jak efektivně využívat Scanpst k opravit PST problémy a uchopit externí nástroj pro opravu, například DataNumen Outlook Repair. Bude to užitečné, když narazíte na nepříjemné problémy, s nimiž se nástroj pro opravu doručené pošty nedokáže vyrovnat.
Autor Introdzction:
Shirley Zhang je expertem na obnovu dat DataNumen, Inc., která je světovým lídrem v oblasti technologií pro obnovu dat, včetně oprava sql a výhledové softwarové produkty pro opravy. Pro více informací navštivte www.datanumen.com