Kung nais mong kanselahin ang lahat ng mga pagpupulong na naka-iskedyul sa isang tukoy na saklaw ng petsa sa iyong Outlook, maaari mong gamitin ang paraan na ipinakilala sa artikulong ito. Maaari kang makatipid mula sa paghahanap at pagkansela nang manu-mano sa mga naturang pagpupulong.
Kung, sa ilang kadahilanan, hindi ka makakapag-ayos o makilahok sa mga pagpupulong na gaganapin sa isang tiyak na saklaw ng petsa sa hinaharap, maaari mong hilingin na kanselahin ang lahat ng naturang pagpupulong. Pangkalahatan, kailangan mo munang malaman ang mga ito at pagkatapos ay kanselahin ang mga ito isa-isa. Ito ay magiging ganap na mahirap. Samakatuwid, sa mga sumusunod, magbabahagi kami sa iyo ng isa pang paraan, na mas maginhawa.

Batch Kanselahin ang Lahat ng Mga Pagpupulong na Nakaiskedyul sa isang Tiyak na Saklaw ng Petsa
- Sa pinakasimula pa lang, simulan ang iyong programang Outlook.
- Pagkatapos, sa Outlook, kailangan mong pindutin ang mga pindutan ng "Alt + F11".
- Susunod, makakapasok ka sa window ng "Microsoft Visual Basic for Applications".
- Sa window na ito, dapat mong buksan ang isang hindi nagamit na module o maglagay lamang ng bago.
- Kasunod, maaari mong kopyahin ang sumusunod na VBA code sa modyul na ito.
Sub BatchCancelAllMeetingsInSpecificDateRange()
Dim dStartDate As Date
Dim dEndDate As Date
Dim objCalendarFolder As Outlook.folder
Dim objItems As Outlook.Items
Dim objItemsInDateRange As Outlook.Items
Dim objAppointment As Outlook.AppointmentItem
Dim objResponse As Outlook.MeetingItem
'Specify the start date and end date
dStartDate = InputBox("Enter the start date:", , "10/1/2017")
dEndDate = InputBox("Enter the end date:", , "10/8/2017")
If dStartDate <> #1/1/4501# And dEndDate <> #1/1/4501# Then
'Select a calendar folder
Set objCalendarFolder = Outlook.Application.Session.PickFolder
Set objItems = objCalendarFolder.Items
objItems.IncludeRecurrences = True
objItems.Sort "[Start]"
'Get the appointments in the specific date range
strFilter = "[Start] >= " & Chr(34) & dStartDate & " 00:00 AM" & Chr(34) & " AND [End] <= " & Chr(34) & dEndDate & " 11:59 PM" & Chr(34)
Set objItemsInDateRange = objItems.Restrict(strFilter)
objItemsInDateRange.Sort "[Start]"
For Each objAppointment In objItemsInDateRange
'Cancel the meetings in this date range
If objAppointment.MeetingStatus = olMeeting Then
If objAppointment.Organizer = Outlook.Session.CurrentUser Then
objAppointment.MeetingStatus = olMeetingCanceled
objAppointment.Save
objAppointment.Send
objAppointment.Delete
Else
Set objResponse = objAppointment.Respond(olMeetingDeclined)
objResponse.Send
objAppointment.Delete
End If
End If
Next
End If
End Sub
- Sa paglaon, mapapatakbo mo ngayon ang macro na ito.
- Sa kasalukuyang window ng macro, pindutin ang "F5" key button.
- Susunod, hihilingin sa iyo na tukuyin ang saklaw ng petsa.
- Pagkatapos nito, ipapakita ang isa pang kahon ng dayalogo, na hinihiling sa iyo na mag-opt para sa isang mapagkukunang folder ng kalendaryo at i-click ang "OK".
- Panghuli, kapag natapos ang macro, maaari mong makita na ang lahat ng mga pagpupulong sa tukoy na saklaw ng petsa ay nakansela.
- Sa folder na "Mga Naipadala na Item", mahahanap mo ang mga pagkansela sa pagpupulong, tulad ng screenshot sa ibaba:
Ayusin ang Mga Error sa Outlook
Kung gumamit ka ng Outlook ng mga dekada, dapat nakaranas ka ng maraming mga error. Sa kasamaang palad ang Outlook ay dumating na naka-pack na may isang built-in na tool sa pag-aayos - Scanpst. Maaari mo itong gamitin sa ayusin ang Outlook mga pagkakamali Gayunpaman, kung nabigo ito, ang iyong huling paraan ay ang panlabas na pag-aayos ng mga tool tulad ng DataNumen Outlook RepairKaya nitong i-scan ang Outlook file at ayusin ang karamihan sa mga error, at madali pa ngang maibalik ang sirang data ng Outlook.
Panimula ng May-akda:
Si Shirley Zhang ay isang dalubhasa sa pagbawi ng data sa DataNumen, Inc., na pinuno ng mundo sa mga teknolohiya sa pagbawi ng data, kasama ang ayusin ang sql at pananaw sa pag-aayos ng mga produktong software. Para sa karagdagang impormasyon pagbisita www.datanumen. Sa


